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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 90 - (hide 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 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     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