Overview
Comment:*** empty log message ***
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 0582eef974fdf6967a1b91530a132d1b62c9633c916b1a1d1f5e57101e7e4230
User & Date: gawthrop@users.sourceforge.net on 2000-08-24 08:30:45
Other Links: branch diff | manifest | tags
Context
2000-08-24
08:53:35
New makesubs to create a .subs.r file with output switches to simplify output. check-in: 128979d078 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
08:30:45
*** empty log message *** check-in: 0582eef974 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
2000-08-17
12:43:31
Modified for Levenberg-Marquardt opt. check-in: d3ce11830e user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/mtt_m2p from [e0d8e66925] to [accd586500].

︙
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.51  2000/08/01 12:25:24  peterg
## Some changes to include files
##
## Revision 1.50  2000/05/19 17:46:41  peterg
## New version of state with par argument
##
## Revision 1.49  2000/05/18 09:45:45  peterg
## Fixed missing ;
##
## Revision 1.48  2000/05/18 09:39:38  peterg
︙
475
476
477
478
479
480
481
482
483


484

485
486
487
488
489
490
491

478
479
480
481
482
483
484


485
486

487
488
489
490
491
492
493
494








-
-
+
+
-
+








        if ($1=="if") {
          sub(/==/, "=", $0)
            gsub(/&&/," AND ",$0)
            gsub(/\|\|/," OR ",$0)
          printf("%s THEN BEGIN\n", $0)
        }
        else { 
          if ((match($1,"mtt_write")>0)&&(length(Stdin)>0)) {
           sub(/mtt_write/, "if NOT eof THEN mtt_write");
          #if ((match($1,"mtt_write")>0)&&(length(Stdin)>0)) {
          # sub(/mtt_write/, "if NOT eof THEN mtt_write");
          }
          #}
          if ($1=="for"){
            if (($2=="it")&&(length(Stdin)>0)){
	      printf("WHILE NOT eof DO BEGIN {Integration loop}\n")
            }
            else {
              sub(/:/," TO ",$0)
              sub(/=/,":=",$0)
︙

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