Overview
Comment:Now writes out a unique name for each state etc
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: f057e95f6ac8cdbf42e4315fe7b83f9730c1ccb44e52c3d60220f86fe6262d2c
User & Date: gawthrop@users.sourceforge.net on 2000-10-13 10:54:47.000
Other Links: branch diff | manifest | tags
Context
2000-10-13
10:56:07
Now uses the full name from the struc file - no need to recreate. check-in: 979f0c7c8f user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:54:47
Now writes out a unique name for each state etc check-in: f057e95f6a user: gawthrop@users.sourceforge.net tags: origin/master, trunk
09:55:09
Changed state/input name to $4_$3 check-in: 3e421efd79 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Side-by-Side Diff Ignore Whitespace Patch
Modified mttroot/mtt/bin/trans/m/cbg2ese.m from [988642e373] to [9c7d81661a].
︙
19
20
21
22
23
24
25



26
27
28
29
30
31
32

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








+
+
+








  ## Structure matrix [states,nonstates,inputs,outputs,zero_outputs]
  
  ## ###############################################################
  ## ## Version control history
  ## ###############################################################
  ## ## $Id$
  ## ## $Log$
  ## ## Revision 1.35  2000/10/12 19:27:47  peterg
  ## ## Now writes the aliased args
  ## ##
  ## ## Revision 1.34  2000/09/01 08:42:44  peterg
  ## ## Cahged somes ends to end for etc for clarity
  ## ##
  ## ## Revision 1.33  2000/09/01 08:05:32  peterg
  ## ## Reformatted with out changing function
  ## ##
  ## ## Revision 1.32  1998/11/16 13:01:19  peterg
︙
129
130
131
132
133
134
135

136

137
138
139
140
141
142
143

132
133
134
135
136
137
138
139

140
141
142
143
144
145
146
147








+
-
+








  ## ## Sorted out file naming sceme
  ## ##
  ## ## Revision 1.1  1996/08/08 15:53:23  peter
  ## ## Initial revision
  ## ##
  ## #############################################################
  
  disp("cbg2ese");
  system_name, system_type, full_name,
  system_name, system_type, full_name, repetition
  
  pc = "%";
  
  ## Set up the names corresponding to the structure matrix.
  structure_name = [
		    "state        ",
		    "nonstate     ",
︙
250
251
252
253
254
255
256
257

258
259
260
261
262
263
264

254
255
256
257
258
259
260

261
262
263
264
265
266
267
268








-
+








    	  endif;
	endif;
	
	if AliasingCRs	# Alias the CR list if appropriate
    	  message = sprintf("\tfor component  %s (%s) within %s",\
			    comp_name,subsystem.type,full_name);    
    	  if struct_contains(CBG,"alias")
	    subsystem.cr = alias_args(subsystem.cr,CBG.alias,";",message,infofilenum)
	    subsystem.cr = alias_args(subsystem.cr,CBG.alias,";",message,infofilenum,full_name)
    	  endif;
	endif;
	
	## Substitute positional ($1 etc) arguments
    	subsystem.cr = subs_arg(subsystem.cr,system_cr, ...
				"lin",full_name,subsystem.type,comp_name,infofilenum);
    	subsystem.arg = subs_arg(subsystem.arg,system_args, ...
︙
391
392
393
394
395
396
397
398

399
400

401
402
403
404
405
406
407

395
396
397
398
399
400
401

402
403

404
405
406
407
408
409
410
411








-
+

-
+








 	      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", ...
			  "%s\t%i\t%s\t%s_%s\t%i\n", ...
			  structure_name(which_index,:), value-k+1, ...
			  comp_name, full_name, repetition);
			  comp_name, full_name_repetition, comp_name, repetition);
	    	endfor;
 	      endfor;
 	    endif;
	  endif
	endfor
      endfor			# [subsystem,comp_name] = CBG_field
    endif			# struct_contains(CBG,field)
︙
MTT: Model Transformation Tools
[ GitHub | SourceHut | Sourceforge | Fossil RSS ]