Overview
Comment:Default to flow,component_name
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 4c5c40d8951f8c131e01ee9bbf275f371c4ae1cdadef22507d99965d4b9930e6
User & Date: gawthrop@users.sourceforge.net on 1997-05-09 14:21:35.000
Other Links: branch diff | manifest | tags
Context
1997-05-10
07:01:15
_input called in outer loop only.
time updated in outer loop only.
Integer time (itime) introduced and updated in outer loop - maybe
useful for discrete events.
Integer time (itime) passed to _input.
check-in: d0b7cce5eb user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-05-09
14:21:35
Default to flow,component_name check-in: 4c5c40d895 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
14:20:49
Dont declare MTTVAR array when there are no variables. check-in: 022d9a8bae user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
︙
9
10
11
12
13
14
15



16
17
18
19
20
21
22
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25







+
+
+







# Acausal bond graph to causal bond graph: mfile format

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
# Revision 1.2  1997/03/19  12:08:01  peterg
# No longer writes out non-unique names - now done in rbg_fig2m
#
# Revision 1.1  1997/03/18  13:55:01  peterg
# Initial revision
#
###############################################################


# P.J.Gawthrop March 1997
︙
55
56
57
58
59
60
61
62
63
64
65







66


67




68
69
70
58
59
60
61
62
63
64




65
66
67
68
69
70
71
72
73
74

75
76
77
78
79
80
81







-
-
-
-
+
+
+
+
+
+
+

+
+
-
+
+
+
+



sort -u> $1_unique_raw_list

#Write out non-unique names
#echo 'Non-unique names (if any):'
#diff $1_unique_raw_list  $1_raw_list | grep '>' | sed 's/>/	/'

#Write out the outline lbl file
grep -v  '\[[0-9]*\]'  $1_unique_raw_list | awk --field-separator ':' \
 '{if (($1 !~ "0")&&($1 !~ "1")) \
    {if ($1 ~ "SS") \
	print "% Component type", $1, "\n\t" $2 "\t\texternal\texternal";
grep -v  '\[[0-9]*\]'  $1_unique_raw_list | \
awk --field-separator ':' \
 '{ \
   if (($1 !~ "0")&&($1 !~ "1")) \
    { if (Component !~ $1) print "\n% Component type", $1
    if ($1 ~ "SS") \
	print  "\t" $2 "\t\texternal\texternal";
	else \
	print  "\t" $2"\t\tlin\tflow," $2} \
   else {
	print "% Component type", $1, "\n\t" $2"\t\tlin\t\targ1,arg2"} \
         if (Component !~ $1) print "\n% Component type", $1; \
	 print  "\t" $2;
	}
        Component=$1\
 }' \
>>$1_lbl.txt


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