Overview
| Comment: | Now checks to see if sub system is a simple component before recursion. 0 --> zero 1 --> one |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
f0fed5ab50bcba68b6bc7dbb67283778 |
| User & Date: | gawthrop@users.sourceforge.net on 1997-05-16 07:33:45.000 |
| Other Links: | branch diff | manifest | tags |
Context
|
1997-05-19
| ||
| 11:29:37 | Added desc.tex and abg.tex descriptions. check-in: 78dddad28c user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1997-05-16
| ||
| 07:33:45 |
Now checks to see if sub system is a simple component before recursion. 0 --> zero 1 --> one check-in: f0fed5ab50 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
|
1997-05-15
| ||
| 09:44:12 | Put switches into the input file. check-in: 6128db788b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/bin/trans/m/cbg2fig.m
from [7021a58a40]
to [1134e48f37].
| ︙ | ︙ | |||
22 23 24 25 26 27 28 29 30 31 32 33 34 35 | % Copyright (c) P.J.Gawthrop, 1996. % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.3 1996/08/08 15:52:28 peter % %% Recursive version. % %% Fails due to octave bug - reported. % %% % %% Revision 1.2 1996/08/05 20:15:39 peter % %% Prepared for recursive version. % %% | > > > | 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 | % Copyright (c) P.J.Gawthrop, 1996. % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.4 1996/12/07 21:34:52 peterg % %% Tests for null string with strcmp % %% % %% Revision 1.3 1996/08/08 15:52:28 peter % %% Recursive version. % %% Fails due to octave bug - reported. % %% % %% Revision 1.2 1996/08/05 20:15:39 peter % %% Prepared for recursive version. % %% |
| ︙ | ︙ | |||
199 200 201 202 203 204 205 |
Terminator = [bs, '001'];
for j = 1:length(fig_params)
fprintf(filenum, '%1.0f ', fig_params(j));
end;
fprintf(filenum, '%1.0f %1.0f ', coords(1), coords(2));
fprintf(filenum, '%s:%s%s\n', comp_type, comp_name, Terminator);
| | > > > > > > > > > | | | | > > | 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 |
Terminator = [bs, '001'];
for j = 1:length(fig_params)
fprintf(filenum, '%1.0f ', fig_params(j));
end;
fprintf(filenum, '%1.0f %1.0f ', coords(1), coords(2));
fprintf(filenum, '%s:%s%s\n', comp_type, comp_name, Terminator);
% If it's a subsystem (ie not a component), do the fig file for that as
% well
if comp_type=='0'
comp_type='zero';
end
if comp_type=='1'
comp_type='one';
end
if (exist([comp_type,'_cause'])==0)
cbg2fig(comp_name, ...
comp_type, full_name, ...
stroke_length, stroke_thickness, stroke_colour, ...
comp_font, comp_colour_u, comp_colour_o);
end;
end;
% Close the file
fclose(filenum);
return
|
| ︙ | ︙ |