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.9 1998/07/08 08:24:26 peterg
## Added -I option -- if set prints out the indormation messages
##
## Revision 1.8 1998/02/19 08:57:02 peterg
## Fixed mtt-info bug -- confused filename with number
##
## Revision 1.7 1997/08/05 08:38:23 peterg
|
>
>
>
|
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.10 1998/07/08 15:34:56 peterg
## Sorted out error exit status
##
## Revision 1.9 1998/07/08 08:24:26 peterg
## Added -I option -- if set prints out the indormation messages
##
## Revision 1.8 1998/02/19 08:57:02 peterg
## Fixed mtt-info bug -- confused filename with number
##
## Revision 1.7 1997/08/05 08:38:23 peterg
|
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
#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';
errorfile = 'mtt_error.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,errorfile);
|
|
|
|
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
|
#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 = fopen('mtt_info.txt', 'w');
errorfile = fopen('mtt_error.txt', 'w');
%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,errorfile);
|