trunk/models/plotbvp.a4s

#  This file is part of the ASCEND Modeling Library.
#
#  Copyright (C) 1998 Carnegie Mellon University
#
#  The ASCEND Modeling Library is free software. You can redistribute
#  it and/or modify it under the terms of the GNU General Public
#  License as published by the Free Software Foundation---either
#  version 2 of the License, or (at your option) any later version.
#
#  The ASCEND Modeling Library is distributed in hope that it
#  will be useful, but WITHOUT ANY WARRANTY--without even the implied
#  warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
#  See the GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with the program.  If not, write to the Free Software
#  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA.  Check
#  the file named COPYING.

#  by Ben Allan, May 1998

DELETE TYPES;
READ FILE "plotbvp.a4c";

COMPILE pbd OF plotbvp;
RUN pbd.reset;
SOLVE pbd
PLOT {pbd.Plot_Y};
SHOW LAST;
1	# This file is part of the ASCEND Modeling Library.
2	#
3	# Copyright (C) 1998 Carnegie Mellon University
4	#
5	# The ASCEND Modeling Library is free software. You can redistribute
6	# it and/or modify it under the terms of the GNU General Public
7	# License as published by the Free Software Foundation---either
8	# version 2 of the License, or (at your option) any later version.
9	#
10	# The ASCEND Modeling Library is distributed in hope that it
11	# will be useful, but WITHOUT ANY WARRANTY--without even the implied
12	# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
13	# See the GNU General Public License for more details.
14	#
15	# You should have received a copy of the GNU General Public License
16	# along with the program. If not, write to the Free Software
17	# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check
18	# the file named COPYING.
19
20	# by Ben Allan, May 1998
21
22	DELETE TYPES;
23	READ FILE "plotbvp.a4c";
24
25	COMPILE pbd OF plotbvp;
26	RUN pbd.reset;
27	SOLVE pbd
28	PLOT {pbd.Plot_Y};
29	SHOW LAST;