Overview
Comment:Added n-ports to the argument list in the comment.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 8f2e0a82f346d8ce962f1225bc043c0f74507a6b4692bf94b54bc97538fa2712
User & Date: gawthrop@users.sourceforge.net on 1997-08-05 08:38:23
Other Links: branch diff | manifest | tags
Context
1997-08-06
21:43:19
Corrected error in creating component list: the kth component of the
list is given by the jth component of the original list NOT vice
versa. check-in: 43156f5519 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-08-05
08:38:23
Added n-ports to the argument list in the comment. check-in: 8f2e0a82f3 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1997-08-04
14:18:55
If no ports labels at all, just use the default component list. check-in: 9df910b7db user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/rbg2abg_m from [1ff2b90082] to [40503e98e4]. 

1
2
3
4
5
6
7
8
9
10
11
12
13



14
15
16
17
18
19
20

#! /bin/sh

     ###################################### 
     ##### Model Transformation Tools #####
     ######################################

# Bourne shell script: rbg2abg_m
#
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



## Revision 1.5  1996/08/25 09:20:32  peter
## General error handling.
##
## Revision 1.4  1996/08/24 17:57:41  peter
## Removed `touch mtt_info.txt'
##
## Revision 1.3  1996/08/24 14:58:56  peter














>
>
>








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: rbg2abg_m
#
###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.6  1996/12/04 21:52:01  peterg
## Uses filenum and fopen instead of filename.
##
## Revision 1.5  1996/08/25 09:20:32  peter
## General error handling.
##
## Revision 1.4  1996/08/24 17:57:41  peter
## Removed `touch mtt_info.txt'
##
## Revision 1.3  1996/08/24 14:58:56  peter
︙︙
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

rm -f $1_abg.m

#Inform user
echo Creating $1_abg.m

# Use matrix manipulation to accomplish the transformation
$MATRIX > rbg2abg_m.log  2>mtt_error.txt << EOF

  infofile = 'mtt_info.txt';
  %Convert from the fig version of the bonds to a structured version
  [rbonds,rstrokes,rcomponents,rports,n_ports] = $1_rbg;


  [bonds,components] = rbg2abg(rbonds,rstrokes,rcomponents,rports,infofile);

  %Write the function m-file for the causal bond graph
  filename = '$1_abg.m';
  filenum = fopen(filename,'w');
  c = '%';
  fprintf(filenum, 'function [bonds,components,n_ports] = $1_abg\n');
  fprintf(filenum, '%s [bonds,components] = $1_abg\n', c);
  fprintf(filenum, '%s Acausal bond graph created by MTT on %s\n\n', ...
                     c, date);
  mat2mfile(bonds, 'bonds', filenum);
  mat2mfile(components, 'components', filenum);
  fprintf(filenum, 'n_ports = %1.0f;\n', n_ports);

EOF








>


|
>
>
|






|








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
106
107

rm -f $1_abg.m

#Inform user
echo Creating $1_abg.m

# Use matrix manipulation to accomplish the transformation
$MATRIX > rbg2abg_m.log  2>mtt_error.txt << EOF
  name = '$1'
  infofile = 'mtt_info.txt';
  %Convert from the fig version of the bonds to a structured version
  [rbonds,rstrokes,rcomponents,port_coord,port_name,port_list] = $1_rbg;
  [n_ports, junk] = size(port_list);
 
  [bonds,components] = rbg2abg(name,rbonds,rstrokes,rcomponents,port_coord,port_name,infofile);

  %Write the function m-file for the causal bond graph
  filename = '$1_abg.m';
  filenum = fopen(filename,'w');
  c = '%';
  fprintf(filenum, 'function [bonds,components,n_ports] = $1_abg\n');
  fprintf(filenum, '%s [bonds,components,n_ports] = $1_abg\n', c);
  fprintf(filenum, '%s Acausal bond graph created by MTT on %s\n\n', ...
                     c, date);
  mat2mfile(bonds, 'bonds', filenum);
  mat2mfile(components, 'components', filenum);
  fprintf(filenum, 'n_ports = %1.0f;\n', n_ports);

EOF
︙︙

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