TALK=T;RUN( 1, 1)
 
 ************************************************************
   Q1 created by VDI menu, Version 3.5, Date 23/07/02
 CPVNAM=VDI;SPPNAM=HOTBOX
 ************************************************************
  Echo DISPLAY / USE settings
  DISPLAY
 
  Library case H111:
 
  MULTIPLE FAN MATCHING
 
  This case is similar  to  110;   it  is  a  simple  three-
  dimensional forced flow through a box, with  fan matching.
  This time the flow is treated as laminar.
 
  The difference from 110 is that two fans  are  used,  each
  operating on a different fan curve.     These are FAN1 and
  FAN1 in the FANDATA file supplied as a demonstration.
 
  NOTE: The HOTBOX menu at present CANNOT  set  or  preserve
  multiple fan matching. This case is supplied as an example
  of how the Q1 can be used to add features not  yet present
  in the Menu.    Do NOT load this case into HOTBOX menu, or
  the special multi-fan settings will be lost.
 
  At  the  end  of the simulation the RESULT  file  contains
  information about the operating point.
 
  (Use PHOTON to display  results.  Enter  USE Q1  in PHOTON
  command mode,  or create a file called U,  which  contains
  the one line: USE Q1   before typing  RUNPHO.)
 
  ENDDIS
  PHOTON USE
  p;;;;
 
  use patgeo
  msg Geometry of the problem
  msg
  use hotspot
  msg
  msg Press return to plot temperature field
  msg
  pause
  cont tem1 y 6 fil;.001
  msg Press return to plot velocity field
  pause
  vec z 1 sh
  vec x 5 sh
  msg Press E to end
  ENDUSE
 ************************************************************
 IRUNN   =       1 ;LIBREF =     111
 ************************************************************
  Group 1. Run Title
 TEXT(Multiple Fan matching: H111             )
 ************************************************************
  Group 2. Transience
 STEADY  =    T
 ************************************************************
  Groups 3, 4, 5  Grid Information
    * Overall number of cells, RSET(M,NX,NY,NZ,tolerance)
 RSET(M,10,10,10)
 ************************************************************
  Group 6. Body-Fitted coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS  =    T
    * Non-default variable names
 NAME( 46) =NPOR ; NAME( 47) =BLOK
 NAME( 48) =PRPS ; NAME( 49) =DEN1
 NAME( 50) =TEM1
    * Solved variables list
 SOLVE(P1  ,U1  ,V1  ,W1  ,TEM1)
    * Stored variables list
 STORE(DEN1,PRPS,BLOK,NPOR)
    * Additional solver options
 SOLUTN(P1  ,Y,Y,Y,N,N,N)
 SOLUTN(TEM1,Y,Y,Y,N,N,Y)
 IVARBK  =      -1 ;ISOLBK =       1
 
 ************************************************************
  Group 8. Terms & Devices
 NEWRH1  =    T
 NEWENL  =    T
 ISOLX   =       0 ;ISOLY  =       0 ;ISOLZ  =       0
 ************************************************************
  Group 9. Properties
 PRESS0  = 1.000000E+05 ;TEMP0  = 2.730000E+02
 SETPRPS(1,  2)
 ENUT    = 0.000000E+00
 DRH1DP  = GRND5
 DVO1DT  = 3.330000E-03
 PRNDTL(TEM1) = -2.630000E-02
 EMISS   = 0.000000E+00 ;SCATT  = 0.000000E+00
 ************************************************************
  Group 10.Inter-Phase Transfer Processes
 ************************************************************
  Group 11.Initialise Var/Porosity Fields
 FIINIT(NPOR) =  1.000000E+00 ;FIINIT(BLOK) =  1.000000E+00
 FIINIT(PRPS) = -1.000000E+00 ;FIINIT(DEN1) =  1.001000E-10
 FIINIT(TEM1) =  2.000000E+01
   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
 
 PATCH (BUOYANCY,PHASEM,0,0,0,0,0,0,1,1)
 COVAL (BUOYANCY,U1  , FIXFLU      , GRND2       )
 COVAL (BUOYANCY,V1  , FIXFLU      , GRND2       )
 COVAL (BUOYANCY,W1  , FIXFLU      , GRND2       )
 
 BUOYA   = 0.000000E+00 ; BUOYB =-9.810000E+00
 BUOYC   = 0.000000E+00
 BUOYD   = 1.276300E+00
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP  =      80
 RESFAC  = 1.000000E-02
 ************************************************************
  Group 16. Terminate Iterations
 LITER (TEM1) =       15
 ************************************************************
  Group 17. Relaxation
 RELAX(P1  ,LINRLX, 1.000000E+00)
 RELAX(U1  ,FALSDT, 7.000000E-01)
 RELAX(V1  ,FALSDT, 7.000000E-01)
 RELAX(W1  ,FALSDT, 7.000000E-01)
 RELAX(TEM1,FALSDT, 7.000000E+03)
 ************************************************************
  Group 18. Limits
 VARMAX(U1  ) = 1.000000E+06 ;VARMIN(U1  ) =-1.000000E+06
 VARMAX(V1  ) = 1.000000E+06 ;VARMIN(V1  ) =-1.000000E+06
 VARMAX(W1  ) = 1.000000E+06 ;VARMIN(W1  ) =-1.000000E+06
 ************************************************************
  Group 19. EARTH Calls To GROUND Station
 USEGRD  =    T  ;USEGRX =    T
 NAMGRD  =HTBX
 ASAP    =    T
 LG(  9) =    T
 ************************************************************
  Group 20. Preliminary Printout
 ECHO    =    T
 ************************************************************
  Group 21. Print-out of Variables
 OUTPUT(BLOK,N,N,N,N,N,N)
 OUTPUT(PRPS,N,N,N,N,N,N)
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON   =       5 ;IYMON  =       7 ;IZMON  =       4
 NPRMON  =  100000
 NPRMNT  =       1
 TSTSWP  =      -1
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT  =  100000
 NPLT    =       1
 ISWPRF  =       1 ;ISWPRL =  100000
 ITABL   =       3
   No PATCHes used for this Group
 ************************************************************
  Group 24. Dumps For Restarts
 
 GVIEW(P,5.773503E-01,5.773503E-01,5.773503E-01)
 GVIEW(UP,-4.082483E-01,8.164966E-01,-4.082483E-01)
 
