Overview
| Comment: | Write out the system as a second columns as well |
|---|---|
| Downloads: | Tarball | ZIP 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.000 |
| 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 '^\$'
|