TALK=F;RUN( 1, 1)
 
 ************************************************************
   Q1 created by VDI menu, Version 2009, Date 17/02/09
 CPVNAM=VDI;SPPNAM=Core
 ************************************************************
  Echo DISPLAY / USE settings
 ************************************************************
 IRUNN = 1 ;LIBREF = 0
 ************************************************************
  Group 1. Run Title
 TEXT(Heat exchange in Tube Bank, trub. flow
 ************************************************************
  Echo save-block settings for Group  1
  save1begin
 REAL(FLUIDSPEED)
 FLUIDSPEED = 0.1
  save1end
 ************************************************************
  Group 2. Transience
 STEADY = T
 ************************************************************
  Groups 3, 4, 5  Grid Information
    * Overall number of cells, RSET(M,NX,NY,NZ,tolerance)
 RSET(M,20,20,1,3.6E-04)
 ************************************************************
  Group 6. Body-Fitted coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
    * Non-default variable names
 NAME(143)=KOND ;NAME(144)=DRH1
 NAME(145)=DVO1 ;NAME(146)=CP1
 NAME(147)=ENUL ;NAME(148)=RHO1
 NAME(149)=DP ;NAME(150)=TEM1
    * Solved variables list
 SOLVE(P1,U1,V1,TEM1)
    * Stored variables list
 STORE(DP,RHO1,ENUL,CP1,DVO1,DRH1,KOND)
 
 ************************************************************
  Group 8. Terms & Devices
 USP = T ; USPDBG= F
 UTCPLT = T ; USPIMB= F
 UAUTO = T ; UGTGRD= F
 USPVTK = T ; USPTER= F
 USCANX = T ; USCANY= T
 USCANZ = T
 MXLEV = 0 ;MYLEV = 0 ;MZLEV = 0
 DOMAT = -1
 CELLST = 500 ; FACEST= 500
 MINPRP = -1 ; MAXPRP= 250
 UMXLEV = 3 ; UMXCLS= 10000
 UNOLAY = 2 ; UIOLEV= 0
 UWALEV = 1 ; UGRITR= 2
 UMXCRS = 16
 ************************************************************
  Group 9. Properties
 PRESS0 =1.0E+05 ;TEMP0 =273.149994
 RHO1 =1.
 ENUL =0
 CP1 =1.
 ENUT =4.0e-5     ! eNuT/eNuL = 40 
 PRNDTL(TEM1)=1.
 ************************************************************
  Echo save-block settings for Group  9
  save9begin
 real(kondzz)
 kondzz= 0.597 

 STORE(rho1,enul,cp1,dvo1,drh1,kond)
 (property rho1 is 998.23)
 (property enul is 1.006e-006)    ! VIA
 (property cp1 is 4181.8)
 (property dvo1 is 0.000118)
 (property drh1 is 0.)
 (property kond is :kondzz:)
 
  save9end
 ************************************************************
  Group 10.Inter-Phase Transfer Processes
 ************************************************************
  Group 11.Initialise Var/Porosity Fields
   No PATCHes used for this Group
 
 
 INIADD = F
 ************************************************************
  Group 12. Convection and diffusion adjustments
   No PATCHes used for this Group
 ************************************************************
  Group 13. Boundary & Special Sources
   No PATCHes used for this Group
 
 EGWF = T
 ************************************************************
  Echo save-block settings for Group 13
  save13begin
(source of U1 at inlet is (:FLUIDSPEED:) with onlyms)
(SOURCE of P1 at inlet is COVAL(FIXFLU,:FLUIDSPEED:*RHO1)!AREA)
(source of TEM1 at inlet is COVAL(ONLYMS,20)!AREA)
 
(source of tem1 at tube is 45 with fixv)
(source of tem1 at tube0 is 45 with fixv)
(source of tem1 at tube00 is 45 with fixv)
(source of tem1 at tube01 is 45 with fixv)
(source of tem1 at tube02 is 45 with fixv)
(source of tem1 at tube03 is 45 with fixv)
(source of tem1 at tube04 is 45 with fixv)
(source of tem1 at tube05 is 45 with fixv)
(source of tem1 at tube06 is 45 with fixv)
(source of tem1 at tube1 is 45 with fixv)
(source of tem1 at tube2 is 45 with fixv)
(source of tem1 at tube3 is 45 with fixv)
(source of tem1 at tube4 is 45 with fixv)
(source of tem1 at tube5 is 45 with fixv)
(source of tem1 at tube6 is 45 with fixv)
(source of tem1 at tube7 is 45 with fixv)
(source of tem1 at tube8 is 45 with fixv)
  save13end
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP = 2000
 RESFAC =1.0E-03
 ************************************************************
  Group 16. Terminate Iterations
 ************************************************************
  Group 17. Relaxation

mesg(Do you want to use collocated arrangement (y) or staggered one (n)? (y/n)
readvdu(ans,char,n)
if(:ans:.eq.y)then
 SPEDAT(SET,USP,METHOD,I,1)
 RELAX(P1  ,LINRLX, 0.2)
 RELAX(U1  ,FALSDT, 1.E-02)
 RELAX(V1  ,FALSDT, 1.E-02)
mesg(Do you want to use SIMPLEST (y) or SIMPLE (n)? (y/n)
readvdu(ans,char,n)
if(:ans:.eq.y)then
 SPEDAT(SET,USP,SIMPLEST,L,T)
endif

else
 RELAX(P1  ,LINRLX, 0.6)
 RELAX(U1,FALSDT,1.)                                                            
 RELAX(V1,FALSDT,1.)
endif

 ************************************************************
  Group 18. Limits
 VARMAX(TEM1)=3000. ;VARMIN(TEM1)=-204.862488
 ************************************************************
  Group 19. EARTH Calls To GROUND Station
 CALFOR = T
 ISG52 = 3
 PARSOL  =    T

 ************************************************************
  Group 20. Preliminary Printout
 ************************************************************
  Group 21. Print-out of Variables
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON = 1 ;IYMON = 11 ;IZMON = 1
 NPRMON = 100000
 NPRMNT = 1
 TSTSWP = -1
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT = 100000
 ISWPRF = 1 ;ISWPRL = 100000
   No PATCHes used for this Group
 ************************************************************
  Group 24. Dumps For Restarts 
 GVIEW(P,0.059443,-0.106594,0.992524)
 GVIEW(UP,0.998068,0.024332,-0.057162)
 
> DOM,    SIZE,        6.235380E-01, 3.600000E-01, 5.000000E-02
> DOM,    MONIT,       4.181159E-01, 1.804000E-01, 2.500000E-02
> DOM,    SCALE,       1.000000E+00, 1.000000E+00, 1.000000E+00
> DOM,    INCREMENT,   1.000000E-03, 1.000000E-03, 1.000000E-05
> GRID,   RSET_X_1,     20, 1.000000E+00
> GRID,   RSET_Y_1,     20, 1.000000E+00
> GRID,   RSET_Z_1,      1, 1.000000E+00
> DOM,    MOMCEN,      0.000000E+00, 0.000000E+00, 0.000000E+00
 
> OBJ,    NAME,        INLET
> OBJ,    POSITION,    0.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 3.600000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cube3t
> OBJ,    GRID,        NO
> OBJ,    TYPE,        INLET
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   6
> OBJ,    PRESSURE,     P_AMBIENT
> OBJ,    VELOCITY,    0. ,0. ,0.
> OBJ,    TEMPERATURE, 20.
 
> OBJ,    NAME,        OUTLET
> OBJ,    POSITION,    6.235380E-01, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 3.600000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cube12t
> OBJ,    GRID,        NO
> OBJ,    TYPE,        OUTLET
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   12
> OBJ,    OPAQUE,      100
> OBJ,    PRESSURE,    0.
> OBJ,    TEMPERATURE,  T_AMBIENT
> OBJ,    COEFFICIENT, 1000
 
> OBJ,    NAME,        TUBE
> OBJ,    POSITION,    5.402300E-02, 1.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
> OBJ,    DRAGSUM,     EXCLUDE
 
> OBJ,    NAME,        TUBE0
> OBJ,    POSITION,    1.579460E-01,-5.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE00
> OBJ,    POSITION,    1.579460E-01, 7.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE01
> OBJ,    POSITION,    1.579460E-01, 1.900000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE02
> OBJ,    POSITION,    1.579460E-01, 3.100000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE03
> OBJ,    POSITION,    3.657920E-01,-5.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE04
> OBJ,    POSITION,    3.657920E-01, 7.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE05
> OBJ,    POSITION,    3.657920E-01, 1.900000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE06
> OBJ,    POSITION,    3.657920E-01, 3.100000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE1
> OBJ,    POSITION,    5.402300E-02, 1.300000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE2
> OBJ,    POSITION,    5.402300E-02, 2.500000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE3
> OBJ,    POSITION,    2.618690E-01, 1.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE4
> OBJ,    POSITION,    2.618690E-01, 1.300000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE5
> OBJ,    POSITION,    2.618690E-01, 2.500000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE6
> OBJ,    POSITION,    4.697150E-01, 1.000000E-02, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE7
> OBJ,    POSITION,    4.697150E-01, 1.300000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
 
> OBJ,    NAME,        TUBE8
> OBJ,    POSITION,    4.697150E-01, 2.500000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E-01, 1.000000E-01, 5.000000E-02
> OBJ,    DOMCLIP,     NO
> OBJ,    GEOMETRY,    cylinder
> OBJ,    GRID,        NO
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    COLOR-MODE,  USER
> OBJ,    COLOR-VAL,   122
> OBJ,    MATERIAL,    198,Solid with smooth-wall friction
STOP