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: |
cd997a8a68322cbaf847ae9b18f4ffc4 |
User & Date: | gawthrop@users.sourceforge.net on 1996-09-12 11:00:56 |
Other Links: | branch diff | manifest | tags |
Context
1996-09-12
| ||
11:18:26 | Initial revision check-in: 7f13d5cb88 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
11:00:56 | Initial revision check-in: cd997a8a68 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
1996-09-11
| ||
13:35:14 | New equation.m method used. check-in: 26f1a9f2b8 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Added mttroot/mtt/lib/comp/simple/R_eqn.m version [176423af2e].
> > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > | 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 | function structure = R_eqn(name,bond_number,bonds,direction,cr,args, ... structure,eqnfile); % R_eqn - Equation function for a (multi-port) unicausal R component % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %%%%% Model Transformation Tools %%%%% % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Matlab function R_eqn % structure = R_eqn(name,bond_number,bonds,direction,cr,args, ... % structure,eqnfile) % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % Copyright (c) P.J. Gawthrop, 1996. if nargin<8 eqnfile = 'stdout'; end; % Find the number of ports [ports,junk] = size(bonds); for outport = 1:ports outcause = -bonds(outport,1); outnumber = bond_number(outport); fprintf(eqnfile, '%s\t:= ', varname(name,outnumber, outcause)); incause = bonds(:,1); eqn = equation(name,cr,args,outnumber,outcause,outport, ... bond_number,incause,1:ports); fprintf(eqnfile, '%s',eqn); end; |