/[ascend]/trunk/models/simpleunits.a4s
ViewVC logotype

Contents of /trunk/models/simpleunits.a4s

Parent Directory Parent Directory | Revision Log Revision Log


Revision 469 - (show annotations) (download)
Mon Apr 17 03:21:29 2006 UTC (13 years, 7 months ago) by ben.allan
File size: 2269 byte(s)
getting rid of executable bits.
1 # This file is part of the ASCEND Modeling Library and is released
2 # under the GNU Public License as described at the end of this file.
3 #
4 # This file demonstrates the use of simpleunits.a4c
5
6 # common set of statements to set up testing of models in
7 # simpleunits.a4c. These load the correct files for all subsequent
8 # testing. These models allow the streams to have different
9 # components in them.
10
11 DELETE TYPES;
12 READ FILE "simpleunits.a4c";
13
14
15 # remaining statements needed to test unit with
16 # one feed, one product
17
18 COMPILE t11 OF testUnitOneInOneOut;
19 BROWSE {t11};
20 RUN {t11.values};
21 RUN {t11.specify};
22 SOLVE {t11} WITH QRSlv;
23
24
25 # remaining statements needed to test unit with
26 # one feed, two products
27
28 COMPILE t12 OF testUnitOneInTwoOut;
29 BROWSE {t12};
30 RUN {t12.values};
31 RUN {t12.specify};
32 SOLVE {t12} WITH QRSlv;
33
34
35 # remaining statements needed to test unit with
36 # two feeds, one product
37
38 COMPILE t21 OF testUnitTwoInOneOut;
39 BROWSE {t21};
40 RUN {t21.values};
41 RUN {t21.specify};
42 SOLVE {t21} WITH QRSlv;
43
44
45 # test simple compressor
46
47 COMPILE tsc OF testSimpleCompressor;
48 BROWSE {tsc};
49 RUN {tsc.values};
50 RUN {tsc.reset};
51 SOLVE {tsc} WITH QRSlv;
52 ASSIGN {tsc.equil} true {*};
53 SOLVE {tsc} WITH QRSlv;
54
55 ########## simpleunits.a4s ends here ##########
56 #
57 # simpleunits.a4s
58 # by Arthur W. Westerberg
59 # Part of the ASCEND Library
60 # $Date: 2006/04/10 10:08:42 $
61 # $Revision: 1.95 $
62 # $Author: a.westerberg $
63 #
64 # This file is part of the ASCEND Modeling Library.
65 #
66 # Copyright (C) 1998 Carnegie Mellon University
67 #
68 # The ASCEND Modeling Library is free software. You can redistribute
69 # it and/or modify it under the terms of the GNU General Public
70 # License as published by the Free Software Foundation---either
71 # version 2 of the License, or (at your option) any later version.
72 #
73 # The ASCEND Modeling Library is distributed in hope that it
74 # will be useful, but WITHOUT ANY WARRANTY--without even the implied
75 # warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
76 # See the GNU General Public License for more details.
77 #
78 # You should have received a copy of the GNU General Public License
79 # along with the program. If not, write to the Free Software
80 # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check
81 # the file named COPYING.

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