/[ascend]/trunk/models/johnpye/datareader/testtmy.a4c
ViewVC logotype

Diff of /trunk/models/johnpye/datareader/testtmy.a4c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 812 by johnpye, Fri Aug 11 04:22:18 2006 UTC revision 813 by johnpye, Fri Aug 11 04:35:15 2006 UTC
# Line 1  Line 1 
1  IMPORT "johnpye/datareader/datareader";  REQUIRE "ivpsystem.a4l";
2  REQUIRE "atoms.a4l";  REQUIRE "atoms.a4l";
3    
4    IMPORT "johnpye/datareader/datareader";
5    
6  MODEL drconf;  MODEL drconf;
7      filename IS_A symbol_constant;      filename IS_A symbol_constant;
8      format IS_A symbol_constant;      format IS_A symbol_constant;
# Line 12  MODEL testtmy; Line 14  MODEL testtmy;
14      G IS_A solver_var;      G IS_A solver_var;
15      Gbn IS_A solver_var;      Gbn IS_A solver_var;
16      G2 IS_A solver_var;      G2 IS_A solver_var;
17        E IS_A solver_var; (* total radiation *)
18      tmydata IS_A drconf;      tmydata IS_A drconf;
19      tmydata.filename :== '/home/john/src/ascend/models/johnpye/datareader/23161.tm2';      tmydata.filename :== '/home/john/src/ascend/models/johnpye/datareader/23161.tm2';
20    
# Line 34  METHOD on_load; Line 36  METHOD on_load;
36  END on_load;  END on_load;
37    
38  METHOD specify;  METHOD specify;
39        E.ode_id := 1; E.ode_type := 1;
40        G.ode_id := 1; G.ode_type := 2;
41    
42        t.ode_type :=-1;    
43      FIX t;      FIX t;
44  END specify;  END specify;
45    

Legend:
Removed from v.812  
changed lines
  Added in v.813

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22