/[ascend]/trunk/models/johnpye/heater.a4c
ViewVC logotype

Annotation of /trunk/models/johnpye/heater.a4c

Parent Directory Parent Directory | Revision Log Revision Log


Revision 576 - (hide annotations) (download) (as text)
Tue May 9 03:42:08 2006 UTC (14 years, 4 months ago) by johnpye
File MIME type: text/x-ascend
File size: 649 byte(s)
Changed all cases of *.fixed := {TRUE,FALSE} to 'FIX' and 'FREE' statements.
1 johnpye 90 REQUIRE "johnpye/steam_equipment.a4c";
2    
3     (** An abstract model for a steam equipment item *)
4    
5     MODEL heater REFINES steam_equipment;
6    
7     Qdot IS_A energy_rate;
8    
9     (* first law of thermo *)
10 johnpye 108 ((out.mdot*out.h) - (in.mdot*in.h)) = Qdot;
11 johnpye 90
12     (* no mass holdup *)
13     out.mdot, in.mdot ARE_THE_SAME;
14 johnpye 93 out.p, in.p ARE_THE_SAME;
15 johnpye 90 METHODS
16     METHOD default_self;
17     RUN ClearAll;
18     RUN specify;
19     RUN values;
20     END default_self;
21    
22     METHOD specify;
23 johnpye 576 FIX in.p;
24     FIX in.h;
25     FIX Qdot;
26 johnpye 90 END specify;
27    
28     METHOD values;
29 johnpye 108 (* fixed values *)
30 johnpye 90 in.p := 1 {bar};
31 johnpye 108 in.h := 2500 {kJ/kg};
32     Qdot := 1 {kW};
33     (* initial guesses *)
34     out.h := 2600 {kJ/kg};
35     out.p := 1 {bar};
36 johnpye 90 END values;
37    
38     END heater;

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