TALK=T;RUN( 1, 1)

  DISPLAY

  LONGITUDINAL VORTEX GENERATORS

  A "cut-off" technique, PARSOL, is used here to represent the
  irregular shapes of LVG on   the cartesian grid. The case is
  aimed at the demonstration of the PARSOL method for the
  simulation of the hydrodynamic performance of Rectangular Wing
  Pair,RWP, and Delta Winglet Pair, DWP, attached to a channel
  wall of the rectangular duct in a turbulent air flow.

  The demonstration case considered consists of a channnel with a
  built-in array of two LVGs in the form of RWP and DWP.
  The air flow is supposed to be fully turbulent and incompressible.

  The vortex generators are positioned about a half of channel
  length behinf the entrance. The spacing between generators is
  about half of channel width. The wing span is equal to 75 percent
  of the channel height.

  The task is to calculate the flow and pressure fields in the
  channel along with all related field distributions.

  ENDDIS

 ************************************************************
   Q1 created by VDI menu, Version 3.3, Date 24/10/00
 CPVNAM=VDI;SPPNAM=Core
 ************************************************************
 IRUNN   =       1 ;LIBREF =     290
 ************************************************************
  Group 1. Run Title
 TEXT(Longitudinal vortex generators)
 ************************************************************
  Group 2. Transience
 STEADY  =    T
 ************************************************************
  Groups 3, 4, 5  Grid Information
    * Overall number of cells, RSET(M,NX,NY,NZ,tolerance)
 RSET(M,60,60,10,7.620000E-05)
    * Set overall domain extent:
    *        xulast  yvlast  zwlast
            name
 XSI= 1.200000E+00; YSI= 5.000000E-01; ZSI= 2.000000E-01
 RSET(D,CHAM    )
 ************************************************************
  Group 6. Body-Fitted coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS  =    T
    * Non-default variable names
 NAME(147) =SMOK ; NAME(148) =EPKE
 NAME(149) =LEN1 ; NAME(150) =ENUT
    * Solved variables list
 SOLVE(P1  ,U1  ,V1  ,W1  ,SMOK)
    * Stored variables list
 STORE(ENUT,LEN1,EPKE)
    * Additional solver options
 SOLUTN(P1  ,Y,Y,Y,N,N,N)
 TURMOD(KEMODL)

 ************************************************************
  Group 8. Terms & Devices
 ************************************************************
  Group 9. Properties
 SETPRPS(1,  0)
 RHO1    = 1.189000E+00
 PRESS0  = 1.000000E+05
 CP1     = 1.005000E+03
 ENUL    = 1.544000E-05
 DVO1DT  = 3.410000E-03
 PRT   (EP  ) =  1.314000E+00
 ************************************************************
  Group 10.Inter-Phase Transfer Processes
 ************************************************************
  Group 11.Initialise Var/Porosity Fields
 FIINIT(P1  ) =  1.300000E-04 ;FIINIT(U1  ) =  1.300000E+01
 FIINIT(KE  ) =  7.605000E-01 ;FIINIT(EP  ) =  3.177743E+01
 FIINIT(SMOK) =  1.000000E+00 ;FIINIT(EPKE) =  1.000000E+00
   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  =     300
 RESFAC  = 1.010000E-01
 ************************************************************
  Group 16. Terminate Iterations
 LITER (U1  ) =   20 ;LITER (V1  ) =   20
 ************************************************************
  Group 17. Relaxation
 RELAX(P1  ,LINRLX, 1.000000E+00)
 RELAX(U1  ,FALSDT, 1.000000E-02)
 RELAX(V1  ,FALSDT, 1.000000E-02)
 RELAX(W1  ,FALSDT, 1.000000E-03)
 RELAX(KE  ,FALSDT, 1.000000E-02)
 RELAX(EP  ,FALSDT, 1.000000E-02)
 RELAX(SMOK,LINRLX, 1.000000E+00)
 KELIN   =       3
 ************************************************************
  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
 GENK    =    T
 ASAP    =    T
 LSG3    =    T
 CSG3    ='FGEM'
 ************************************************************
  Group 20. Preliminary Printout
 ECHO    =    T
 ************************************************************
  Group 21. Print-out of Variables
 OUTPUT(W1  ,Y,Y,Y,N,Y,Y)
 OUTPUT(SMOK,Y,N,Y,N,N,N)
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON   =      17 ;IYMON  =      39 ;IZMON  =       1
 NPRMON  =     100
 NPRMNT  =       1
 TSTSWP  =      -1
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT  =  100000
 IPLTF   =       1 ;IPLTL  =     100
 NPLT    =       1
 ISWPRF  =       1 ;ISWPRL =  100000
   No PATCHes used for this Group
 ************************************************************
  Group 24. Dumps For Restarts
 NOWIPE  =    T

 GVIEW(P,-2.100775E-01,-6.597336E-01,7.215394E-01)
 GVIEW(UP,2.606600E-02,7.339663E-01,6.786854E-01)

