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

Contents of /trunk/models/vesselPlot.a4s

Parent Directory Parent Directory | Revision Log Revision Log


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

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