```
TALK=T;RUN(1,1)
DISPLAY
The problem considered is the submerged free heated turbulent
round jet in stagnant surroundings, as described under PHOENICS
Library cases 153-155. The calculations are started at the jet
discharge, and the parabolic marching integration is carried
out until both the mean flow and turbulence profiles become self
similar.

The calculations are made with 30 grid cells across the jet and
a forward step size of 5% (DZW1) of the local jet width. The y-
extent of the grid is set equal to the diameter at z = 0,
thereafter being caused to increase linearly with downstream
distance so as to accommodate the radial spread of the jet. For
testing purposes the number of forward steps is set equal to 20,
but for the attainment of self-similarity, it is recommended that
NZ is set equal to 210, so that the marching integration is
terminated at an axial distance of about 50 diameters from the
jet discharge.
ENDDIS
************************************************************
Group 1. Run Title and Number
************************************************************
************************************************************

TEXT(2S K-E MODEL_PARABOLIC ROUND JET   :T404)

************************************************************
************************************************************

IRUNN = 1 ;LIBREF = 14
************************************************************
Group 2. Time dependence
STEADY = T
************************************************************
Group 3. X-Direction Grid Spacing
CARTES = F
NX = 1
XULAST =0.1
XFRAC(1)=1.
************************************************************
Group 4. Y-Direction Grid Spacing
NY = 30
YVLAST =0.1
AZYV =1. ;AZRI =0.
AZAL =0.
Method of pairs used for grid setting.
YFRAC(1)=-30. ;YFRAC(2)=0.033333
************************************************************
Group 5. Z-Direction Grid Spacing
PARAB = T
NZ = 20
ZWADD =0.387597
ZWLAST =1.
AZDZ = GRND2
ZFRAC(1)=1.
************************************************************
Group 6. Body-Fitted Coordinates
************************************************************
Group 7. Variables: STOREd,SOLVEd,NAMEd
ONEPHS = T
NAME(1)=P1 ;NAME(5)=V1
NAME(7)=W1 ;NAME(12)=KE
NAME(13)=EP ;NAME(14)=TEMP
NAME(146)=KP ;NAME(147)=ET
NAME(148)=KT ;NAME(149)=LEN1
NAME(150)=ENUT
* Y in SOLUTN argument list denotes:
* 1-stored 2-solved 3-whole-field
* 4-point-by-point 5-explicit 6-harmonic averaging
SOLUTN(P1,Y,Y,N,N,N,Y)
SOLUTN(V1,Y,Y,N,N,N,Y)
SOLUTN(W1,Y,Y,N,N,N,Y)
SOLUTN(KE,Y,N,N,N,N,N)
SOLUTN(EP,Y,Y,N,N,N,N)
SOLUTN(TEMP,Y,Y,N,N,N,Y)
SOLUTN(KP,Y,Y,N,N,N,N)
SOLUTN(ET,Y,Y,N,N,N,N)
SOLUTN(KT,Y,Y,N,N,N,N)
SOLUTN(LEN1,Y,N,N,N,N,Y)
SOLUTN(ENUT,Y,N,N,N,N,Y)
VIST = 150
LEN1 = 149
************************************************************
Group 8. Terms & Devices
* Y in TERMS argument list denotes:
* 1-built-in source 2-convection 3-diffusion 4-transient
* 5-first phase variable 6-interphase transport
TERMS(P1,Y,Y,Y,N,Y,Y)
TERMS(V1,Y,Y,Y,Y,Y,Y)
TERMS(W1,Y,Y,Y,Y,Y,Y)
TERMS(EP,N,Y,Y,Y,Y,N)
TERMS(TEMP,N,Y,Y,Y,Y,Y)
TERMS(KP,N,Y,Y,Y,Y,N)
TERMS(ET,N,Y,Y,Y,Y,N)
TERMS(KT,N,Y,Y,Y,Y,N)
DIFCUT =0. ;ZDIFAC =1.
GALA = F ;ADDDIF = F
NEWENT = T
ISOLX = -1 ;ISOLY = -1 ;ISOLZ = -1
************************************************************
Group 9. Properties used if PRPS is not
stored, and where PRPS = -1.0 if it is!
RHO1 =1. ;TMP1 =0.
EL1 = GRND4
TSURR =0. ;TEMP0 =0.
PRESS0 =0.
DVO1DT =0. ;DRH1DP =0.
EMISS =0. ;SCATT =0.
RADIA =0. ;RADIB =0.
EL1A =0. ;EL1B =0.
EL1C =0.
ENUL =2.0E-06 ;ENUT = GRND5
ENUTA =0. ;ENUTB =0.
ENUTC =0.
IENUTA = 7
PRNDTL(V1)=1. ;PRNDTL(W1)=1.
PRNDTL(EP)=1. ;PRNDTL(TEMP)=1.
PRNDTL(KP)=1. ;PRNDTL(ET)=1.
PRNDTL(KT)=1.
PRT(V1)=1. ;PRT(W1)=1.
PRT(EP)=1.15 ;PRT(TEMP)=0.7
PRT(KP)=1.15 ;PRT(ET)=0.75
PRT(KT)=0.75
CP1 =1. ;CP2 =1.
************************************************************
Group 10.Inter-Phase Transfer Processes
************************************************************
Group 11.Initial field variables (PHIs)
FIINIT(P1)=1.0E-10 ;FIINIT(V1)=1.0E-10
FIINIT(W1)=1.0E-10 ;FIINIT(KE)=1.0E-02
FIINIT(EP)=1.738979 ;FIINIT(TEMP)=1.0E-10
FIINIT(KP)=7.999999E-03 ;FIINIT(ET)=1.738979
FIINIT(KT)=2.0E-03 ;FIINIT(LEN1)=1.0E-10
FIINIT(ENUT)=5.7505E-05
No PATCHes yet used for this Group
INIADD = F
FSWEEP = 1
NAMFI =CHAM
************************************************************
Group 12. Patchwise adjustment of terms
Patches for this group are printed with those
for Group 13.
Their names begin either with GP12 or &
************************************************************
Group 13. Boundary & Special Sources

PATCH(TSKESO ,PHASEM, 0, 0, 0, 0, 0, 0, 1, 1)
COVAL(TSKESO ,EP , GRND5 , GRND5 )
COVAL(TSKESO ,KP , GRND5 , GRND5 )
COVAL(TSKESO ,ET , GRND5 , GRND5 )
COVAL(TSKESO ,KT , GRND5 , GRND5 )

PATCH(HIGHY ,NORTH , 1, 1, 30, 30, 1, 20, 1, 1)
COVAL(HIGHY ,P1 ,1.0E+04 ,0. )
COVAL(HIGHY ,V1 ,0. ,0. )
COVAL(HIGHY ,W1 ,0. ,0. )
COVAL(HIGHY ,EP ,0. ,1.0E-10 )
COVAL(HIGHY ,TEMP,0. ,0. )
COVAL(HIGHY ,KP ,0. ,1.0E-10 )
COVAL(HIGHY ,ET ,0. ,1.0E-10 )
COVAL(HIGHY ,KT ,0. ,1.0E-10 )

PATCH(NOZZLE ,LOW , 1, 1, 1, 15, 1, 1, 1, 1)
COVAL(NOZZLE ,P1 , FIXFLU ,10. )
COVAL(NOZZLE ,W1 ,0. ,10. )
COVAL(NOZZLE ,EP ,0. ,1.738979 )
COVAL(NOZZLE ,TEMP,0. ,1. )
COVAL(NOZZLE ,KP ,0. ,7.999999E-03 )
COVAL(NOZZLE ,ET ,0. ,1.738979 )
COVAL(NOZZLE ,KT ,0. ,2.0E-03 )
XCYCLE = F
EGWF = T
WALLCO = GRND2
************************************************************
Group 14. Downstream Pressure For PARAB
IPARAB = 1
AZPH =0. ;PBAR =0.
************************************************************
Group 15. Terminate Sweeps
LSWEEP = 1 ;ISWC1 = 1
LITHYD = 25 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1
SELREF = T
RESFAC =0.1
************************************************************
Group 16. Terminate Iterations
LITER(P1)=20 ;LITER(V1)=10
LITER(W1)=10 ;LITER(EP)=20
LITER(TEMP)=20 ;LITER(KP)=20
LITER(ET)=20 ;LITER(KT)=20
ENDIT(P1)=1.0E-03 ;ENDIT(V1)=1.0E-03
ENDIT(W1)=1.0E-03 ;ENDIT(EP)=1.0E-03
ENDIT(TEMP)=1.0E-03 ;ENDIT(KP)=1.0E-03
ENDIT(ET)=1.0E-03 ;ENDIT(KT)=1.0E-03
************************************************************
Group 17. Relaxation
RELAX(P1,LINRLX,1.)
RELAX(V1,FALSDT,1.)
RELAX(W1,FALSDT,1.)
RELAX(KE,LINRLX,1.)
RELAX(EP,LINRLX,0.5)
RELAX(TEMP,FALSDT,10.)
RELAX(KP,LINRLX,0.5)
RELAX(ET,LINRLX,0.5)
RELAX(KT,LINRLX,0.5)
RELAX(LEN1,LINRLX,1.)
RELAX(ENUT,LINRLX,0.5)
KELIN = 0
OVRRLX =0.
EXPERT = F ;NNORSL = F
************************************************************
Group 18. Limits
VARMAX(P1)=1.0E+10 ;VARMIN(P1)=-1.0E+10
VARMAX(V1)=1000. ;VARMIN(V1)=-1000.
VARMAX(W1)=1.0E+06 ;VARMIN(W1)=-1.0E+06
VARMAX(KE)=1.0E+10 ;VARMIN(KE)=1.0E-10
VARMAX(EP)=1.0E+10 ;VARMIN(EP)=1.0E-10
VARMAX(TEMP)=1.0E+10 ;VARMIN(TEMP)=-1.0E+10
VARMAX(KP)=1.0E+10 ;VARMIN(KP)=1.0E-10
VARMAX(ET)=1.0E+10 ;VARMIN(ET)=1.0E-10
VARMAX(KT)=1.0E+10 ;VARMIN(KT)=1.0E-10
VARMAX(LEN1)=1.0E+10 ;VARMIN(LEN1)=-1.0E+10
VARMAX(ENUT)=1.0E+10 ;VARMIN(ENUT)=-1.0E+10
************************************************************
Group 19. Data transmitted to GROUND
DWDY = T
GENK = T
PARSOL = F
DZW1 =0.05
IENUTA = 7
ISG62 = 1
************************************************************
Group 20. Preliminary Printout
************************************************************
Group 21. Print-out of Variables
INIFLD = F ;SUBWGR = F
* Y in OUTPUT argument list denotes:
* 1-field 2-correction-eq. monitor 3-selective dumping
* 4-whole-field residual 5-spot-value table 6-residual table
OUTPUT(P1,Y,N,Y,Y,Y,Y)
OUTPUT(V1,Y,N,Y,Y,Y,Y)
OUTPUT(W1,Y,N,Y,Y,Y,Y)
OUTPUT(KE,Y,N,Y,Y,Y,Y)
OUTPUT(EP,Y,N,Y,Y,Y,Y)
OUTPUT(TEMP,Y,N,Y,Y,Y,Y)
OUTPUT(KP,Y,N,Y,Y,Y,Y)
OUTPUT(ET,Y,N,Y,Y,Y,Y)
OUTPUT(KT,Y,N,Y,Y,Y,Y)
OUTPUT(LEN1,Y,N,Y,N,N,N)
OUTPUT(ENUT,Y,N,Y,N,N,N)
************************************************************
Group 22. Monitor Print-Out
IXMON = 1 ;IYMON = 15 ;IZMON = 10
NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1
UWATCH = T ;USTEER = T
HIGHLO = F
************************************************************
Group 23.Field Print-Out & Plot Control
NPRINT = 100000 ;NUMCLS = 5
NYPRIN = -1 ;IYPRF = 1 ;IYPRL = 10000
NZPRIN = 20 ;IZPRF = 1 ;IZPRL = 10000
IPLTF = 1 ;IPLTL = 25 ;NPLT = 1
ISWPRF = 1 ;ISWPRL = 100000
ITABL = 1 ;IPROF = 1
ABSIZ =0.5 ;ORSIZ =0.4
NTZPRF = 1 ;NCOLPF = 50
ICHR = 2 ;NCOLCO = 45 ;NROWCO = 20

PATCH(IZEQNZ ,PROFIL, 1, 1, 1, 30, 20, 20, 1, 1)
PLOT(IZEQNZ ,W1 ,0. ,0. )
PLOT(IZEQNZ ,TEMP,0. ,0. )
PLOT(IZEQNZ ,ENUT,0. ,0. )
************************************************************
Group 24. Dumps For Restarts
SAVE = T ;NOWIPE = F
NSAVE =CHAM
STOP
```