Overview
Comment: | Error check on bond numbers. |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | origin/master | trunk |
Files: | files | file ages | folders |
SHA3-256: |
a494ed7ce7ec908379d4ef4a74e2ebfb |
User & Date: | gawthrop@users.sourceforge.net on 1996-08-30 13:29:05 |
Other Links: | branch diff | manifest | tags |
Context
1996-08-30
| ||
14:36:46 |
Added some more subscripts. -- its high time this was rewritten in awk or perl!!! check-in: ac444aad4b user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
13:29:05 | Error check on bond numbers. check-in: a494ed7ce7 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
13:23:11 | Added bond number check check-in: b41a257865 user: gawthrop@users.sourceforge.net tags: origin/master, trunk | |
Changes
Modified mttroot/mtt/lib/comp/simple/FMR_cause.m from [2758d80e8b] to [2c8bca410f].
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | function [bonds,status] = FMR_cause(bonds); % Causality for Flow-modulated R component % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% status = -1; % There are 2 ports; extract the information e_1 = bonds(1,1); f_1 = bonds(1,2); e_2 = bonds(2,1); f_2 = bonds(2,2); | > > > > > > > > > | 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 | function [bonds,status] = FMR_cause(bonds); % Causality for Flow-modulated R component % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% Version control history % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % %% $Id$ % %% $Log$ % %% Revision 1.1 1996/08/09 08:28:02 peter % %% Initial revision % %% % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% status = -1; % Check that there are exactly two bonds. if check_bonds(bonds,2,'FMR')==0 return end % There are 2 ports; extract the information e_1 = bonds(1,1); f_1 = bonds(1,2); e_2 = bonds(2,1); f_2 = bonds(2,2); |
︙ | ︙ |