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

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

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

revision 1055 by johnpye, Sat Jan 6 14:47:13 2007 UTC revision 1056 by johnpye, Sat Jan 6 15:04:40 2007 UTC
# Line 13  METHOD specify; Line 13  METHOD specify;
13  END specify;  END specify;
14  METHOD values;  METHOD values;
15      RUN iapwssat::values;      RUN iapwssat::values;
16        T := 373.15 {K};
17      mdot := 0.1 {kg/s};      mdot := 0.1 {kg/s};
18  END values;  END values;
19  METHOD bound_self;  METHOD bound_self;
# Line 26  METHOD on_load; Line 27  METHOD on_load;
27  END on_load;  END on_load;
28  METHOD self_test;  METHOD self_test;
29      ASSERT mdot == 0.1 {kg/s};      ASSERT mdot == 0.1 {kg/s};
30      ASSERT abs(p - 101.325{kPa}) < 0.0005{kPa};      ASSERT abs(p - 101.418{kPa}) < 0.0005{kPa};
31      ASSERT abs(h - 1547.387{kJ/kg}) < 0.0005{kJ/kg};      ASSERT abs(h - 1547.4616{kJ/kg}) < 0.0005{kJ/kg};
32      ASSERT Hdot == h*mdot;      ASSERT Hdot == h*mdot;
33  END self_test;  END self_test;
34  END satsteamstream;  END satsteamstream;

Legend:
Removed from v.1055  
changed lines
  Added in v.1056

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