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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 90 - (show annotations) (download) (as text)
Wed Dec 7 16:03:44 2005 UTC (14 years, 9 months ago) by johnpye
File MIME type: text/x-ascend
File size: 537 byte(s)
Adding some more (under development) models...
1 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 in.mdot * in.h + Qdot = out.mdot * out.h;
11
12 (* no mass holdup *)
13 out.mdot, in.mdot ARE_THE_SAME;
14
15 METHODS
16 METHOD default_self;
17 RUN ClearAll;
18 RUN specify;
19 RUN values;
20 END default_self;
21
22 METHOD specify;
23 RUN in.specify;
24 Qdot.fixed := TRUE;
25 END specify;
26
27 METHOD values;
28 in.T := 400 {K};
29 in.p := 1 {bar};
30 Qdot := 2.4 {kW};
31 END values;
32
33 END heater;

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