Overview
| Comment: | Now translates ; % to # |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
0020be47fcc6cf308b25015bcbe5a9fd |
| User & Date: | gawthrop@users.sourceforge.net on 1998-08-19 08:46:00 |
| Other Links: | branch diff | manifest | tags |
Context
|
1998-08-24
| ||
| 07:35:03 | About to go to new abg format. check-in: 6b1935a6ad user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-08-19
| ||
| 08:46:00 | Now translates ; % to # check-in: 0020be47fc user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1998-08-18
| ||
| 10:49:05 | VERSION 3.1 release check-in: fd17aa3eee user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_m2p from [2d421e6110] to [83b192aee6].
| ︙ | ︙ | |||
11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # Copyright (c) P.J.Gawthrop 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.14 1998/08/12 15:21:12 peterg ## Added type definition for the SVD procedures ## ## Revision 1.13 1998/08/11 09:32:07 peterg ## Added comments at procedure begin and end. ## ## Revision 1.12 1998/07/30 11:30:42 peterg | > > > | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 | # Copyright (c) P.J.Gawthrop 1998 ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ## Revision 1.15 1998/08/15 13:46:01 peterg ## Included new sparse update routines ## ## Revision 1.14 1998/08/12 15:21:12 peterg ## Added type definition for the SVD procedures ## ## Revision 1.13 1998/08/11 09:32:07 peterg ## Added comments at procedure begin and end. ## ## Revision 1.12 1998/07/30 11:30:42 peterg |
| ︙ | ︙ | |||
163 164 165 166 167 168 169 | fun_name="$Sys\_$name" mttfun_name=$name space="[ \t]*" spaces="[ \t][ \t]*" non_space="[^ ]*" # Body | | | 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 |
fun_name="$Sys\_$name"
mttfun_name=$name
space="[ \t]*"
spaces="[ \t][ \t]*"
non_space="[^ ]*"
# Body
grep -v '^[ ]*function' < $Sys_rep.m | sed "s/^$space%/#/" | sed "s/;$space%/#/" |\
awk -F# '{printf("%s",$1)
if (NF>1) printf("{* %s *}", $2)
printf("\n")
}' |\
sed "s/$space\[\($non_space\)\]$spaces=$spaces\($fun_name\)(\([a-zA-Z0-9,]*\))/\2(\1,\3)/" |\
sed "s/$space\[\($non_space\)\]$spaces=$spaces\($mttfun_name\)(\([a-zA-Z0-9,]*\))/\2(\1,\3)/" |\
sed "s/$space\[\($non_space\)\]$spaces=$spaces\(zeros\)(\([a-zA-Z0-9,]*\))/\2(\1,\3)/" |\
|
| ︙ | ︙ |