> DOM,    SIZE,        5.000000E-01, 7.000000E-01, 5.000000E-01
> DOM,    MONIT,       2.250000E-01, 4.025000E-01, 1.675000E-01
> DOM,    SCALE,       1.000000E+00, 1.000000E+00, 1.000000E+00
> DOM,    SNAPSIZE,    1.000000E-02
> GRID,   RSET_X_1,      2, 1.000000E+00
> GRID,   RSET_X_2,      1, 1.000000E+00
> GRID,   RSET_X_3,      1, 1.000000E+00
> GRID,   RSET_X_4,      2, 1.000000E+00
> GRID,   RSET_X_5,      1, 1.000000E+00
> GRID,   RSET_X_6,      1, 1.000000E+00
> GRID,   RSET_X_7,      2, 1.000000E+00
> GRID,   RSET_Y_1,      3, 1.000000E+00
> GRID,   RSET_Y_2,      2, 1.000000E+00
> GRID,   RSET_Y_3,      1, 1.000000E+00
> GRID,   RSET_Y_4,      2, 1.000000E+00
> GRID,   RSET_Y_5,      2, 1.000000E+00
> GRID,   RSET_Z_1,      2, 1.000000E+00
> GRID,   RSET_Z_2,      1, 1.000000E+00
> GRID,   RSET_Z_3,      2, 1.000000E+00
> GRID,   RSET_Z_4,      2, 1.000000E+00
> GRID,   RSET_Z_5,      1, 1.000000E+00
> GRID,   RSET_Z_6,      2, 1.000000E+00
> DOM,    FANMATCH,    T
> DOM,    FANUPDATE,     1
 
> OBJ,    NAME,        PCB
> OBJ,    POSITION,    9.999999E-02, 3.500000E-01, 9.999999E-02
> OBJ,    SIZE,        3.000000E-01, 0.000000E+00, 3.000000E-01
> OBJ,    CLIPART,     cube11
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        PLATE
> OBJ,    POROSITY,      0.000000E+00
> OBJ,    SIDE,        BOTH
 
> OBJ,    NAME,        CHIP1
> OBJ,    POSITION,    1.500000E-01, 3.500000E-01, 1.500000E-01
> OBJ,    SIZE,        4.999998E-02, 2.000001E-02, 6.999999E-02
> OBJ,    CLIPART,     cube4
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    MATERIAL,      100
> OBJ,    HEAT_FLVX,     0.000000E+00, 7.143000E+03
> OBJ,    INI_BLOK,      2.000000E+00
 
> OBJ,    NAME,        CHIP2
> OBJ,    POSITION,    3.000000E-01, 3.500000E-01, 1.500000E-01
> OBJ,    SIZE,        5.000001E-02, 2.000001E-02, 6.999999E-02
> OBJ,    CLIPART,     cube4
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    MATERIAL,      100
> OBJ,    HEAT_FLVX,     0.000000E+00, 1.000000E+04
> OBJ,    INI_BLOK,      3.000000E+00
 
> OBJ,    NAME,        VENT
> OBJ,    POSITION,    9.999999E-02, 7.000000E-01, 1.500000E-01
> OBJ,    SIZE,        3.000000E-01, 0.000000E+00, 2.000000E-01
> OBJ,    CLIPART,     cube12t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        APERTURE
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    TEMPERATURE,   2.000000E+01
> OBJ,    COEFFICIENT,   1.000000E+00
 
> OBJ,    NAME,        FAN
> OBJ,    POSITION,    1.500000E-01, 2.000000E-01, 0.000000E+00
> OBJ,    SIZE,        2.000000E-01, 3.000000E-01, 0.000000E+00
> OBJ,    CLIPART,     cube2t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        FAN
> OBJ,    VELOCITY,      0.000000E+00, 0.000000E+00, 1.000000E+00
> OBJ,    TEMPERATURE,   2.000000E+01
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    FANMATCH,      1.000000E+00
> OBJ,    FANNAME,     FAN1
 
> OBJ,    NAME,        FAN2
> OBJ,    POSITION,    1.500000E-01, 2.000000E-01, 5.000000E-01
> OBJ,    SIZE,        2.000000E-01, 3.000000E-01, 0.000000E+00
> OBJ,    CLIPART,     cube2t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        FAN
> OBJ,    VELOCITY,      0.000000E+00, 0.000000E+00,-1.000000E+00
> OBJ,    TEMPERATURE,   2.000000E+01
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    FANMATCH,      1.000000E+00
> OBJ,    FANNAME,     FAN2
STOP