/[ascend]/trunk/models/johnpye/fprops/rankine_fprops.a4c
ViewVC logotype

Diff of /trunk/models/johnpye/fprops/rankine_fprops.a4c

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

revision 2289 by jpye, Sat Aug 14 10:52:06 2010 UTC revision 2290 by jpye, Sun Aug 15 10:11:54 2010 UTC
# Line 64  METHODS Line 64  METHODS
64  METHOD default;  METHOD default;
65      p := 10{bar};      p := 10{bar};
66      p.nominal := 42 {bar};      p.nominal := 42 {bar};
67      h := 2000 {kJ/kg};      IF cd.component == 'water' THEN
68            h := 2000 {kJ/kg};
69        ELSE
70            IF cd.component == 'carbondioxide' THEN
71                h := 350 {kJ/kg};
72            ELSE
73                h := 350 {kJ/kg};
74            END IF;
75        END IF;
76    
77      T := 400 {K};      T := 400 {K};
78      v.nominal := 10 {L/kg};      v.nominal := 10 {L/kg};
# Line 118  MODEL stream_state_test_co2 REFINES stre Line 126  MODEL stream_state_test_co2 REFINES stre
126  METHODS  METHODS
127  METHOD on_load;  METHOD on_load;
128      RUN default_all;      RUN default_all;
129        h := 350 {kJ/kg};
130      FIX p, x;      FIX p, x;
131      p := 8 {kPa};      p := 9 {kPa};
132      x := 1e-6;      x := 1e-6;
133      SOLVER QRSlv;      SOLVER QRSlv;
134      OPTION convopt 'RELNOM_SCALE';      OPTION convopt 'RELNOM_SCALE';

Legend:
Removed from v.2289  
changed lines
  Added in v.2290

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