AN
Home Page >>
Verification >>
AN
AN Tank Farm ventilation system.
TSA6 jws, 11/1/94
c $Source: /home/cvs/cvsroot/input/AN.ingf,v $
c $Date: 1996/12/18 09:57:22 $
c $Locker: $
c $Revision: 1.1 $
c $State: Exp $
c $Author: jspore $
c
c $Log: AN.ingf,v $
c Revision 1.1 1996/12/18 09:57:22 jspore
c Initial revision
c
c Revision 1.3 1995/10/30 16:18:37 jspore
c Changed autot from 0.0 to 1.0.
c
c Revision 1.2 1995/10/18 14:43:46 jspore
c Ran all .ingf files through edgf to make for sure all namelist
c ends started in column 2. Fred also removes trailing blanks.
c
c Revision 1.1 1995/03/16 09:10:08 jspore
c Initial revision
c
GASNET
------------------------------------------------------------------------
N O T E S
-----------
AN tank farm ventilation system model
Noding was reduced significant from Dick's original model,
but duct 13 was made 100 cells long to ensure no more
problems assoicated with large 1D models.
node 7
+...+
. 64. PBC
+---+
| 63|
+---+
| 62|
+---+
| 61|
+---+ D6
| 60|
+---+
| 59|
+---+
| 58|
+---+
PBC | 57|
+...+---+---+---+---+---+---+---+---+---+---+---+
| 55| 54| 53| 52| 51| 50| 49| 48| 47| 46| 45|130| J3
+...+---+---+---+---+---+---+---+---+---+---+---+ node
node 6 D5 | 42| 5
+---+
| 41|
+---+
| 40|
+---+
| 39|
+---+
node 3 | 38|
+...+ +---+
PBC . 23. | 37|
+---+ +---+
| 22| | 36|
+---+ +---+ D4
| 21| | 35|
+---+ +---+
| 20| | 34|
+---+ +---+
| 19| | 33|
+---+ +---+
| 18| | 32|
D2 +---+ +---+
| 17| | 31|
+---+ +---+
| 16| | 30|
+---+ +---+
| 15| | 29|
+---+ +---+
PBC | 14| | 28|
+...+---+---+---+---+---+---+---+---+---+---+---+---+---+---+
. 1| 2| 3| 4| 5| 6| 7| 8| 9| 10| 11|128| 25|129| 66|......see below
+...+---+---+---+---+---+---+---+---+---+---+---+---+---+---+
node 1 D1 J1 D3 J2
node 2 node 4
node 12
+...+
PBC .108.
+---+
|107|
+---+
|106|
+---+
|105|
+---+
|104|
+---+
|103|
D11 +---+
|102|
+---+
|101|
+...+ +---+
PBC . 88. Node 10 |100|
+---+ +---+
| 87| | 99|
+---+ D9 +---+
| 86| D10 | 98|
+---+---+---+---+---+---+---+---+---+
node 9 |132| 90| 91| 92| 93| 94| 95|133|110|... cont
J5 +---+---+---+---+---+---+---+---+---+ below
| 83| node 11
+---+ J6
| 82|
+---+
| 81|
+---+ D8
| 80|
+---+
| 79|
+---+
| 78|
+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+...+
|129| 66| 67| 68| 69| 70| 71| 72| 73| 74| 75|131|122|123|124|125|126|127.
+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+---+...+
J2 D7 J4 D13 PBC
node 4 node 8 node 14
+---+---+---+---+---+---+---+---+---+---+---+...+
|133|110|111|112|113|114|115|116|117|118|119|120.
+---+---+---+---+---+---+---+---+---+---+---+...+
J6 D12 PBC
node 11 node 13
------------------------------------------------------------------------
N E T W O R K P A R A M E T E R S
------------------------------------------------------------------------
$innet
iwshear = 1,
ductdef(1,1) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
1, 2, 10, 1.000, 0, 0,
ductdef(1,2) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
2, 3, 9, 1.000, 0, 0,
ductdef(1,3) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
2, 4, 1, 1.000, 0, 0,
ductdef(1,4) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
4, 5, 15, 1.000, 0, 0,
ductdef(1,5) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
5, 6, 10, 1.000, 0, 0,
ductdef(1,6) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
5, 7, 7, 1.000, 0, 0,
ductdef(1,7) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
4, 8, 10, 1.000, 0, 0,
ductdef(1,8) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
8, 9, 6, 1.000, 0, 0,
ductdef(1,9) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
9, 10, 2, 1.000, 0, 0,
ductdef(1,10) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
9, 11, 6, 1.000, 0, 0,
ductdef(1,11) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
11, 12, 10, 1.000, 0, 0,
ductdef(1,12) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
11, 13, 10, 1.000, 0, 0,
ductdef(1,13) = 0.0 , 0.0 , 30.48, 30.48, 0.0, 0.0,
8, 14, 100, 1.000, 0, 0,
defjct(1,1) = 30.48 , 30.48 , 30.48 , 2 ,
defjct(1,2)= 30.48 , 30.48 , 30.48 , 4 ,
defjct(1,3) = 30.48 , 30.48 , 30.48 , 5 ,
defjct(1,4)= 30.48 , 30.48 , 30.48 , 8 ,
defjct(1,5) = 30.48 , 30.48 , 30.48 , 9 ,
defjct(1,6)= 30.48 , 30.48 , 30.48 , 11 ,
cpnt(1, 1) = 0.0 , 0.0 , 0.0 ,
cpnt(1, 2) = 3050.0 , 0.0 , 0.0 ,
cpnt(1, 3) = 3050.0 , 2800.0 , 0.0 ,
cpnt(1, 4) = 3250.0 , 0.0 , 0.0 ,
cpnt(1, 5) = 3250.0 , 5400.0 , 0.0 ,
cpnt(1, 6) = 1350.0 , 5400.0 , 0.0 ,
cpnt(1, 7) = 3250.0 , 9400.0 , 0.0 ,
cpnt(1, 8) = 4950.0 , 0.0 , 0.0 ,
cpnt(1, 9) = 4950.0 , 1100.0 , 0.0 ,
cpnt(1, 10) = 4950.0 , 6700.0 , 0.0 ,
cpnt(1, 11) = 5950.0 , 1100.0 , 0.0 ,
cpnt(1, 12) = 5950.0 , 3500.0 , 0.0 ,
cpnt(1, 13) =11550.0 , 1100.0 , 0.0 ,
cpnt(1, 14) = 5950.0 , 0.0 , 0.0 ,
$end
------------------------------------------------------------------------
B A S I C I N P U T
------------------------------------------------------------------------
$xput
idiffme = 0,
idiffmom = 0,
nu = 0.150 ,
gz = -000.0,
autot = 1.0,
delt0 = 0.1000,
deltmin = 1.000e-04,
deltmax = 1.000e-00,
nrsdump =-1,
epsi0 = 1.000e-08,
epsimax = 1.000e-08,
epsimin = 1.000e-08,
itdowndt = 024,
itupdt = 024,
itmax = 025,
maxcyc = 10000,
twfin = 010.000,
lpr = 1,
iobpl = 1,
ittyfreq = 50,
pltdt = 010.000,
prtdt = 10.00,
tddt = 5000.00,
velmx = 1.5,
mat = 'air' ,
gasdef(1,1) = 0, 12, 1, -1, -1, -1, 0 , ; duct #1 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,2) = 0, 11, 2, -2, -2, -2, 0 , ; duct #2 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,3) = 0, 3, 3, -3, -3, -3, 0 , ; duct #3 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,4) = 0, 17, 4, -1, -1, -1, 0 , ; duct #4 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,5) = 0, 12, 5, -2, -2, -2, 0 , ; duct #5 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,6) = 0, 9, 6, -3, -3, -3, 0 , ; duct #6 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,7) = 0, 12, 7, -2, -2, -2, 0 , ; duct #7 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,8) = 0, 8, 8, -3, -3, -3, 0 , ; duct #8 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,9) = 0, 4, 9, -1, -1, -1, 0 , ; duct #9 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,10) = 0, 8, 10, -2, -2, -2, 0 , ; duct #10 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,11) = 0, 12, 11, -2, -2, -2, 0 , ; duct #11 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,12) = 0, 12, 12, -2, -2, -2, 0 , ; duct #12 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,13) = 0, 102, 13, -2, -2, -2, 0 , ; duct #13 IC
1.0000000000e6, 300.00, 1, 0., 0.,
'air' , 1.00000,
gasdef(1,14) = 0, 1, 1, -1, -1, -1, 0 , ; duct #1
1.0000000000e6, 300.00, 1, 0., 9999999.,; W BC
'air' , 1.00000,
gasdef(1,15) = 10, 11, 2, -3, -3, -3, 0 , ; duct #2
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,16) = 11,12, 5, -3, -3, -3, 0 , ; duct #5
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,17) = 8, 9, 6, -3, -3, -3, 0 , ; duct #6
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,18) = 3, 4, 9, 0, 0, 0, 0 , ; duct #9
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,19) = 11, 12, 11, 0, 0, 0, 0 , ; duct #10
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,20) = 11, 12, 12, -3, -3, -3, 0 , ; duct #12
1.0000000000e6, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
gasdef(1,21) = 101,102, 13, -3, -3, -3, 0 , ; duct #13
9.9999000000e5, 300.00, 1, 0., 9999999.,; E BC
'air' , 1.00000,
vvalue = 0.00, 0.0,
; vbc(1,1) = 1, 1, 1,-1, -1, -1, 1, 1, 0.0, 99999.,
pbc(1,1) = 2, 2, 2, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,2) = 2, 2, 5, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,3) = 2, 2, 6, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,4) = 2, 2, 9, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,5) = 2, 2, 11, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,6) = 2, 2, 12, -2, -2, -2, 1, 0.0, 99999.,
pbc(1,7) = 2, 2, 13, -2, -2, -2, 1, 0.0, 99999.,
$end
------------------------------------------------------------------------
M E S H
------------------------------------------------------------------------
$meshgn
$end
------------------------------------------------------------------------
G R A P H I C S
------------------------------------------------------------------------
$grafic
pnt(1,1) = 2, 1, 0, 0,
11, 1, 0, 0,
p1d(1,1) = 1, 2, 'un', 0,
1, 2, 'pn', 0,
thdt = 0.10,
thp(1, 1) = 6, 1, 0, 0, 'pn' , 0,
thp(1, 2) = 6, 1, 0, 0, 'un' , 0,
thp(1, 1) = 2, 1, 0, 0, 'pn' , 0,
thp(1, 2) = 2, 1, 0, 0, 'un' , 0,
thp(1, 3) = 11, 1, 0, 0, 'pn' , 0,
thp(1, 4) = 11, 1, 0, 0, 'un' , 0,
thp(1, 5) = 2, 2, 0, 0, 'pn' , 0,
thp(1, 6) = 10, 2, 0, 0, 'un' , 0,
thp(1, 7) = 2, 3, 0, 0, 'pn' , 0,
thp(1, 8) = 2, 3, 0, 0, 'un' , 0,
thp(1, 9) = 2, 4, 0, 0, 'pn' , 0,
thp(1,10) = 2, 4, 0, 0, 'un' , 0,
thp(1,11) = 16, 4, 0, 0, 'pn' , 0,
thp(1,12) = 16, 4, 0, 0, 'un' , 0,
$end
------------------------------------------------------------------------
P A R T I C L E S
------------------------------------------------------------------------
$parts
$end
------------------------------------------------------------------------
H E A T T R A N S F E R & C O N D E N S A T I O N
------------------------------------------------------------------------
$rheat
$end
------------------------------------------------------------------------
S P E C I A L
------------------------------------------------------------------------
$special
$end
You would like more information? Goto the
contact page.
