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

Annotation of /trunk/models/reactor.a4s

Parent Directory Parent Directory | Revision Log Revision Log


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

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