Overview
Comment: | Write out the system as a second columns as well |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
e5a97db21d1f236ad27f74f103b7bf10 |
User & Date: | gawthrop@users.sourceforge.net on 2000-10-16 09:06:26 |
Other Links: | branch diff | manifest | tags |
Context
2000-10-16
| ||
09:10:08 | Now strips out "unwanted" bits frome the _aliased.txt file check-in: 5c97259fbf user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
09:06:26 | Write out the system as a second columns as well check-in: e5a97db21d user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
09:04:04 | Initial revision check-in: d008aaf482 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/mtt_strip_args from [c68ef708a3] to [48b8414240].
1 2 3 4 5 6 7 8 9 10 11 12 | #! /bin/sh ###################################### ##### Model Transformation Tools ##### ###################################### # Bourne shell script: strip args # Strips unwanted bits from a list of arguments # Label file to symbolic parameters conversion # Copyright (C) 2000 by Peter J. Gawthrop ## $Id$ ## | | > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 | #! /bin/sh ###################################### ##### Model Transformation Tools ##### ###################################### # Bourne shell script: strip args # Strips unwanted bits from a list of arguments # Label file to symbolic parameters conversion # Copyright (C) 2000 by Peter J. Gawthrop ## $Id$ ## ## $Log$ ## Revision 1.1 2000/10/16 09:04:04 peterg ## Initial revision ## ## # Inform user #echo "Creating $1_sympar.txt" # Separation characters SEPS='=*;+/()-' # Replace by , REPS=',,,,,,,,' |
︙ | ︙ | |||
40 41 42 43 44 45 46 47 48 49 | BEGIN { not_an_arg = "effort flow state internal external zero unknown\ mtt_e mtt_f sqrt exp log sign none abs"; } { args=$1 N=split(args, arg, ","); for (i=1;i<=N;i++){ if ( (length(arg[i])>0)&&(matches(not_an_arg,arg[i])==0)&&(match(arg[i],"^[0-9]+[.]*")==0) ){ | > | | 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 | BEGIN { not_an_arg = "effort flow state internal external zero unknown\ mtt_e mtt_f sqrt exp log sign none abs"; } { args=$1 sys=$2 N=split(args, arg, ","); for (i=1;i<=N;i++){ if ( (length(arg[i])>0)&&(matches(not_an_arg,arg[i])==0)&&(match(arg[i],"^[0-9]+[.]*")==0) ){ printf("%s\t%s\n", arg[i], sys); } } }' |\ grep -v '^\$' |