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

Contents of /trunk/models/splitter.a4s

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1 - (show annotations) (download)
Fri Oct 29 20:54:12 2004 UTC (20 years, 3 months ago) by aw0a
File size: 1757 byte(s)
Setting up web subdirectory in repository
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 splitter.a4l
5
6 DELETE TYPES;
7 READ FILE "splitter.a4l";
8
9 COMPILE ts1 OF test_splitter;
10 BROWSE {ts1};
11 RUN {ts1.values};
12 RUN {ts1.reset};
13 SOLVE {ts1} WITH QRSlv;
14 DELETE SYSTEM;
15 ASSIGN {ts1.equil} true {*};
16 RUN {ts1.reset};
17 SOLVE {ts1} WITH QRSlv;
18
19 COMPILE ts2 OF test_splitter_with_shared_state;
20 BROWSE {ts2};
21 RUN {ts2.values};
22 RUN {ts2.reset};
23 SOLVE {ts2} WITH QRSlv;
24 DELETE SYSTEM;
25 ASSIGN {ts2.equil} TRUE;
26 RUN {ts2.reset};
27 SOLVE {ts2} WITH QRSlv;
28
29 ########## splitter.a4s ends here ##########
30 #
31 # splitter.a4s
32 # by Arthur W. Westerberg
33 # Part of the ASCEND Library
34 # $Date: 1998/06/17 20:08:46 $
35 # $Revision: 1.2 $
36 # $Author: mthomas $
37 # $Source: /afs/cs.cmu.edu/project/ascend/Repository/models/splitter.a4s,v $
38 #
39 # This file is part of the ASCEND Modeling Library.
40 #
41 # Copyright (C) 1998 Carnegie Mellon University
42 #
43 # The ASCEND Modeling Library is free software. You can redistribute
44 # it and/or modify it under the terms of the GNU General Public
45 # License as published by the Free Software Foundation---either
46 # version 2 of the License, or (at your option) any later version.
47 #
48 # The ASCEND Modeling Library is distributed in hope that it
49 # will be useful, but WITHOUT ANY WARRANTY--without even the implied
50 # warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
51 # See the GNU General Public License for more details.
52 #
53 # You should have received a copy of the GNU General Public License
54 # along with the program. If not, write to the Free Software
55 # Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check
56 # the file named COPYING.

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