> DOM,    SIZE,        1.200000E+00, 5.000000E-01, 2.000000E-01
> DOM,    MONIT,       3.280000E-01, 3.208330E-01, 1.000000E-02
> DOM,    SCALE,       1.000000E+00, 1.000000E+00, 1.000000E+00
> DOM,    SNAPSIZE,    1.000000E-03
> DOM,    VARIABLES,  SMOK
> DOM,    RELAX,       1.000000E+00

> OBJ1,   NAME,        OUTLET
> OBJ1,   POSITION,    1.200000E+00, 0.000000E+00, 0.000000E+00
> OBJ1,   SIZE,        0.000000E+00, 5.000000E-01, 2.000004E-01
> OBJ1,   CLIPART,     cube12t
> OBJ1,   ROTATION24,        1
> OBJ1,   GRID,        2.000000E+00
> OBJ1,   TYPE,        OUTLET
> OBJ1,   PRESSURE,      0.000000E+00
> OBJ1,   TEMPERATURE,  -1.026000E+04
> OBJ1,   COEFFICIENT,   1.000000E+03
> OBJ1,   TURBULENCE,   -1.026000E+04,-1.026000E+04
> OBJ1,   SMOKE,         0.000000E+00

> OBJ2,   NAME,        B7
> OBJ2,   POSITION,    4.400001E-01, 1.339998E-01, 0.000000E+00
> OBJ2,   SIZE,        1.600000E-01, 1.500000E-02, 1.400000E-01
> OBJ2,   ARBORIEN,    2.200000E+01, 0.000000E+00, 0.000000E+00
> OBJ2,   CLIPART,     wedge1
> OBJ2,   ROTATION24,        2
> OBJ2,   GRID,        2.000000E+00
> OBJ2,   TYPE,        BLOCKAGE
> OBJ2,   MATERIAL,      103
> OBJ2,   FIXED_TMP,     0.000000E+00, 0.000000E+00

> OBJ3,   NAME,        B8
> OBJ3,   POSITION,    4.400001E-01, 1.319998E-01, 0.000000E+00
> OBJ3,   SIZE,        1.500000E-01, 1.500000E-02, 1.400000E-01
> OBJ3,   ARBORIEN,   -2.200000E+01, 0.000000E+00, 0.000000E+00
> OBJ3,   CLIPART,     wedge1
> OBJ3,   ROTATION24,       22
> OBJ3,   GRID,        2.000000E+00
> OBJ3,   TYPE,        BLOCKAGE
> OBJ3,   MATERIAL,      103
> OBJ3,   FIXED_TMP,     0.000000E+00, 0.000000E+00

> OBJ4,   NAME,        B10
> OBJ4,   POSITION,    0.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ4,   SIZE,        0.000000E+00, 5.000000E-01, 2.000004E-01
> OBJ4,   CLIPART,     cube3t
> OBJ4,   ROTATION24,        1
> OBJ4,   GRID,        2.000000E+00
> OBJ4,   TYPE,        INLET
> OBJ4,   PRESSURE,      1.189000E+00
> OBJ4,   VELOCITY,      2.000000E+01, 0.000000E+00, 0.000000E+00
> OBJ4,   TEMPERATURE,   0.000000E+00
> OBJ4,   SMOKE,         0.000000E+00
> OBJ4,   TURB-INTENS,   5.000000E+00

> OBJ5,   NAME,        B5
> OBJ5,   POSITION,    4.400000E-01, 3.480003E-01, 0.000000E+00
> OBJ5,   SIZE,        1.600000E-01, 1.500000E-02, 1.400000E-01
> OBJ5,   ARBORIEN,    2.200000E+01, 0.000000E+00, 0.000000E+00
> OBJ5,   CLIPART,     cube
> OBJ5,   ROTATION24,        1
> OBJ5,   GRID,        2.000000E+00
> OBJ5,   TYPE,        BLOCKAGE
> OBJ5,   MATERIAL,      103
> OBJ5,   FIXED_TMP,     0.000000E+00, 0.000000E+00

> OBJ6,   NAME,        B6
> OBJ6,   POSITION,    4.400000E-01, 3.480000E-01, 0.000000E+00
> OBJ6,   SIZE,        1.500000E-01, 1.500000E-02, 1.400000E-01
> OBJ6,   ARBORIEN,   -2.200000E+01, 0.000000E+00, 0.000000E+00
> OBJ6,   CLIPART,     cube
> OBJ6,   ROTATION24,        1
> OBJ6,   GRID,        2.000000E+00
> OBJ6,   TYPE,        BLOCKAGE
> OBJ6,   MATERIAL,      103
> OBJ6,   FIXED_TMP,     0.000000E+00, 0.000000E+00
STOP
distil=T
 EX(P1  )=   6.497E+01 
 EX(U1  )=   2.020E+01 
 EX(V1  )=   1.195E+00 
 EX(W1  )=   1.383E+00 
 EX(KE  )=   4.378E+00 
 EX(EP  )=   3.446E+02 
 EX(PRPS)=   1.099E+00 
 EX(SMOK)=   2.122E-17 
 EX(EPKE)=   4.274E+01 
 EX(LEN1)=   9.208E-03 
 EX(ENUT)=   8.302E-03