mesg(case 173 will be loaded first. Press ENTER to continue
readvdu(nphi,int,nphi)
L(173)
    GROUP 1. Run title and other preliminaries
TEXT(Pipe Flow  K-L Model;Parabolic    
TITLE
REAL(TKEIN);AK=0.435
    GROUP 7. Variables stored, solved & named
TURMOD(KLMODL)
EL1=NIKURPIP;EL1A=.14*RAD;EL1B=-0.08/RAD;EL1C=-0.06/RAD3
    GROUP 11. Initialization of variable or porosity fields
TKEIN=WIN*WIN*2.e-4;FIINIT(TEMP)=1.000E-10;FIINIT(KE)=TKEIN
    GROUP 13. Boundary conditions and special sources
COVAL(WFUN,KE,LOGLAW,LOGLAW);VALUE(IN,KE,TKEIN)
KELIN=3
    GROUP 19. Data communicated by SATELLITE to GROUND
   ** Select strain-rate for turbulence production term
GENK=F
    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,20.0)
PLOT(LONGPLOT,KE,0.0,0.0);PLOT(LONGPLT2,KE,0.0,0.0)