mesg(case 174 will be loaded first. Press ENTER to continue
readvdu(nphi,int,nphi)
L(174)
    GROUP 1. Run title and other preliminaries
TEXT(Pipe Flow K-E Turbul Model;Parab  
TITLE
  A full description of this run is given in case 173 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.86 and the molecular Prandtl number to 0.71.
REAL(EPIN,MIXL)
    GROUP 4. Y-direction grid specification
GRDPWR(Y,NY,RAD,0.6)
    GROUP 7. Variables stored,solved & named
TURMOD(KEMODL)
    GROUP 9. Properties of the medium (or media)
EL1A=0.0;EL1B=0.0;EL1C=0.0
    GROUP 11. Initialization of variable or porosity fields
MIXL=0.09*RAD;EPIN=TKEIN**1.5/MIXL*0.1643;FIINIT(TEMP)=TIN
FIINIT(EP)=EPIN
 
    GROUP 13. Boundary conditions and special sources
   **North-Wall Boundary
COVAL(WFUN,KE,LOGLAW,LOGLAW);COVAL(WFUN,EP,LOGLAW,LOGLAW)
  ** Inlet Boundary
INLET(IN,LOW,1,1,1,NY,1,1,1,1)
VALUE(IN,KE,TKEIN);VALUE(IN,EP,EPIN)
 
    GROUP 16. Termination of iterations
RESREF(TEMP)=1.E-5;RESREF(EP)=1.E-5
 
    GROUP 18. Limits on variables or increments to them
VARMIN(W1)=1.0E-10
 
    GROUP 21. Print-out of variables
OUTPUT(EP,Y,Y,Y,N,Y,Y);OUTPUT(LEN1,N,N,N,N,N,N)
 
    GROUP 23. Field print-out and plot control
PLOT(IZEQNZ,KE,0.0,0.0);PLOT(IZEQNZ,EP,0.0,0.0)
PLOT(IZEQNZ,LEN1,0.0,0.0);PLOT(LONGPLOT,KE,0.0,0.0)
PLOT(LONGPLOT,EP,0.0,0.0);PLOT(LONGPLT2,KE,0.0,0.0)
PLOT(LONGPLT2,EP,0.0,0.0)
 
    GROUP 24. Dumps for restarts