L(153)
    GROUP 1.Run title and other preliminaries
TEXT(Round Jet; K-L 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 Prandtl one-
  equation model is used with the mixing-length Lm being specified
  as uniform across the jet and equal to 0.07 times the width of
  the turbulent region. The turbulent Prandtl number is set equal
  to 0.5.
 
  GXLEN, GXENUT and GXKESO are used for this case.
 
    The locally-defined variables are as follows:
 
     TKEIN       The turbulent kinetic energy at the inlet
 
REAL(TKEIN)
TKEIN=WJET*WJET*0.0001
 
    GROUP 7. Variables stored, solved & named
SOLVE(KE)
 
    GROUP 9. Properties of the medium (or media)
  ** Select Prandtl-Kolmogorov formula supplied in GXENUT for
     the turbulent kinematic viscosity; the GXENUT is called from
     Group 9/Sect. 5 of GREX3.
ENUT=PRKOLM
    GROUP 13. Boundary conditions and special sources
      1. Outer Boundary-- free stream
COVAL(HIGHY,KE,ONLYMS,1.E-10)
      2. Inlet Boundary-- uniform flow
COVAL(NOZZLE,KE,ONLYMS,TKEIN)
      3. Activate source terms for KE by setting CO & VAL to GRND4;
PATCH(KESO,PHASEM,1,1,1,NY,1,NZ,1,1)
COVAL(KESO,KE,KESOURCE,KESOURCE)
    GROUP 17. Under-relaxation devices
RELAX(KE,LINRLX,0.5);KELIN=3
    GROUP 18. Limits on variables or increments to them
VARMIN(KE)=1.E-10
    GROUP 21. Print-out of variables
OUTPUT(KE,Y,Y,Y,N,Y,Y)
    GROUP 23. Field print-out and plot control
PLOT(IZEQNZ,KE,0.0,0.0)