30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
# Inform user
echo Creating ${ibg}
# Use matrix manipulation to accomplish the transformation
${MATRIX} > ${log} 2> ${err} <<EOF
name = '$1'
infofile = fopen('mtt_info.txt', 'w');
errorfile = fopen('mtt_error.txt', 'w');
## Interpret the connections from the fig version
[rbonds,rstrokes,rcomponents,port_coord,port_name,port_list] = $1_rbg;
[n_ports, junk] = size(port_list);
## Strip the directional information
rbonds = rbonds(:,1:6);
|
|
|
|
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
|
# Inform user
echo Creating ${ibg}
# Use matrix manipulation to accomplish the transformation
${MATRIX} > ${log} 2> ${err} <<EOF
name = '$1'
infofile = fopen('mtt_info.txt', 'wt');
errorfile = fopen('mtt_error.txt', 'wt');
## Interpret the connections from the fig version
[rbonds,rstrokes,rcomponents,port_coord,port_name,port_list] = $1_rbg;
[n_ports, junk] = size(port_list);
## Strip the directional information
rbonds = rbonds(:,1:6);
|