Overview
Comment:numerical names prefixed by mtt
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: f89bd96e20f5b31003d616e7284c798cc63fbd059d1d955e438864274bfcf5bc
User & Date: gawthrop@users.sourceforge.net on 1998-08-26 12:31:07
Other Links: branch diff | manifest | tags
Context
1998-08-26
12:45:38
Just prefix ports (comps can't start with numeral)
Prefix with mttp
check-in: fac295bf99 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:31:07
numerical names prefixed by mtt check-in: f89bd96e20 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
12:26:17
Replaced if N>0 by if (N>0)&&(M>0) # Flipped ports exist check-in: bb06871be9 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/m/write_abg.m from [b7c5c6ac25] to [43595fcf36].

1
2
3
4
5
6
7



8
9
10
11
12
13
14
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17







+
+
+







function write_abg(system_name,bonds,connections);

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.2  1998/08/26 11:59:20  peterg
## Don't use strrep to remove[]
##
## Revision 1.1  1998/08/25 06:22:02  peterg
## Initial revision
##
###############################################################


  fid=fopen([system_name,"_abg.m"], "w");
28
29
30
31
32
33
34




35
36
37
38
39
40
41
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48







+
+
+
+








  
  fprintf(fid,"\n# Subsystems and Ports\n");
  i_port=0;
  for i=1:N
    eval(["[comp_type, name, cr, arg, repetitions] = ", system_name, "_cmp(i);"]);

    ch=name(1);			# First char of name
    if (ch>="0")&&(ch<="9")	# Its a numeral
      name=["mtt",name];	# prefix by mtt
    endif;
    
    if index(name,"[")==0	# Not a port
      fprintf(fid,"\n# Component %s\n", name);
      fprintf(fid,Sformat,system_name,name,"type",comp_type);
      fprintf(fid,Sformat,system_name,name,"cr",cr);
      fprintf(fid,Sformat,system_name,name,"arg",arg);
      fprintf(fid,Iformat,system_name,name,"repetitions",repetitions);


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