Overview
| Comment: | Now get parameters for simpar file. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | origin/master | trunk |
| Files: | files | file ages | folders |
| SHA3-256: |
aac26c96bad31732a0177c4159935885 |
| User & Date: | gawthrop@users.sourceforge.net on 1998-07-27 20:27:25.000 |
| 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
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 | # Copyright (c) P.J.Gawthrop, 1996. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ # 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. # | > > > | 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 | # echo Using default parameter $PARAMS #else # PARAMS=$2; #fi $MATRIX << EOF > dm2fr_m.log 2>mtt_error.txt $1_numpar; [nx,ny,nu,nz,nyz] = $1_def | > > > > < > | > > | > > > > > > > > | 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
%Defaults
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;
|
| ︙ | ︙ |