Overview
Comment: | Initial revision |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
76b592194083be9be1d12a45efd1eff9 |
User & Date: | gawthrop@users.sourceforge.net on 1996-08-24 14:53:06 |
Other Links: | branch diff | manifest | tags |
Context
1996-08-24
| ||
14:58:56 | Fixed missprint - mtt_err --> mtt_error check-in: 85c83285a0 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
14:53:06 | Initial revision check-in: 76b5921940 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
14:40:31 | Error handling included. check-in: 262fb60e41 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Added mttroot/mtt/bin/trans/makecr version [4d2c8927a5].
> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 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 65 66 67 | #! /bin/sh ###################################### ##### Model Transformation Tools ##### ###################################### # Bourne shell script: mtt # Usage: mtt system_name representation_name # E.g.: # mtt dc mtf # converts dc to matlab transfer function form. # # P.J.Gawthrop Oct 1989, Dec 1989, 1990, 1991, Oct 1993, Dec 1993, Jan 1994. # Copyright (c) P.J.Gawthrop, 1989, 1990, 1991, 1993, 1994. ############################################################### ## Version control history ############################################################### ## $Id$ ## $Log$ ############################################################### #Inform user echo Creating $1_cr.r cat - > $1_cr.r << EOF %Default CR file %File $1_cr.r %Generated by MTT %Unity CR OPERATOR Unity; FOR ALL Causality,Input LET Unity(Causality,Input) = Input; %Linear CR: e = Gain*f (if DefaultCausality = flow) % f = Gain*e (if DefaultCausality = effort) OPERATOR Lin; FOR ALL DefaultCausality, Gain, Causality, Input SUCH THAT Causality = DefaultCausality LET Lin(DefaultCausality, Gain, Causality, Input) = Gain*Input; %Linear CR: e = (1/Gain)*f (if DefaultCausality = flow) % f = (1/Gain)*e (if DefaultCausality = effort) FOR ALL DefaultCausality, Gain, Causality, Input SUCH THAT Causality NEQ DefaultCausality LET Lin(DefaultCausality, Gain, Causality, Input) = (1/Gain)*Input; %Default CR % -- Unity CR OPERATOR Default; FOR ALL Causality,Input LET Default(Causality,Input) = Unity(Causality,Input); END; EOF |