L(154)
    GROUP 1. Run title and other preliminaries
TEXT(Round Jet; K-E Turbu Model; Parab 
TITLE
mesg(PC486/50 time last reported as appx.3.5 min.
  A full description of this run is given in case 153 where the
  same flow is considered, but in this case the two-equation
  k-e turbulence model is used with the turbulent Prandtl number
  set equal to 0.5.
 
  GXLEN, GXENUT and GXKESO are used for this case.
    The locally-defined variables are as follows:
     EPSIN     The dissipation rate at the inlet
     GMIXL     The length scale at the inlet
REAL(EPSIN,GMIXL)
    GROUP 7. Variables stored, solved & named
SOLVE(EP)
    GROUP 9. Properties of the medium (or media)
  ** Select k-e length scale
EL1=KE15DEP
    GROUP 13. Boundary conditions and special sources
      1. Outer Boundary-- free stream
COVAL(HIGHY,EP,ONLYMS,1.E-6)
      2. Inlet Boundary-- uniform flow
   **Inlet dissipation rate=.1643*k**1.5/Lm
GMIXL=0.035*DIAM;EPSIN=TKEIN**1.5/GMIXL*.1643
COVAL(NOZZLE,EP,ONLYMS,EPSIN)
      3. Activate source terms for EP by setting CO & VAL to GRND4
COVAL(KESO,EP,KESOURCE,KESOURCE)
    GROUP 18. Limits on variables or increments to them
VARMIN(EP)=1.E-10
relax(enut,linrlx,0.5)
    GROUP 21. Print-out of variables
OUTPUT(EP,Y,Y,Y,N,Y,Y)
    GROUP 24. Dumps for restarts