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
37
38
39
40
41
42
43
44
45
46
|
# Copyright (c) P.J.Gawthrop 1996
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
# Revision 1.2 1997/05/01 08:24:38 peterg
# Now uses # as the comment symbol in the .txt file
#
# Revision 1.1 1997/05/01 07:45:17 peterg
# Initial revision
#
###############################################################
# Inform user
echo Creating $1_numpar.m
#Create the numpar file complete with headers.
echo "## Numerical parameter file ($1_numpar.m)" > $1_numpar.m
echo "## Generated by MTT at `date`" >> $1_numpar.m
# Global variable list
echo >> $1_numpar.m
echo "# Global variable list" >> $1_numpar.m
sympar2global_txt2m $1 >> $1_numpar.m
#Write out the variables in m format.
awk -F# '{
if (NF==1) print $1
if (NF==2) print $1 "# " $2
}' $1_numpar.txt |\
sed 's/double/global/' >> $1_numpar.m
|
>
>
>
<
|
|
|
|
<
<
|
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
37
38
39
40
41
42
43
44
45
46
|
# Copyright (c) P.J.Gawthrop 1996
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.3 1998/07/25 18:26:33 peterg
## *** empty log message ***
##
# Revision 1.2 1997/05/01 08:24:38 peterg
# Now uses # as the comment symbol in the .txt file
#
# Revision 1.1 1997/05/01 07:45:17 peterg
# Initial revision
#
###############################################################
# Inform user
echo Creating $1_numpar.m
#Create the numpar file complete with headers.
lang_header $1 numpar m '' MTTpar > $1_numpar.m
# Global variable list
#echo >> $1_numpar.m
#echo "# Global variable list" >> $1_numpar.m
#sympar2global_txt2m $1 >> $1_numpar.m
#Write out the variables in m format.
awk -F# '{
if (NF==1) print $1
if (NF==2) print $1 "# " $2
}' $1_numpar.txt |\
sed 's/double/global/' >> $1_numpar.m
|