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