Overview
Comment:Tidied up for Pascal version
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 436e449ca98f8b048701330e600f6ca696804cbb6a749c1416b954707350f390
User & Date: gawthrop@users.sourceforge.net on 1998-07-25 09:48:31.000
Other Links: branch diff | manifest | tags
Context
1998-07-25
10:00:48
*** empty log message *** check-in: b3eb495178 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:48:31
Tidied up for Pascal version check-in: 436e449ca9 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:48:03
*** empty log message *** check-in: aff79ffce8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
11
12
13
14
15
16
17



18
19
20
21
22
23
24

25
26
27

28
29
30
31
32
33
34
35
36
37
38
39
40



41
42
43

44
45
46
47
48

49
50
51
52
53
54
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26

27
28
29

30
31
32
33
34
35
36
37
38
39
40



41
42
43
44
45

46
47
48
49
50

51
52
53
54
55
56
57







+
+
+






-
+


-
+










-
-
-
+
+
+


-
+




-
+








# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% Version control history
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
# %% $Id$
# %% $Log$
# %% Revision 1.1  1998/02/25 22:10:25  peterg
# %% Initial revision
# %%
# %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

system=$1
representation=$2

if [ "$representation" = "state" ]; then
    name='x';
    name='MTTx';
fi
if [ "$representation" = "input" ]; then
    name='u';
    name='MTTu';
fi
# Inform user
echo Creating $1_$2.m

#Create the $2 file complete with headers.
echo "function $name = $1_$2(t)" > $1_$2.m
echo "%% $2 file ($1_$2.m)" >> $1_$2.m
echo "%% Generated by MTT at `date`" >> $1_$2.m

# Global variable list
echo  >>  $1_$2.m
echo  'if (nargin==0), t=0; end;'>>  $1_$2.m
echo  >>  $1_$2.m
#echo  >>  $1_$2.m
#echo  'if (nargin==0), t=0; end;'>>  $1_$2.m
#echo  >>  $1_$2.m
echo "% Global variable list" >>  $1_$2.m
sympar2global_txt2m $1 >> $1_$2.m
echo "global DT;" >> $1_$2.m
#echo "global DT;" >> $1_$2.m

#Write out the variables in m format.
awk -F#  '{
  if (NF<2) print $1
  if (NF>1)  print $1 "% " $2
  if (NF>1)  print $1 "# " $2
}' $1_$2.txt  | \
sed 's/{//' | sed 's/}/end/' >> $1_$2.m





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