10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
# Copyright (c) P.J.Gawthrop, 1989, 1990, 1991, 1993,1994.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
# Revision 1.6 1997/04/16 13:43:29 peterg
# Added matrix dimenensions
#
# Revision 1.5 1997/02/24 14:44:28 peterg
# Ignores numerical parameters in global list.
#
## Revision 1.4 1996/08/24 14:16:25 peter
|
>
>
>
|
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
# Copyright (c) P.J.Gawthrop, 1989, 1990, 1991, 1993,1994.
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.7 1998/04/13 11:01:55 peterg
## Now uses generic header : matlab_header
##
# Revision 1.6 1997/04/16 13:43:29 peterg
# Added matrix dimenensions
#
# Revision 1.5 1997/02/24 14:44:28 peterg
# Ignores numerical parameters in global list.
#
## Revision 1.4 1996/08/24 14:16:25 peter
|
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
|
SHUT "$1_dm.1";
EOF
# Header
matlab_header $1 dm> $1_dm.m
#Define array sizes.
grep -v 'function' $1_def.m | grep -v '%' >> $1_dm.m
echo 'mtta = zeros(nx+nyz+2*nz,nx+nyz+2*nz);' >> $1_dm.m
echo 'mttb = zeros(nx+nyz+2*nz,nu);' >> $1_dm.m
echo 'mttc = zeros(ny,nx+nyz+2*nz);' >> $1_dm.m
echo 'mttd = zeros(ny,nu);' >> $1_dm.m
|
|
|
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
|
SHUT "$1_dm.1";
EOF
# Header
matlab_header $1 dm 'A,B,C,D,E'> $1_dm.m
#Define array sizes.
grep -v 'function' $1_def.m | grep -v '%' >> $1_dm.m
echo 'mtta = zeros(nx+nyz+2*nz,nx+nyz+2*nz);' >> $1_dm.m
echo 'mttb = zeros(nx+nyz+2*nz,nu);' >> $1_dm.m
echo 'mttc = zeros(ny,nx+nyz+2*nz);' >> $1_dm.m
echo 'mttd = zeros(ny,nu);' >> $1_dm.m
|