Overview
Comment:Fiddled about with parameter passing - still not right
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: e3ec643207c4f37ba51c221ae16d559a3ec2fbc9af859cf90f4b2009f43a55f2
User & Date: gawthrop@users.sourceforge.net on 1996-08-12 20:19:06
Other Links: branch diff | manifest | tags
Context
1996-08-12
20:19:52
Arguments now passed via $1_args.m file check-in: ead13b5877 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:19:06
Fiddled about with parameter passing - still not right check-in: e3ec643207 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
19:09:13
Initial revision check-in: 56a25313fe user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/sm2sr_m from [3179a86b5f] to [8d38ce92ce].

12
13
14
15
16
17
18



19
20
21
22
23
24
25
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28







+
+
+







# Copyright (c) P.J.Gawthrop, 1996.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.4  1996/08/11 19:48:04  peter
## Parameter passing added.
##
## Revision 1.3  1996/08/11 10:38:30  peter
## Minor debugging changes.
##
## Revision 1.2  1996/08/11 10:06:50  peter
## Now allows e format and NaN numbers.
##
## Revision 1.1  1996/08/11 09:45:46  peter
34
35
36
37
38
39
40


41
42
43
44

45
46
47
48
49
50
51
52
53
54
55
56
37
38
39
40
41
42
43
44
45
46
47
48

49
50
51
52
53

54
55
56
57
58
59
60







+
+



-
+




-







then
  PARAMS='t=[0:0.1:10]'
  echo Using default parameter $PARAMS
else
  PARAMS=$2;
fi

PARAMS="$PARAMS ;"
echo $PARAMS

$MATRIX << EOF  | awk '$1 !~ /[A-MO-Zb-cf-z]/ && NF>0 {print} '  >$1_sr.dat

  $PARAMS;
  $PARAMS
  [n,m]=size(t);
  if m>n
    t=t';
  end;


  [A,B,C,D,E] = $1_dm($1_numpar);
  y = dm2sr(A,B,C,D,E,t);

  [Ny,Nu]=size(D);
  NN = Ny*Nu;


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]