TALK=T;RUN( 1, 1)
 
 ************************************************************
   Q1 created by VDI menu, Version 3.5, Date 30/07/02
 CPVNAM=VDI;SPPNAM=Core
 ************************************************************
  Echo DISPLAY / USE settings
  PHOTON USE
  p
  e1
 
 
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.001s
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e3
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.003s
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e6
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg  t=0.006s
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e9
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.009s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e12
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.012s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e15
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors
  msg at t=0.015s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e18
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors
  msg at t=0.018s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e21
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.021s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e24
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors
  msg at t=0.024s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e27
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.027s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e30
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.030s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e33
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.033s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e36
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg  t=0.036s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e39
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.039s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e42
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.042s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to
  msg go to the next
  msg time moment
  pause
  p
  e45
 
 
 
  vi z;rot y ang -180
  msg
  msg Velocity vectors at
  msg t=0.045s
  msg
  con obid z 1 fil;.001
  con obid z 12 y 1 20 sh;int 20
  vec z 1
  *msg Press  to continue
  *msg
  *MSG Type E to end
  MSG Press Enter to quit
  msg
  pause
  ENDUSE
 ************************************************************
 IRUNN   =       1 ;LIBREF =       116
 ************************************************************
  Group 1. Run Title
 TEXT(Flow in crank-shaft-piston mechanism    )
 ************************************************************
  Group 2. Transience
 STEADY=F
    * Set overall time and no. of steps
 RSET(U,0.000000E+00,4.800000E-02,48)
    * Modify regions
 ************************************************************
  Groups 3, 4, 5  Grid Information
    * Overall number of cells, RSET(M,NX,NY,NZ,tolerance)
 RSET(M,22,60,16)
 ************************************************************
  Group 6. Body-Fitted coordinates
 ************************************************************
  Group 7. Variables: STOREd,SOLVEd,NAMEd
 ONEPHS  =    T
    * Non-default variable names
 NAME(148) =SPH1 ; NAME(150) =OBID
    * Solved variables list
 SOLVE(P1  ,U1  ,V1  ,W1  )
    * Stored variables list
 STORE(OBID,SPH1)
    * Additional solver options
 SOLUTN(P1  ,Y,Y,Y,N,N,Y)
 
 ************************************************************
  Group 8. Terms & Devices
 ************************************************************
  Group 9. Properties
 PRESS0  = 1.000000E+05 ;TEMP0  = 2.730000E+02
 SETPRPS(1,  0)
 ENUT    = 0.000000E+00
 DRH1DP  = 1.000000E-05
 DVO1DT  = 3.410000E-03
 EMISS   = 0.000000E+00 ;SCATT  = 0.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
 
 PATCH (MOFOR   ,VOLUME,1,1,1,1,1,1,1,20)
 
 EGWF    =    T
 ************************************************************
  Group 14. Downstream Pressure For PARAB
 ************************************************************
  Group 15. Terminate Sweeps
 LSWEEP  =      25
 RESFAC  = 1.000000E-03
 ************************************************************
  Group 16. Terminate Iterations
 ************************************************************
  Group 17. Relaxation
 RELAX(P1  ,LINRLX, 2.500000E-01)
 RELAX(U1  ,FALSDT, 5.000000E-01)
 RELAX(V1  ,FALSDT, 5.000000E-01)
 RELAX(W1  ,FALSDT, 5.000000E-01)
 ************************************************************
  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
 ASAP    =    T
 SPEDAT(SET,MOFOR,mofFILE,C,ENGINE.mof)
 SPEDAT(SET,GXMONI,TRANSIENT,L,F)
 ISG62 = 0
 ************************************************************
  Group 20. Preliminary Printout
 ECHO    =    T
 ************************************************************
  Group 21. Print-out of Variables
 OUTPUT(SPH1,N,N,Y,Y,N,N)
 ************************************************************
  Group 22. Monitor Print-Out
 IXMON   =       1 ;IYMON  =      60 ;IZMON  =       1
 NPRMON  =  100000
 NPRMNT  =       1
 TSTSWP  =      -1
 ************************************************************
  Group 23.Field Print-Out & Plot Control
 NPRINT  =  100000
 NTPRIN  =  100000 ;ISTPRF =       1 ;ISTPRL =   10000
 ISWPRF  =       1 ;ISWPRL =  100000
   No PATCHes used for this Group
 ************************************************************
  Group 24. Dumps For Restarts
 IDISPA  =       1 ;IDISPB =       0 ;IDISPC =       0
 CSG1    ='E'
 
 GVIEW(P,3.469291E-01,3.849058E-01,-8.552704E-01)
 GVIEW(UP,-1.136695E-01,9.224415E-01,3.690270E-01)
 
