Overview
Comment:Replace reduce by $SYMBOLIC
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 12f46e2c62ce61905d33554e868cafa15562dfddcaa9fa23ea6894128fd81d46
User & Date: gawthrop@users.sourceforge.net on 2000-05-02 13:29:13
Other Links: branch diff | manifest | tags
Context
2000-05-02
15:20:44
reduce --> $SYMBOLIC check-in: d76010e00e user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:29:13
Replace reduce by $SYMBOLIC check-in: 12f46e2c62 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-04-18
11:24:19
Removed _numpar. check-in: 2ea0f553cf user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/cse2smx_lang from [ff0e07e945] to [a5a2c78af6]. 

1
2
3
4
5
6
7
8
9
10
11
12

















13
14
15
16
17
18
19

#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################

# Bourne shell script: cse2smx_r
# Constrained-state equation to state matrices with x vector
# Used for implicit integration
# Copyright (C) 2000 by Peter J. Gawthrop
## Modified from eailier version


















# Language
if [ -n "$3" ]; then
    lang=$3
else
    lang="m"
fi














>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>








1
2
3
4
5
6
7
8
9
10
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

#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################

# Bourne shell script: cse2smx_r
# Constrained-state equation to state matrices with x vector
# Used for implicit integration
# Copyright (C) 2000 by Peter J. Gawthrop
## Modified from eailier version


# Args
while [ -n "`echo $1 | grep '^-'`" ]; do
  case $1 in
    -noglobal)
	noglobal='-noglobal';
	;;
    -parameters)
	parameters='-parameters';
	;;
    *)
	echo $1 is an unknown option
        exit;;
  esac
  shift
done

# Language
if [ -n "$3" ]; then
    lang=$3
else
    lang="m"
fi
︙︙
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65

rm -f cse2smx_r.log
rm -f $1_smx.$lang
rm -f $1_smxx.$lang
rm -f $1_smxtx.$lang
rm -f $1_$rep.body

# Use reduce to accomplish the transformation
reduce << EOF  >cse2smx_lang.log

lang := $lang;

in "$1_subs.r";
in "$1_def.r";
in "$1_cse.r";
in "$1_cr.r";








|








68
69
70
71
72
73
74
75
76
77
78
79
80
81
82

rm -f cse2smx_r.log
rm -f $1_smx.$lang
rm -f $1_smxx.$lang
rm -f $1_smxtx.$lang
rm -f $1_$rep.body

# Use reduce to accomplish the transformation
$SYMBOLIC << EOF  >cse2smx_lang.log

lang := $lang;

in "$1_subs.r";
in "$1_def.r";
in "$1_cse.r";
in "$1_cr.r";
︙︙
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141

  END;

%Shut the  output according to the language.
 GENTRANSHUT "$1_$rep.body";
EOF

if [ "$lang" = "m" ]; then
  lang_header $1 $rep m 'mttx,mttu,mttt,mttpar' $out > $1_$rep.m

  echo '#====== Start of code ======#' >> $1_$rep.m

  cat $1_$rep.body | mtt_p2m >> $1_$rep.m
fi
 
# Now invoke the standard error handling.
mtt_error_r cse2smx_lang.log












|













139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158

  END;

%Shut the  output according to the language.
 GENTRANSHUT "$1_$rep.body";
EOF

if [ "$lang" = "m" ]; then
  lang_header $noglobals $parameters $1 $rep m 'mttx,mttu,mttt,mttpar' $out > $1_$rep.m

  echo '#====== Start of code ======#' >> $1_$rep.m

  cat $1_$rep.body | mtt_p2m >> $1_$rep.m
fi
 
# Now invoke the standard error handling.
mtt_error_r cse2smx_lang.log

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