Overview
| Comment: | Now uses fopen. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
7a89dd5b5450869405051b966e895ad2 |
| User & Date: | gawthrop@users.sourceforge.net on 1996-12-04 21:52:39.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
1996-12-04
| ||
| 21:53:00 | Initial revision check-in: cd45d5ef54 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 21:52:39 | Now uses fopen. check-in: 7a89dd5b54 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
| 21:52:01 | Uses filenum and fopen instead of filename. check-in: aaafe23054 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/m/rbg2abg.m
from [e879a1d07f]
to [708333555b].
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | function [bonds,components] = rbg2abg(rbonds,rstrokes,rcomponents,rports,infofile) % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.6 1996/08/25 08:27:14 peter % %% Now checks ports correctely - I hope. % %% % %% Revision 1.5 1996/08/24 19:21:26 peter % %% More specific error messages. % %% % %% Revision 1.4 1996/08/24 18:00:33 peter | > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | function [bonds,components] = rbg2abg(rbonds,rstrokes,rcomponents,rports,infofile) % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.7 1996/11/01 18:01:57 peterg % %% Rationalised port ordering. % %% Fixed port bug. % %% % %% Revision 1.6 1996/08/25 08:27:14 peter % %% Now checks ports correctely - I hope. % %% % %% Revision 1.5 1996/08/24 19:21:26 peter % %% More specific error messages. % %% % %% Revision 1.4 1996/08/24 18:00:33 peter |
| ︙ | ︙ | |||
131 132 133 134 135 136 137 138 139 140 141 142 143 144 |
mtt_info(sprintf('\t it must have ports from 1:%1.0f\n', n), ...
fnum);
end;
else
if k~=0
mtt_info(port_error,fnum);
mtt_info(sprintf('\t it must have 0 or %1.0f ports\n', n), fnum);
end;
end;
end;
end;
% Write out bond list sorted by port number (if any)
| > > > > > | 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 |
mtt_info(sprintf('\t it must have ports from 1:%1.0f\n', n), ...
fnum);
end;
else
if k~=0
mtt_info(port_error,fnum);
mtt_info(sprintf('\t it must have 0 or %1.0f ports\n', n), fnum);
port_str = sprintf('\t the ports are: ');
for kk=1:k
port_str=sprintf('%s %1.0f', port_str, port_number(kk));
end;
mtt_info(port_str, fnum);
end;
end;
end;
end;
% Write out bond list sorted by port number (if any)
|
| ︙ | ︙ |