Overview
Comment:Fixed various bugs.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 374eddf0e05e54517dbf19c31678d3e1bca30ad2a95e902405ddb7b5fd98cb3a
User & Date: gawthrop@users.sourceforge.net on 1996-08-11 10:41:52
Other Links: branch diff | manifest | tags
Context
1996-08-11
19:08:08
Parameter passing now enabled. check-in: a0161c78ec user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:41:52
Fixed various bugs. check-in: 374eddf0e0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
10:40:56
Added new numpar stuff.
Added step response.
check-in: ae56da63d4 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/bin/trans/sympar2numpar_r2m from [c5ec703796] to [1e44b3561c].

10
11
12
13
14
15
16



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







+
+
+







# Copyright (c) P.J.Gawthrop 1996

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1996/08/11 08:48:07  peter
## Initial revision
##
###############################################################

# Inform user
echo Creating $1_numpar.m
echo Creating $1_parconv.m

# Remove the old log file
31
32
33
34
35
36
37


38
39
40
41
42
43
44
45




46
47
48
49
50
51

52
53
54
55
56

57



58
59
60
61
62
63
64
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49

50
51
52
53
54
55
56
57
58

59
60
61
62
63
64
65

66
67
68
69
70
71
72
73
74
75







+
+







-
+
+
+
+





-
+





+
-
+
+
+








%Read the symbolic parameters file
IN "$1_sympar.r";

OUT "$1_numpar.m";

write "function numpar = $1_numpar;";
write "% function numpar = $1_numpar;";
write "% Created by MTT";

IF MTTNvar>0 THEN
BEGIN
  FOR i := 1:MTTNvar DO
  BEGIN
    write "numpar(",i , ") = 1;		% ", MTTVar(i,1);
  END;
END;
END
ELSE
  write "numpar = []";


SHUT "$1_numpar.m";

OUT "$1_parconv.m";

write "[ ...";
write "function [ ...";

IF MTTNvar>0 THEN
BEGIN
  FOR i := 1:MTTNvar DO
  BEGIN
    IF i<MTTNvar THEN
    write MTTVar(i,1), ", ...";
      write MTTVar(i,1), ", ..."
    ELSE
      write MTTVar(i,1), " ...";
  END;
END;

write "] = $1_parconv(numpar);";

IF MTTNvar>0 THEN
BEGIN


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