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 reactor.a4l |
5 |
|
6 |
DELETE TYPES; |
7 |
READ FILE "reactor.a4l"; |
8 |
source "$env(ASCENDDIST)/models/set_intervals.tcl"; |
9 |
|
10 |
#Single Phase Reactor |
11 |
COMPILE react OF test_single_phase_cstr; |
12 |
BROWSE {react}; |
13 |
ASSIGN {react.dynamic} FALSE {*}; |
14 |
RUN {react.reset}; |
15 |
RUN {react.values}; |
16 |
SOLVE {react} WITH QRSlv; |
17 |
RUN {react.check_all}; |
18 |
ASSIGN {react.dynamic} TRUE {*}; |
19 |
RUN {react.reactor.seqmod}; |
20 |
RUN {react.reactor.set_ode}; |
21 |
RUN {react.reactor.set_obs}; |
22 |
set_int 100 1 {s}; |
23 |
ASSIGN {react.input.f['n_butane']} 110 {kmol/hr}; |
24 |
INTEGRATE react FROM 0 TO 99 WITH BLSODE; |
25 |
|
26 |
#Multiple Phase Reactor / Reactive Tray |
27 |
COMPILE m_reac OF test_multiple_phase_cstr; |
28 |
BROWSE {m_reac}; |
29 |
ASSIGN {m_reac.dynamic} FALSE {*}; |
30 |
RUN {m_reac.reset}; |
31 |
RUN {m_reac.values}; |
32 |
SOLVE {m_reac} WITH QRSlv; |
33 |
RUN {m_reac.check_all}; |
34 |
ASSIGN {m_reac.dynamic} TRUE; |
35 |
RUN {m_reac.reactor.seqmod}; |
36 |
RUN {m_reac.reactor.set_ode}; |
37 |
RUN {m_reac.reactor.set_obs}; |
38 |
set_int 100 1 {s}; |
39 |
ASSIGN {m_reac.liqin.f['n_butane']} 90 {kmol/hr}; |
40 |
INTEGRATE m_reac FROM 0 TO 99 WITH BLSODE; |
41 |
|
42 |
DELETE SYSTEM; |
43 |
ASSIGN {m_reac.dynamic} FALSE; |
44 |
ASSIGN {m_reac.equilibrated} TRUE; |
45 |
RUN {m_reac.values}; |
46 |
RUN {m_reac.reset}; |
47 |
SOLVE {m_reac} WITH QRSlv; |
48 |
RUN {m_reac.check_all}; |
49 |
ASSIGN {m_reac.dynamic} TRUE; |
50 |
ASSIGN {m_reac.t} 0 {s}; |
51 |
ASSIGN {m_reac.liqin.f['n_butane']} 101 {kmol/hr}; |
52 |
INTEGRATE m_reac FROM 0 TO 99 WITH BLSODE; |
53 |
|
54 |
########## reactor.a4s ends here ########## |
55 |
# |
56 |
# reactor.a4s |
57 |
# by Duncan Coffey |
58 |
# May 1998 |
59 |
# Part of the ASCEND Library |
60 |
# $Date: 1998/06/17 20:08:41 $ |
61 |
# $Revision: 1.2 $ |
62 |
# $Author: mthomas $ |
63 |
# $Source: /afs/cs.cmu.edu/project/ascend/Repository/models/reactor.a4s,v $ |
64 |
# |
65 |
# This file is part of the ASCEND Modeling Library. |
66 |
# |
67 |
# Copyright (C) 1998 Carnegie Mellon University |
68 |
# |
69 |
# The ASCEND Modeling Library is free software. You can redistribute |
70 |
# it and/or modify it under the terms of the GNU General Public |
71 |
# License as published by the Free Software Foundation---either |
72 |
# version 2 of the License, or (at your option) any later version. |
73 |
# |
74 |
# The ASCEND Modeling Library is distributed in hope that it |
75 |
# will be useful, but WITHOUT ANY WARRANTY--without even the implied |
76 |
# warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
77 |
# See the GNU General Public License for more details. |
78 |
# |
79 |
# You should have received a copy of the GNU General Public License |
80 |
# along with the program. If not, write to the Free Software |
81 |
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139 USA. Check |
82 |
# the file named COPYING. |