> DOM,    SIZE,        4.000000E-01, 9.000000E-01, 2.000000E-01
> DOM,    MONIT,       9.090910E-03, 8.923000E-01, 6.250000E-03
> DOM,    SCALE,       1.000000E+00, 1.000000E+00, 1.000000E+00
> DOM,    SNAPSIZE,    1.000000E-02
 
> OBJ,    NAME,        B4
> OBJ,    POSITION,    1.400000E-01, 9.000000E-01, 0.000000E+00
> OBJ,    SIZE,        1.200000E-01, 0.000000E+00, 8.000001E-02
> OBJ,    CLIPART,     cube12t
> OBJ,    ROTATION24,        1
> OBJ,    GRID,              2
> OBJ,    TYPE,        OUTLET
> OBJ,    COLOR-MODE,         2
> OBJ,    COLOR-VAL,          9
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    TEMPERATURE,  -1.026000E+04
> OBJ,    COEFFICIENT,   1.000000E+03
> OBJ,    TIME_LIMITS,   ALWAYS_ACTIVE
 
> OBJ,    NAME,        B6
> OBJ,    POSITION,    4.000000E-01, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 3.500000E-02, 2.000000E-01
> OBJ,    CLIPART,     cube12t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        OUTLET
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    TEMPERATURE,  -1.026000E+04
> OBJ,    COEFFICIENT,   1.000000E+03
> OBJ,    TIME_LIMITS,   ALWAYS_ACTIVE
 
> OBJ,    NAME,        B7
> OBJ,    POSITION,    0.000000E+00, 0.000000E+00, 0.000000E+00
> OBJ,    SIZE,        0.000000E+00, 3.500000E-02, 2.000000E-01
> OBJ,    CLIPART,     cube12t
> OBJ,    ROTATION24,        1
> OBJ,    TYPE,        OUTLET
> OBJ,    PRESSURE,      0.000000E+00
> OBJ,    TEMPERATURE,  -1.026000E+04
> OBJ,    COEFFICIENT,   1.000000E+03
> OBJ,    TIME_LIMITS,   ALWAYS_ACTIVE
 
> OBJ,    NAME,        B5
> OBJ,    POSITION,    0.000000E+00, 1.300000E-01, 0.000000E+00
> OBJ,    SIZE,        4.000000E-01, 7.700000E-01, 2.000000E-01
> OBJ,    CLIPART,     engine
> OBJ,    ROTATION24,       21
> OBJ,    TYPE,        BLOCKAGE
> OBJ,    MATERIAL,       -1
> OBJ,    TIME_LIMITS,   ALWAYS_ACTIVE
> OBJ,    INI_PRESS,     0.000000E+00
> OBJ,    SCAL_FIXF,     0.000000E+00
STOP
DISTIL=T
 EX(P1  )=   1.398E+04 
 EX(U1  )=   8.005E+00 
 EX(V1  )=   3.124E+01 
 EX(W1  )=   4.526E+00 
 EX(PRPS)=   1.000E+00 
 EX(OBID)=   2.420E+00