/[ascend]/trunk/models/steam/iapwssat.a4c
ViewVC logotype

Diff of /trunk/models/steam/iapwssat.a4c

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

revision 1269 by johnpye, Sat Feb 3 06:18:11 2007 UTC revision 1270 by johnpye, Sun Feb 4 01:01:18 2007 UTC
# Line 12  MODEL iapwssat REFINES iapwssatprops; Line 12  MODEL iapwssat REFINES iapwssatprops;
12  METHODS  METHODS
13  METHOD default_self;  METHOD default_self;
14      x := 0.5;      x := 0.5;
15      h := 3000 {kJ/kg};      h := 2800 {kJ/kg};
16      u := 2300 {kJ/kg};      u := 2300 {kJ/kg};
17      v := 100 {m^3/kg};      v := 100 {m^3/kg};
18      v.nominal := 0.01 {m^3/kg};      v.nominal := 0.01 {m^3/kg};
# Line 22  METHOD bound_self; Line 22  METHOD bound_self;
22      T.lower_bound := 273 {K};      T.lower_bound := 273 {K};
23  END bound_self;  END bound_self;
24  METHOD specify;  METHOD specify;
     RUN iapwssatprops::specify;  
25      FIX x;      FIX x;
26        RUN iapwssatprops::specify;
27  END specify;  END specify;
28  METHOD values;  METHOD values;
     RUN iapwssatprops::values;  
29      x := 0.5;      x := 0.5;
30        RUN iapwssatprops::values;
31  END values;  END values;
32  METHOD on_load;  METHOD on_load;
33      RUN default_self;      RUN default_self;

Legend:
Removed from v.1269  
changed lines
  Added in v.1270

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