Overview
Comment:Corrected bug in writing "other" components
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: a0e15671a8aef77d639e6efc276ceed2188f3af66f3c2af4f6e3475c25767e45
User & Date: gawthrop@users.sourceforge.net on 1998-03-05 10:09:47
Other Links: branch diff | manifest | tags
Context
1998-03-05
10:14:37
Toned down the error warning message check-in: 335ff2e242 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:09:47
Corrected bug in writing "other" components check-in: a0e15671a8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1998-03-04
17:51:37
Added END check-in: 074d29f739 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/abg2lbl_fig2txt from [bd7dcc77dc] to [d6fcd84bcc].

︙︙
9
10
11
12
13
14
15





16
17
18
19
20
21
22

# Acausal bond graph to causal bond graph: mfile format

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$





## Revision 1.4  1998/02/23 16:20:33  peterg
## Summary line just contains the model name
##
## Revision 1.3  1997/05/09 14:21:35  peterg
## Default to flow,component_name
##
# Revision 1.2  1997/03/19  12:08:01  peterg








>
>
>
>
>








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

# Acausal bond graph to causal bond graph: mfile format

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.5  1998/03/02 09:26:18  peterg
## Now does default CR and args for the basic components only
## SS,I,R,C,GY,TF
## C now has a default of effort input.
##
## Revision 1.4  1998/02/23 16:20:33  peterg
## Summary line just contains the model name
##
## Revision 1.3  1997/05/09 14:21:35  peterg
## Default to flow,component_name
##
# Revision 1.2  1997/03/19  12:08:01  peterg
︙︙
68
69
70
71
72
73
74

75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101

#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 (Component !~ $1) print "\n% Component type", $1

      if ($1 ~ "SS") 
	print  "\t" $2 "\t\texternal\texternal";

      if ($1 ~ "R") 
	print  "\t" $2"\t\tlin\tflow," $2;

      if ($1 ~ "I") 
	print  "\t" $2"\t\tlin\tflow," $2;

      if ($1 ~ "C") 
	print  "\t" $2"\t\tlin\teffort," $2;

      if ($1 ~ "TF") 
	print  "\t" $2"\t\tlin\tflow," $2;

      if ($1 ~ "GY") 
	print  "\t" $2"\t\tlin\tflow," $2;
    }
   else {
         if (Component !~ $1) print "\n% Component type", $1; 
	 print  "\t" $2;
	}
        Component=$1
 }' >>$1_lbl.txt









>
|




|


|


|


|


|

<
|
<






73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99

100

101
102
103
104
105

#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 (Component !~ $1) print "\n% Component type", $1

      if ($1 ~ "SS") 
	print  "\t" $2 "\t\texternal\texternal";

      else if ($1 ~ "R") 
	print  "\t" $2"\t\tlin\tflow," $2;

      else if ($1 ~ "I") 
	print  "\t" $2"\t\tlin\tflow," $2;

      else if ($1 ~ "C") 
	print  "\t" $2"\t\tlin\teffort," $2;

      else if ($1 ~ "TF") 
	print  "\t" $2"\t\tlin\tflow," $2;

      else if ($1 ~ "GY") 
	print  "\t" $2"\t\tlin\tflow," $2;

      else

	 print  "\t" $2;
	}
        Component=$1
 }' >>$1_lbl.txt

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