TALK=F;RUN( 1, 1)
 
 ************************************************************
   Q1 created by VDI menu, Version 3.6, Date 01/04/04
 CPVNAM=VDI;SPPNAM=Core
 ************************************************************
  Echo DISPLAY / USE settings
  DISPLAY
  This input file illustrates the In-Form heat source setting
  for external plates.

  The problem considered is the 2d convective heat exchange of air
  between non-uniformly heated up horizontal walls. The cooling air
  is moved from left to right.

  The heat flux is increased with a channel length on a south wall
  and is decreased on a north wall.

  The set heat sources depend on a length of a channel. Therefore
  the In-Form facilities are used.

  The south and north walls are VR objects with PLATE type.
  The source formula is placed inside a VR objects commands block.
 
  The In-Form setting for heat flux per unit area at south wall is

   > OBJ,    INFSRC_TEM1, 1000.*XG with VOLU

  The In-Form setting for whole heat flux at north wall is

   > OBJ,    INFSRC_TEM1,  100.*(1-XG) with WHOL

  The Q1 contains VRV USE commands
  ENDDIS
  VRV USE
  * Start of frame
  * Setting display swiches
  AXIS ON
  CELPOS OFF
  CONTOUR SCALE ON
  TEXT ON
  GRID OFF
  WIREFRAME OFF
  * Domain scaling factors
  SCALE  1.000000E+00 1.000000E+00 1.000000E+00
  * Settings for current slice
  PROBE  4.750000E-01  9.000000E-02  5.000000E-02; PROBE ON
  SLICE Z
  SLICE OUTLINE ON
  * View and up directions
  VIEW  0.000000E+00  0.000000E+00  1.000000E+00
  UP  0.000000E+00  1.000000E+00  0.000000E+00
  * View centre
  VIEW CENTRE  4.000000E-01  1.000000E-01  5.000000E-02
  * View size
  VIEW SIZE  4.600000E-01
  * View perspective 
  VIEW DEPTH  3.000000E+00;VIEW TILT 0.8
  DOMAIN ON
  * Setting object visibility and painting status
  OBJECT SHOW TYPE INLET               
  OBJECT PAINT TYPE INLET OFF
  OBJECT SHOW TYPE OUTLET              
  OBJECT PAINT TYPE OUTLET OFF
  OBJECT SHOW TYPE PLATE               
  OBJECT PAINT TYPE PLATE OFF
  VARIABLE Temperature; VARIABLE RANGE  1.999997E+01  4.167127E+01
  VECTOR ON
  VECTOR INTERVAL    2    1    1
  CONTOUR ON
  CONTOUR BLANK ON
  CONTOUR AVERAGE ON
  SURFACE OFF
  ENDUSE
 ************************************************************
 IRUNN   =         1 ;LIBREF =         0
 ************************************************************
  Group 1. Run Title
 TEXT(Heat exchange by external plates.)
 ************************************************************
  Group 2. Transience
 STEADY  =    T
 ************************************************************
  Groups 3, 4, 5  Grid Information
    * Overall number of cells, RSET(M,NX,NY,NZ,tolerance)
 RSET(M,20,10,1)
 ************************************************************
  Group 6. Body-Fitted coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS  =    T
    * Non-default variable names
 NAME(148) =DEN1 ; NAME(150) =TEM1
    * Solved variables list
 SOLVE(P1  ,U1  ,V1  ,TEM1)
    * Stored variables list
 STORE(DEN1)
    * Additional solver options
 SOLUTN(P1  ,Y,Y,Y,N,N,Y)
 SOLUTN(TEM1,Y,Y,Y,N,N,Y)
 
 ************************************************************
  Group 8. Terms & Devices
 ************************************************************
  Group 9. Properties
 PRESS0  = 1.000000E+05 ;TEMP0  = 2.730000E+02
    * Domain material is: 0   Air at 20 deg C, 1 atm
 SETPRPS(1,  0)
 ENUT    = 0.000000E+00
 DVO1DT  = 3.410000E-03
 PRNDTL(TEM1) =  1.000000E+00
 ************************************************************
  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
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP  =       100
 RESFAC  = 1.000000E-03
 ************************************************************
  Group 16. Terminate Iterations
 ************************************************************
  Group 17. Relaxation
 RELAX(P1  ,LINRLX, 1.000000E+00)
 RELAX(TEM1,LINRLX, 1.000000E+00)
 ************************************************************
  Group 18. Limits
 VARMAX(U1  ) = 1.000000E+06 ;VARMIN(U1  ) =-1.000000E+06
 VARMAX(V1  ) = 1.000000E+06 ;VARMIN(V1  ) =-1.000000E+06
 ************************************************************
  Group 19. EARTH Calls To GROUND Station
 USEGRD  =    T  ;USEGRX =    T
 ASAP    =    T
 PARSOL  =    T
 SPEDAT(SET,FACETDAT,NUMOBJ,I,5)
 ************************************************************
  Group 20. Preliminary Printout
 ECHO    =    T
 DISTIL  =    T  ;NULLPR =    F
 NDST    =         0
 DSTTOL  = 1.000000E-02
 EX    (P1  ) =  1.020000E-02 ;EX    (U1  ) =  1.000000E+00
 EX    (V1  ) =  6.690000E-04 ;EX    (DEN1) =  1.189000E+00
 EX    (TEM1) =  2.229000E+01
 ************************************************************
  Group 21. Print-out of Variables
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON   =        10 ;IYMON  =         5 ;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.000000E+00,0.000000E+00,1.000000E+00)
 GVIEW(UP,0.000000E+00,1.000000E+00,0.000000E+00)
 
> DOM,    SIZE,        1.000000E+00, 2.000000E-01, 1.000000E-01
> DOM,    MONIT,       4.750000E-01, 9.000000E-02, 5.000000E-02
> DOM,    SCALE,       1.000000E+00, 1.000000E+00, 1.000000E+00
> DOM,    SNAPSIZE,    1.000000E-02
 
> OBJ,    NAME,        INLET
> OBJ,    POSITION,    0.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 2.000000E-01, 1.000000E-01
> OBJ,    GEOMETRY,    cube3t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        INLET
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    VELOCITY,      1.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    TEMPERATURE,   2.000000E+01
 
> OBJ,    NAME,        OUTLET
> OBJ,    POSITION,    1.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 2.000000E-01, 1.000000E-01
> OBJ,    GEOMETRY,    cube12t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        OUTLET
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    TEMPERATURE,   SAME
> OBJ,    COEFFICIENT,   1.000000E+03
 
> OBJ,    NAME,        SPLATE
> OBJ,    POSITION,    0.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        1.000000E+00, 0.000000E+00, 1.000000E-01
> OBJ,    GEOMETRY,    cube13
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        PLATE
  Echo InForm setting
> OBJ,    INFSRC_TEM1, 1000.*XG with VOLU
 
> OBJ,    NAME,        NPLATE
> OBJ,    POSITION,    0.000000E+00, 2.000000E-01, 0.000000E+00
> OBJ,    SIZE,        1.000000E+00, 0.000000E+00, 1.000000E-01
> OBJ,    GEOMETRY,    cube13
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        PLATE
  Echo InForm setting
> OBJ,    INFSRC_TEM1,  100.*(1-XG) with WHOL
#maxabs
STOP