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
Hide Diffs Unified Diffs Ignore Whitespace Patch

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

# Copyright (c) P.J.Gawthrop 1996

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$



###############################################################

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

# Remove the old log file








>
>
>








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


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

OUT "$1_numpar.m";

write "function numpar = $1_numpar;";



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




SHUT "$1_numpar.m";

OUT "$1_parconv.m";

write "[ ...";

IF MTTNvar>0 THEN
BEGIN
  FOR i := 1:MTTNvar DO
  BEGIN

    write MTTVar(i,1), ", ...";


  END;
END;

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

IF MTTNvar>0 THEN
BEGIN








>
>







|
>
>
>





|





>
|
>
>








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
ELSE
  write "numpar = []";


SHUT "$1_numpar.m";

OUT "$1_parconv.m";

write "function [ ...";

IF MTTNvar>0 THEN
BEGIN
  FOR i := 1:MTTNvar DO
  BEGIN
    IF i<MTTNvar THEN
      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 ]