Overview
Comment:Now writes correct structure file for multiport C & I
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 61f43ff9b874a10a843f8d72bdc543683c03e39e9dfec89d48aa2967939ef741
User & Date: gawthrop@users.sourceforge.net on 1998-03-06 09:38:58
Other Links: branch diff | manifest | tags
Context
1998-03-06
15:51:06
Zapped the irritating error message check-in: ed3e9e39a4 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:38:58
Now writes correct structure file for multiport C & I check-in: 61f43ff9b8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:15:28
Ignores SS fields (assumes that if first field is a symbol then other
field is and SS-style field.
check-in: 9cc4fc0809 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/cbg2ese.m from [f469aeb38e] to [8ac926ffb4].

18
19
20
21
22
23
24



25
26
27
28
29
30
31
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34







+
+
+







% Structure matrix [states,nonstates,inputs,outputs,zero_outputs]

% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% Version control history
% %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %% $Id$
% %% $Log$
% %% Revision 1.15  1997/12/16 18:24:33  peterg
% %% Added unknown_input to structure list
% %%
% %% Revision 1.14  1997/08/26 07:51:10  peterg
% %% Now counts the local input and outputs by order of appearence rather
% %% than by port number - it therfore handles ports with bicausality correctely.
% %%
% %% Revision 1.13  1997/05/19 16:45:56  peterg
% %% Fixed ISW bug -- deleted spurious ISW_eqn.m file
% %%
281
282
283
284
285
286
287


288
289
290
291





292
293
294
295
296
297
298
284
285
286
287
288
289
290
291
292




293
294
295
296
297
298
299
300
301
302
303
304







+
+
-
-
-
-
+
+
+
+
+







	
	structure_change = structure_change>zeros(size(structure_change));
 	if structure_changes>0
 	  which_indices = getindex(structure_change,1);
 	  which_indices = which_indices(:,2)';
 	  for which_index=which_indices
 	    value = structure(which_index);
	    value_change=value-old_structure(which_index);
	    for k=1:value_change
 	    fprintf(structure_file, ...
 		'%s\t%1.0f\t%s\t%s\t%1.0f\n', ...
 		structure_name(which_index,:), value, ...
 		comp_name, full_name, repetition);
	      fprintf(structure_file, ...
		  '%s\t%1.0f\t%s\t%s\t%1.0f\n', ...
		  structure_name(which_index,:), value-k+1, ...
		  comp_name, full_name, repetition);
	      end;
 	    end;
 	  end;
	
      end;
    end;
  end;


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