Overview
Comment:Now handles the generic CR (ie = and mtt_e and mtt_f)
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 66b513f7649987edd06454d000d3487dc1d3943b7f9cdf112350e0717976f1ff
User & Date: gawthrop@users.sourceforge.net on 2000-10-03 18:46:04.000
Other Links: branch diff | manifest | tags
Context
2000-10-05
10:13:00
New eqn2ass function.
Started extension to multiports
check-in: 8e9b4024fb user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-10-03
18:46:04
Now handles the generic CR (ie = and mtt_e and mtt_f) check-in: 66b513f764 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
18:35:04
Removed comment bug check-in: b1ee786a97 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
11
12
13
14
15
16
17
18

19
20

21
22
23
24
25
26
27
11
12
13
14
15
16
17

18
19

20
21
22
23
24
25
26
27







-
+

-
+









# Inform user
echo "Creating $1_sympar.txt"

rm -f mtt_error
# Separation characters
SEPS=';+*/()-'
SEPS=';+*/()-='
# Replace by ,
REPS=',,,,,,,'
REPS=',,,,,,,,'

# This is the main transformation using gawk
tr $SEPS $REPS <  $1_abg.m | \
awk '
function exact_match(name1, name2) {
  return ((match(name1,name2)>0)&&(length(name1)==length(name2)))
}
36
37
38
39
40
41
42
43

44
45
46
47
48
49
50
36
37
38
39
40
41
42

43
44
45
46
47
48
49
50







-
+







    }
  }
  return matched;
}

BEGIN {
  var = "[%|#]VAR";
  not_an_arg = "effort flow state internal external zero unknown";
  not_an_arg = "effort flow state internal external zero unknown mtt_e mtt_f";
  arg_line = "arg = ";
}
{
  ## Explicit VAR declarations
  if (match($1,var)>0) print $2 "\t" system_name;

   ## Implicit declarations from the arg list

MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]