Overview
Comment:Don't set port status if there aren't any ports.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: e6308d426702ce4e747e2700c3ec8d4902d398a6f5a151e4b70641a6d4c35091
User & Date: gawthrop@users.sourceforge.net on 1998-07-29 13:36:37
Other Links: branch diff | manifest | tags
Context
1998-07-29
13:56:34
Replces p2c include by local include. check-in: 4da39f367b user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:36:37
Don't set port status if there aren't any ports. check-in: e6308d4267 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
1998-07-28
19:08:22
Some vector aliases added. check-in: ef518acbf0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/abg2cbg.m from [bcdc587034] to [5675b837da].

15
16
17
18
19
20
21



22
23
24
25
26
27
28
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31







+
+
+







% [bonds,status] = abg2cbg(system_name, system_type, full_name, port_bonds, infofile)

% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.32  1998/07/28 19:06:11  peterg
% %% *** empty log message ***
% %%
% %% Revision 1.31  1998/07/28 13:15:10  peterg
% %% Vector SS ports included.
% %%
% %% Revision 1.30  1998/07/27 20:29:49  peterg
% %% Had another go at causality ....
% %%   1. Impose external causality onto all port bonds
% %%   2. Set C_cause.m so that it DOESN'T set causality
386
387
388
389
390
391
392

393
394



395
396
397
398
399
400
401
389
390
391
392
393
394
395
396


397
398
399
400
401
402
403
404
405
406







+
-
-
+
+
+







    ci_direction = sign(ci_bond_index);
    ci_bond_index = abs(ci_bond_index);
    bonds(ci_bond_index,1:2) = prefered*ci_direction'*[1 1];
  end;
  
end;

if n_ports>0
status(1:n_ports) = zeros(n_ports,1); # Port status not relevant

  status(1:n_ports) = zeros(n_ports,1); # Port status not relevant
endif;
	  
% Print final causality
final_done =  (sum(status==zeros(n_components,1))/n_components)*100;

if at_top_level
  mtt_info(sprintf('Final causality of %s is %3.0f%s complete.', ...
      full_name, final_done, pc), infofile);


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