GASFLOW - aere

aere

AERE Exp., Test H
TSA6 rff, 8/1/94
GASFLOW

$Source: /home/cvs/cvsroot/input/aere.ingf,v $
$Date: 1996/12/18 10:51:53 $
$Locker: $
$Revision: 1.1 $
$State: Exp $
$Author: jspore $

$Log: aere.ingf,v $
Revision 1.1 1996/12/18 10:51:53 jspore
Initial revision

Revision 1.7 1996/06/19 20:25:45 jspore
Cleaned up mesh input so it would work with both F77 and F90
namelist.

Revision 1.6 1995/10/18 14:43:46 jspore
Ran all .ingf files through edgf to make for sure all namelist
ends started in column 2. Fred also removes trailing blanks.

Revision 1.5 1995/05/15 16:27:32 jspore
Added extra null mesh input. This allows SETLSIZE logic for reading
the MESHGN namelist to work correctly on INDY machines.

Revision 1.4 1995/05/08 21:29:02 jspore
Added header information.

-----------------------------------------------------------------------
$innet
$end
$xput

      ihystat   = 0,
     idiffmom = 1,
      tmodel   = 'alg',
     idiffme   = 0, prandtl = 0.70, schmidt = 1.0,

      autot    = 1.0, cyl = 0.0,
      delt0    = 00.0050 ,
      deltmin = 1.000e-05,
      deltmax = 1.000e-00,
      epsi0    = 1.000e-05,
      epsimax = 1.000e-05,
      epsimin = 1.000e-05,
      gz       = -980.0,
      iobpl    = 0,
      itdowndt = 90,
      itupdt   = 100,
      itmax    = 100,
      lpr      = 1,
      maxcyc   =500000,
      ittyfreq = 020,
      nu       = 0.15 ,
      pltdt    = 10.0,
      prtdt    = 10.0,
      twfin    = 10.0,
      tddt     = 10.0,
      nrsdump = 0,
;    solatype = 2.0,
      velmx    = 1.5,
      ibw      = 1,
      ibe      = 1,
      ibs      = 1,
      ibn      = 1,
      ibb      = 1,
      ibt       = 1,

   vbc(1,1) = 1,    1 , 9, 17, 3 , 5, 1 , 1, 0.00, 1.e99,
   pbc(1,1) = 23, 25, 3, 23, 25 , 25, 1 ,      0.00, 1.e99,
   vvalue = 75.0,

      mat =   'air',

      gasdef(1,1) = 0 , 26, 0 , 26 , 0 , 26,   1 ,          ;I.C.
                    1.013500e6, 295.00, 1, 0., 0.,
                    'air', 1.00000,
      gasdef(1,2) = 0 , 1, 9 ,17 , 3, 5,   1 ,          ;E Bound B.C.'s
                    1.013500e6, 295.00, 1, 0., 999999.0,
                     'air', 1.0,
      gasdef(1,3) = 23 , 25, 3 , 23 , 25, 26,   1 ,    ;Top Bound. B.C.'s
                    1.013500e6, 295.00, 1, 0., 999999.0,
                     'air', 1.0,

$end
------------------------------------------------------------------------
          M E S H
------------------------------------------------------------------------
$meshgn
     iblock = 1,
     nkx = 1,
   xl(1) =   0.0, xc(1) = 0.0, nxl(1) = 0, nxr(1)= 24, dxmn(1) = 9999.,
     xl(2) = 271.0,

     nky = 3,
     yl(1) =   0.0, yc(1) = 0.0, nyl(1) = 0, nyr(1)= 8, dymn(1) = 9999.,
     yl(2) = 99.0, yc(2) = 0.0, nyl(2) = 0, nyr(2)= 8, dymn(2) = 9999.,
     yl(3) = 169.0, yc(3) = 0.0, nyl(3) = 0, nyr(3)= 8, dymn(3 )= 9999.,
     yl(4) = 268.0,

     nkz = 1,
     zl(1) =   0.0, zc(1) = 0.0, nzl(1) = 0, nzr(1)= 24, dzmn(1) = 9999.,
     zl(2) = 240.0,
$end
$meshgn

$end
------------------------------------------------------------------------
          G R A P H I C S
------------------------------------------------------------------------
$grafic

     pnt(1, 1) =     1, 13, 1,   1,
     pnt(1, 2) =     25,13, 25,   1,
     pnt(1, 3) =     1,   1, 4,   1,
     pnt(1, 4) =     25,25, 4,   1,

     thdt = 0.10 ,

      viewcrds(1,1) = 135.0, 134.0, 120.0, 135.0, -500.0, 120.0,
      viewcrds(1,2) = 135.0, 134.0, 120.0, 135.0, 134.0, 500.0,

     thp(1, 1) = 25,13,25, 1, 'wn', 0,
     thp(1, 2) = 25, 2, 4, 1, 'vn', 0,
     thp(1, 3) = 25,13, 4, 1, 'wn', 0,
$end
------------------------------------------------------------------------
          P A R T I C L E S
------------------------------------------------------------------------
$parts
$end
$rheat
$end
$special
$end
$specialp
$end