Overview
Comment:Geraint's temp. variable patch applied
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: f70a0140356b2e4d67439bef0a7567d1304330fb81f3e6f067b2299c2433f2d3
User & Date: gawthrop@users.sourceforge.net on 2001-02-03 14:00:01
Other Links: branch diff | manifest | tags
Context
2001-02-05
01:50:29
No unit type comparison at ports if either is "none". check-in: 3d05dc2bd4 user: geraint@users.sourceforge.net tags: origin/master, trunk
2001-02-03
14:00:01
Geraint's temp. variable patch applied check-in: f70a014035 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
13:54:02
Geraint's broken number patch applied check-in: 6a40005962 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/mtt_m2p from [7a06bff42c] to [0bcc94c670].

11
12
13
14
15
16
17



18
19
20
21
22
23
24
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27







+
+
+







# Copyright (c) P.J.Gawthrop 1998

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.63  2000/12/04 08:24:29  peterg
## Added swithc logic declarations
##
## Revision 1.62  2000/12/03 17:15:18  peterg
## *** empty log message ***
##
## Revision 1.61  2000/11/10 14:46:53  peterg
## More fixes to avoid interpering variables as funs - basicly all
## functions now have at least ()
##
496
497
498
499
500
501
502

503
504



505
506
507
508
509
510
511
499
500
501
502
503
504
505
506


507
508
509
510
511
512
513
514
515
516







+
-
-
+
+
+







          printf("\n")
          printf("VAR \n");
          for (k=1;k<i;k++) printf("  %s,\n",global[k])
          printf("%s : REAL;\n", global[i])
          printvar("x",Nx);
          printvar("u",Nu);
          printvar("y",Ny);
	  if ((rep=="ode")||(rep=="odeo")||(rep=="csex")||(rep=="cseo")||(rep=="smx")||(rep=="smxa")||(rep=="smxax")){
          printvar("_tmp",N_tmp);
          printvar("_s",N_tmp);
	    printvar("_tmp",N_tmp);
	    printvar("_s",N_tmp);
	  }
          printf("VAR mtt_i, mtt_j : INTEGER;\n");
          #if ( (rep=="smxa")||(rep=="smxax") ) {
          #  printvar("_t",Nt);
          #}
          printf("\nBEGIN{%s}\n", Sys_rep)
          if (rep=="smxa"){
            printf("FOR mtt_i:= 1 to %i DO\n\tFOR mtt_j:= 1 to %i DO\n\tmtta[mtt_i,mtt_j] := 0;\n", Nx,Nx);


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