Overview
Comment:Now get parameters for simpar file.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: aac26c96bad31732a0177c41599358859d746659a90bbe8695da3a670f27a416
User & Date: gawthrop@users.sourceforge.net on 1998-07-27 20:27:25
Other Links: branch diff | manifest | tags
Context
1998-07-27
20:29:49
Had another go at causality ....
1. Impose external causality onto all port bonds
2. Set C_cause.m so that it DOESN'T set causality
-- I_cause is already ok ! check-in: b4b9bc1d47 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:27:25
Now get parameters for simpar file. check-in: aac26c96ba user: gawthrop@users.sourceforge.net tags: origin/master, trunk
20:26:44
Put in correct N and M values for dm rep check-in: b90651ef41 user: gawthrop@users.sourceforge.net tags: origin/master, trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Modified mttroot/mtt/bin/trans/dm2fr_m from [e1232d03cf] to [fda871e4a8].

︙
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, 1996.

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.9  1998/02/26 15:12:26  peterg
## Removed parameter stuff
##
# Revision 1.8  1996/08/30  14:54:36  peter
# Took back lock.
#
## Revision 1.7  1996/08/24  14:23:00  peter
## Global parameter passing.
## Proper error handling.
#
︙
60
61
62
63
64
65
66

67
68



69
70
71
72

73
74






75






76
77
78
79
80
81
82

63
64
65
66
67
68
69
70
71
72
73
74
75
76

77
78
79


80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99








+


+
+
+

-


+
-
-
+
+
+
+
+
+

+
+
+
+
+
+








#  echo Using default parameter $PARAMS
#else
#  PARAMS=$2;
#fi

$MATRIX << EOF > dm2fr_m.log 2>mtt_error.txt

# Data
  $1_numpar;

# Simulation parameters
  $1_simpar;

  [nx,ny,nu,nz,nyz] = $1_def
%  $PARAMS

  %Defaults
  
  if exist('W')==0
    W = logspace(-1,2,100)';
  if exist('mttWMIN')==0
    mttWMIN = -1;
  end;

  if exist('mttWMAX')==0
    mttWMAX = 2;
  end;

  if exist('mttWSTEPS')==0
    mttWSTEPS = 100;
  end;

  W = logspace(mttWMIN,mttWMAX,mttWSTEPS)';

  if exist('u0')==0
    u0 = zeros(nu,1);
    u0(1) = 1;
  end;
︙

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