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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 90 - (show annotations) (download) (as text)
Wed Dec 7 16:03:44 2005 UTC (19 years, 1 month ago) by johnpye
File MIME type: text/x-ascend
File size: 398 byte(s)
Adding some more (under development) models...
1 REQUIRE "johnpye/steam_stream.a4c";
2
3 (** An abstract model for a steam equipment item *)
4
5 MODEL steam_equipment;
6 in IS_A steam_stream;
7 out IS_A steam_stream;
8
9 METHODS
10 METHOD default_self;
11 RUN ClearAll;
12 RUN specify;
13 RUN values;
14 END default_self;
15
16 METHOD specify;
17 RUN in.specify;
18 RUN out.specify;
19 END specify;
20
21 METHOD values;
22 RUN in.values;
23 RUN out.values;
24 END values;
25
26 END steam_equipment;

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