```
TALK=T;RUN(1,1)
AUTOPLOT USE
fil
PHI 5

cl
da 1 u1
plot
msg Swirl velocity profile
pause
cl
da 1 w1
plot
msg Axial Velocity profile
pause
cl
da 1 u2rs
colf 1
msg Stress component U2-- red colour
da 1 v2rs
col3 2
msg Stress component V2-- blue colour
da 1 w2rs
col8 3
msg Stress component W2-- green colour
msg Press e to END
enduse
DISPLAY
The problem considered is 1d fully-developed swirling turbulent
flow and heat transfer in a pipe where the swirl is driven by the
pipe wall rotating around the pipe axis. The axial-velocity
Reynolds number is 45,318 and the swirl number N is 0.4634, where
N is the ratio of the tangential wall velocity to the bulk axial
velocity. Thus, the swirl-velocity Reynolds number is 21,000, and
the expected friction-velocity Reynolds number from the data is
2100. A constant heat flux is applied at the pipe wall and the
molecular Prandtl number is taken as unity.
ENDDIS
************************************************************
Group 1. Run Title and Number
************************************************************
************************************************************

TEXT(RSTM_1D ROTATING PIPE FLOW         :T605)

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

IRUNN = 1 ;LIBREF = 14
************************************************************
Group 2. Time dependence
************************************************************
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.5
YFRAC(1)=0.062469 ;YFRAC(2)=0.108765
YFRAC(3)=0.150439 ;YFRAC(4)=0.18937
YFRAC(5)=0.226381 ;YFRAC(6)=0.26193
YFRAC(7)=0.296307 ;YFRAC(8)=0.329713
YFRAC(9)=0.362291 ;YFRAC(10)=0.394152
YFRAC(11)=0.425381 ;YFRAC(12)=0.456046
YFRAC(13)=0.486204 ;YFRAC(14)=0.515901
YFRAC(15)=0.545176 ;YFRAC(16)=0.574064
YFRAC(17)=0.602592 ;YFRAC(18)=0.630786
YFRAC(19)=0.658669 ;YFRAC(20)=0.686259
YFRAC(21)=0.713575 ;YFRAC(22)=0.740631
YFRAC(23)=0.767443 ;YFRAC(24)=0.794023
YFRAC(25)=0.820382 ;YFRAC(26)=0.846531
YFRAC(27)=0.872479 ;YFRAC(28)=0.898236
YFRAC(29)=0.92381 ;YFRAC(30)=1.
************************************************************
Group 5. Z-Direction Grid Spacing
PARAB = F
NZ = 1
ZWLAST =1.
ZFRAC(1)=1.
************************************************************
Group 6. Body-Fitted Coordinates
************************************************************
Group 7. Variables: STOREd,SOLVEd,NAMEd
ONEPHS = T
NAME(3)=U1 ;NAME(5)=V1
NAME(7)=W1 ;NAME(12)=KE
NAME(13)=EP ;NAME(116)=PRPS
NAME(117)=DSDY ;NAME(118)=VTRS
NAME(119)=UTRS ;NAME(120)=VSC1
NAME(121)=USC1 ;NAME(122)=U2RS
NAME(123)=V2RS ;NAME(124)=W2RS
NAME(125)=UVRS ;NAME(126)=UWRS
NAME(127)=VWRS ;NAME(128)=LEN1
NAME(129)=ENUT ;NAME(130)=W2DK
NAME(131)=V2DK ;NAME(132)=U2DK
NAME(133)=VWDK ;NAME(134)=FWAL
NAME(135)=EPDK ;NAME(136)=PK
NAME(137)=DVW ;NAME(138)=PU2
NAME(139)=PV2 ;NAME(140)=PW2
NAME(141)=DWDY ;NAME(142)=UWDK
NAME(143)=UVDK ;NAME(144)=DVDX
NAME(145)=DUDY ;NAME(146)=PVW
NAME(147)=PUV ;NAME(148)=SC1
NAME(149)=TEM1 ;NAME(150)=U1EX
* Y in SOLUTN argument list denotes:
* 1-stored 2-solved 3-whole-field
* 4-point-by-point 5-explicit 6-harmonic averaging
SOLUTN(U1,Y,Y,N,N,N,Y)
SOLUTN(V1,Y,N,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(PRPS,Y,N,N,N,N,Y)
SOLUTN(DSDY,Y,N,N,N,N,Y)
SOLUTN(VTRS,Y,Y,N,N,N,N)
SOLUTN(UTRS,Y,Y,N,N,N,N)
SOLUTN(VSC1,Y,Y,N,N,N,N)
SOLUTN(USC1,Y,Y,N,N,N,N)
SOLUTN(U2RS,Y,Y,N,N,N,N)
SOLUTN(V2RS,Y,Y,N,N,N,N)
SOLUTN(W2RS,Y,Y,N,N,N,N)
SOLUTN(UVRS,Y,Y,N,N,N,N)
SOLUTN(UWRS,Y,Y,N,N,N,N)
SOLUTN(VWRS,Y,Y,N,N,N,N)
SOLUTN(LEN1,Y,N,N,N,N,N)
SOLUTN(ENUT,Y,N,N,N,N,N)
SOLUTN(W2DK,Y,N,N,N,N,Y)
SOLUTN(V2DK,Y,N,N,N,N,Y)
SOLUTN(U2DK,Y,N,N,N,N,Y)
SOLUTN(VWDK,Y,N,N,N,N,Y)
SOLUTN(FWAL,Y,N,N,N,N,Y)
SOLUTN(EPDK,Y,N,N,N,N,Y)
SOLUTN(PK,Y,N,N,N,N,Y)
SOLUTN(DVW,Y,N,N,N,N,Y)
SOLUTN(PU2,Y,N,N,N,N,Y)
SOLUTN(PV2,Y,N,N,N,N,Y)
SOLUTN(PW2,Y,N,N,N,N,Y)
SOLUTN(DWDY,Y,N,N,N,N,Y)
SOLUTN(UWDK,Y,N,N,N,N,Y)
SOLUTN(UVDK,Y,N,N,N,N,Y)
SOLUTN(DVDX,Y,N,N,N,N,Y)
SOLUTN(DUDY,Y,N,N,N,N,Y)
SOLUTN(PVW,Y,N,N,N,N,Y)
SOLUTN(PUV,Y,N,N,N,N,Y)
SOLUTN(SC1,Y,Y,N,N,N,Y)
SOLUTN(TEM1,Y,Y,N,N,N,Y)
SOLUTN(U1EX,Y,N,N,N,N,Y)
VIST = 129
LEN1 = 128
PRPS = 116
************************************************************
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(U1,Y,N,Y,Y,Y,Y)
TERMS(W1,Y,N,Y,Y,Y,Y)
TERMS(EP,Y,N,Y,Y,N,Y)
TERMS(VTRS,N,Y,Y,Y,Y,Y)
TERMS(UTRS,N,Y,Y,Y,N,Y)
TERMS(VSC1,N,Y,Y,Y,Y,Y)
TERMS(USC1,N,Y,Y,Y,N,Y)
TERMS(U2RS,N,Y,Y,Y,Y,Y)
TERMS(V2RS,N,Y,Y,Y,N,Y)
TERMS(W2RS,N,Y,Y,Y,Y,Y)
TERMS(UVRS,N,Y,Y,Y,N,Y)
TERMS(UWRS,N,Y,Y,Y,Y,Y)
TERMS(VWRS,N,Y,Y,Y,N,Y)
TERMS(SC1,N,N,Y,Y,Y,Y)
TERMS(TEM1,N,N,Y,Y,N,Y)
DIFCUT =0.5 ;ZDIFAC =1.
GALA = F ;ADDDIF = F
NEWENT = F
UDIFF = T
UCONNE = T
USOURC = 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 = GRND
TSURR =0. ;TEMP0 =0.
PRESS0 =0.
DVO1DT =0. ;DRH1DP =0.
EMISS =0. ;SCATT =0.
EL1A =0. ;EL1B =0.
EL1C =0.
ENUL =1.0E-05 ;ENUT = GRND
ENUTA =0. ;ENUTB =0.
ENUTC =0.
IENUTA = 0
PRNDTL(U1)=1. ;PRNDTL(W1)=1.
PRNDTL(EP)=1. ;PRNDTL(VTRS)=1.
PRNDTL(UTRS)=1. ;PRNDTL(VSC1)=1.
PRNDTL(USC1)=1. ;PRNDTL(U2RS)=1.
PRNDTL(V2RS)=1. ;PRNDTL(W2RS)=1.
PRNDTL(UVRS)=1. ;PRNDTL(UWRS)=1.
PRNDTL(VWRS)=1. ;PRNDTL(SC1)=1.
PRNDTL(TEM1)=CONDFILE
PRT(U1)=1. ;PRT(W1)=1.
PRT(EP)=1.314 ;PRT(VTRS)=1.
PRT(UTRS)=1. ;PRT(VSC1)=1.
PRT(USC1)=1. ;PRT(U2RS)=1.
PRT(V2RS)=1. ;PRT(W2RS)=1.
PRT(UVRS)=1. ;PRT(UWRS)=1.
PRT(VWRS)=1. ;PRT(SC1)=1.
PRT(TEM1)=1.
CP1 =1. ;CP2 =1.
*  List of user-defined materials to be read by EARTH
MATFLG=T;IMAT=1
*  Name
*Ind. Dens.  Viscos.  Spec.heat  Conduct.  Expans.  Compr.
*
37 1. 1.E-5 1.0 1.E-5 0
************************************************************
Group 10.Inter-Phase Transfer Processes
************************************************************
Group 11.Initial field variables (PHIs)
FIINIT(U1)=0.420007 ;FIINIT(V1)=0.
FIINIT(W1)=0.45318 ;FIINIT(KE)=8.82E-04
FIINIT(EP)=9.563743E-05 ;FIINIT(PRPS)=37.
FIINIT(DSDY)=1.0E-10 ;FIINIT(VTRS)=1.0E-10
FIINIT(UTRS)=1.0E-10 ;FIINIT(VSC1)=1.0E-10
FIINIT(USC1)=1.0E-10 ;FIINIT(U2RS)=5.88E-04
FIINIT(V2RS)=5.88E-04 ;FIINIT(W2RS)=5.88E-04
FIINIT(UVRS)=8.819999E-05 ;FIINIT(UWRS)=8.819999E-05
FIINIT(VWRS)=2.646E-04 ;FIINIT(LEN1)=1.0E-10
FIINIT(ENUT)=1.0E-10 ;FIINIT(W2DK)=1.0E-10
FIINIT(V2DK)=1.0E-10 ;FIINIT(U2DK)=1.0E-10
FIINIT(VWDK)=1.0E-10 ;FIINIT(FWAL)=1.0E-10
FIINIT(EPDK)=1.0E-10 ;FIINIT(PK)=1.0E-10
FIINIT(DVW)=1.0E-10 ;FIINIT(PU2)=1.0E-10
FIINIT(PV2)=1.0E-10 ;FIINIT(PW2)=1.0E-10
FIINIT(DWDY)=1.0E-10 ;FIINIT(UWDK)=1.0E-10
FIINIT(UVDK)=1.0E-10 ;FIINIT(DVDX)=1.0E-10
FIINIT(DUDY)=1.0E-10 ;FIINIT(PVW)=1.0E-10
FIINIT(PUV)=1.0E-10 ;FIINIT(SC1)=0.4
FIINIT(TEM1)=0.4 ;FIINIT(U1EX)=1.0E-10

PATCH(IN1 ,INIVAL, 1, 1, 1, 1, 1, 1, 1, 1)
INIT(IN1 ,U1EX,0. ,2.048778E-04 )

PATCH(IN2 ,INIVAL, 1, 1, 2, 2, 1, 1, 1, 1)
INIT(IN2 ,U1EX,0. ,1.539377E-03 )

PATCH(IN3 ,INIVAL, 1, 1, 3, 3, 1, 1, 1, 1)
INIT(IN3 ,U1EX,0. ,3.527361E-03 )

PATCH(IN4 ,INIVAL, 1, 1, 4, 4, 1, 1, 1, 1)
INIT(IN4 ,U1EX,0. ,6.062308E-03 )

PATCH(IN5 ,INIVAL, 1, 1, 5, 5, 1, 1, 1, 1)
INIT(IN5 ,U1EX,0. ,9.07474E-03 )

PATCH(IN6 ,INIVAL, 1, 1, 6, 6, 1, 1, 1, 1)
INIT(IN6 ,U1EX,0. ,0.012519 )

PATCH(IN7 ,INIVAL, 1, 1, 7, 7, 1, 1, 1, 1)
INIT(IN7 ,U1EX,0. ,0.016361 )

PATCH(IN8 ,INIVAL, 1, 1, 8, 8, 1, 1, 1, 1)
INIT(IN8 ,U1EX,0. ,0.020575 )

PATCH(IN9 ,INIVAL, 1, 1, 9, 9, 1, 1, 1, 1)
INIT(IN9 ,U1EX,0. ,0.025141 )

PATCH(IN10 ,INIVAL, 1, 1, 10, 10, 1, 1, 1, 1)
INIT(IN10 ,U1EX,0. ,0.030041 )

PATCH(IN11 ,INIVAL, 1, 1, 11, 11, 1, 1, 1, 1)
INIT(IN11 ,U1EX,0. ,0.035261 )

PATCH(IN12 ,INIVAL, 1, 1, 12, 12, 1, 1, 1, 1)
INIT(IN12 ,U1EX,0. ,0.040789 )

PATCH(IN13 ,INIVAL, 1, 1, 13, 13, 1, 1, 1, 1)
INIT(IN13 ,U1EX,0. ,0.046612 )

PATCH(IN14 ,INIVAL, 1, 1, 14, 14, 1, 1, 1, 1)
INIT(IN14 ,U1EX,0. ,0.052722 )

PATCH(IN15 ,INIVAL, 1, 1, 15, 15, 1, 1, 1, 1)
INIT(IN15 ,U1EX,0. ,0.05911 )

PATCH(IN16 ,INIVAL, 1, 1, 16, 16, 1, 1, 1, 1)
INIT(IN16 ,U1EX,0. ,0.065768 )

PATCH(IN17 ,INIVAL, 1, 1, 17, 17, 1, 1, 1, 1)
INIT(IN17 ,U1EX,0. ,0.072688 )

PATCH(IN18 ,INIVAL, 1, 1, 18, 18, 1, 1, 1, 1)
INIT(IN18 ,U1EX,0. ,0.079865 )

PATCH(IN19 ,INIVAL, 1, 1, 19, 19, 1, 1, 1, 1)
INIT(IN19 ,U1EX,0. ,0.087293 )

PATCH(IN20 ,INIVAL, 1, 1, 20, 20, 1, 1, 1, 1)
INIT(IN20 ,U1EX,0. ,0.094965 )

PATCH(IN21 ,INIVAL, 1, 1, 21, 21, 1, 1, 1, 1)
INIT(IN21 ,U1EX,0. ,0.102877 )

PATCH(IN22 ,INIVAL, 1, 1, 22, 22, 1, 1, 1, 1)
INIT(IN22 ,U1EX,0. ,0.111024 )

PATCH(IN23 ,INIVAL, 1, 1, 23, 23, 1, 1, 1, 1)
INIT(IN23 ,U1EX,0. ,0.119402 )

PATCH(IN24 ,INIVAL, 1, 1, 24, 24, 1, 1, 1, 1)
INIT(IN24 ,U1EX,0. ,0.128006 )

PATCH(IN25 ,INIVAL, 1, 1, 25, 25, 1, 1, 1, 1)
INIT(IN25 ,U1EX,0. ,0.136833 )

PATCH(IN26 ,INIVAL, 1, 1, 26, 26, 1, 1, 1, 1)
INIT(IN26 ,U1EX,0. ,0.145879 )

PATCH(IN27 ,INIVAL, 1, 1, 27, 27, 1, 1, 1, 1)
INIT(IN27 ,U1EX,0. ,0.15514 )

PATCH(IN28 ,INIVAL, 1, 1, 28, 28, 1, 1, 1, 1)
INIT(IN28 ,U1EX,0. ,0.164613 )

PATCH(IN29 ,INIVAL, 1, 1, 29, 29, 1, 1, 1, 1)
INIT(IN29 ,U1EX,0. ,0.174295 )

PATCH(IN30 ,INIVAL, 1, 1, 30, 30, 1, 1, 1, 1)
INIT(IN30 ,U1EX,0. ,0.194308 )
FSWEEP = 1
IURINI = -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(FDFW1DP ,VOLUME, 1, 1, 1, 30, 1, 1, 1, 1)
COVAL(FDFW1DP ,W1 ,5.66475E-03 , GRND1 )

PATCH(WAL1 ,NWALL , 1, 1, 30, 30, 1, 1, 1, 1)
COVAL(WAL1 ,U1 , GRND2 ,0.202023 )
COVAL(WAL1 ,W1 , GRND2 ,0. )
COVAL(WAL1 ,EP , GRND2 , GRND2 )
COVAL(WAL1 ,SC1 , FIXFLU ,1.221081E-03 )
COVAL(WAL1 ,TEM1, FIXFLU ,1.221081E-03 )

PATCH(WDMPN03 ,PHASEM, 1, 1, 1, 30, 1, 1, 1, 1)
COVAL(WDMPN03 ,VTRS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,UTRS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,VSC1, FIXFLU , GRND1 )
COVAL(WDMPN03 ,USC1, FIXFLU , GRND1 )
COVAL(WDMPN03 ,U2RS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,V2RS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,W2RS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,UVRS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,UWRS, FIXFLU , GRND1 )
COVAL(WDMPN03 ,VWRS, FIXFLU , GRND1 )

PATCH(SMPLS ,SOUTH , 1, 1, 1, 1, 1, 1, 1, 1)
COVAL(SMPLS ,VTRS, GRND1 ,0. )
COVAL(SMPLS ,VSC1, GRND1 ,0. )
COVAL(SMPLS ,UVRS, GRND1 ,0. )
COVAL(SMPLS ,UWRS, GRND1 ,0. )
COVAL(SMPLS ,VWRS, GRND1 ,0. )

PATCH(GP12CONH,CELL , 1, 1, 1, 30, 1, 1, 1, 1)
COVAL(GP12CONH,VTRS,0. ,0. )
COVAL(GP12CONH,UTRS,0. ,0. )
COVAL(GP12CONH,VSC1,0. ,0. )
COVAL(GP12CONH,USC1,0. ,0. )
COVAL(GP12CONH,U2RS,0. ,0. )
COVAL(GP12CONH,V2RS,0. ,0. )
COVAL(GP12CONH,W2RS,0. ,0. )
COVAL(GP12CONH,UVRS,0. ,0. )
COVAL(GP12CONH,UWRS,0. ,0. )
COVAL(GP12CONH,VWRS,0. ,0. )

PATCH(FDFCHF ,PHASEM, 1, 1, 1, 30, 1, 1, 1, 1)
COVAL(FDFCHF ,SC1 ,0.010778 , GRND1 )
COVAL(FDFCHF ,TEM1,0.010778 , GRND1 )

PATCH(TFIX ,CELL , 1, 1, 1, 1, 1, 1, 1, 1)
COVAL(TFIX ,SC1 ,1. ,0. )
COVAL(TFIX ,TEM1,1. ,0. )
XCYCLE = F
EGWF = T
WALLCO = GRND2
************************************************************
Group 14. Downstream Pressure For PARAB
************************************************************
Group 15. Terminate Sweeps
LSWEEP = 400 ;ISWC1 = 1
LITHYD = 5 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1
SELREF = T
RESFAC =1.0E-04
************************************************************
Group 16. Terminate Iterations
LITER(U1)=10 ;LITER(W1)=10
LITER(EP)=20 ;LITER(VTRS)=20
LITER(UTRS)=20 ;LITER(VSC1)=20
LITER(USC1)=20 ;LITER(U2RS)=20
LITER(V2RS)=20 ;LITER(W2RS)=20
LITER(UVRS)=20 ;LITER(UWRS)=20
LITER(VWRS)=20 ;LITER(SC1)=20
LITER(TEM1)=20
ENDIT(U1)=1.0E-03 ;ENDIT(W1)=1.0E-03
ENDIT(EP)=1.0E-03 ;ENDIT(VTRS)=1.0E-03
ENDIT(UTRS)=1.0E-03 ;ENDIT(VSC1)=1.0E-03
ENDIT(USC1)=1.0E-03 ;ENDIT(U2RS)=1.0E-03
ENDIT(V2RS)=1.0E-03 ;ENDIT(W2RS)=1.0E-03
ENDIT(UVRS)=1.0E-03 ;ENDIT(UWRS)=1.0E-03
ENDIT(VWRS)=1.0E-03 ;ENDIT(SC1)=1.0E-03
ENDIT(TEM1)=1.0E-03
************************************************************
Group 17. Relaxation
RELAX(U1,FALSDT,0.5)
RELAX(V1,LINRLX,1.)
RELAX(W1,FALSDT,0.5)
RELAX(KE,LINRLX,1.)
RELAX(EP,FALSDT,0.5)
RELAX(PRPS,LINRLX,1.)
RELAX(DSDY,LINRLX,1.)
RELAX(VTRS,FALSDT,0.1)
RELAX(UTRS,FALSDT,0.1)
RELAX(VSC1,FALSDT,0.1)
RELAX(USC1,FALSDT,0.1)
RELAX(U2RS,FALSDT,0.1)
RELAX(V2RS,FALSDT,0.1)
RELAX(W2RS,FALSDT,0.1)
RELAX(UVRS,FALSDT,0.1)
RELAX(UWRS,FALSDT,0.1)
RELAX(VWRS,FALSDT,0.1)
RELAX(LEN1,LINRLX,1.)
RELAX(ENUT,LINRLX,1.)
RELAX(W2DK,LINRLX,1.)
RELAX(V2DK,LINRLX,1.)
RELAX(U2DK,LINRLX,1.)
RELAX(VWDK,LINRLX,1.)
RELAX(FWAL,LINRLX,1.)
RELAX(EPDK,LINRLX,1.)
RELAX(PK,LINRLX,1.)
RELAX(DVW,LINRLX,1.)
RELAX(PU2,LINRLX,1.)
RELAX(PV2,LINRLX,1.)
RELAX(PW2,LINRLX,1.)
RELAX(DWDY,LINRLX,1.)
RELAX(UWDK,LINRLX,1.)
RELAX(UVDK,LINRLX,1.)
RELAX(DVDX,LINRLX,1.)
RELAX(DUDY,LINRLX,1.)
RELAX(PVW,LINRLX,1.)
RELAX(PUV,LINRLX,1.)
RELAX(SC1,FALSDT,2.)
RELAX(TEM1,FALSDT,2.)
RELAX(U1EX,LINRLX,1.)
OVRRLX =0.
EXPERT = F ;NNORSL = F
************************************************************
Group 18. Limits
VARMAX(U1)=1.0E+06 ;VARMIN(U1)=-1.0E+06
VARMAX(V1)=1.0E+06 ;VARMIN(V1)=-1.0E+06
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(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10
VARMAX(DSDY)=1.0E+10 ;VARMIN(DSDY)=-1.0E+10
VARMAX(VTRS)=1.0E+10 ;VARMIN(VTRS)=-1.0E+10
VARMAX(UTRS)=1.0E+10 ;VARMIN(UTRS)=-1.0E+10
VARMAX(VSC1)=1.0E+10 ;VARMIN(VSC1)=-1.0E+10
VARMAX(USC1)=1.0E+10 ;VARMIN(USC1)=-1.0E+10
VARMAX(U2RS)=1.0E+10 ;VARMIN(U2RS)=-1.0E+10
VARMAX(V2RS)=1.0E+10 ;VARMIN(V2RS)=-1.0E+10
VARMAX(W2RS)=1.0E+10 ;VARMIN(W2RS)=-1.0E+10
VARMAX(UVRS)=1.0E+10 ;VARMIN(UVRS)=-1.0E+10
VARMAX(UWRS)=1.0E+10 ;VARMIN(UWRS)=-1.0E+10
VARMAX(VWRS)=1.0E+10 ;VARMIN(VWRS)=-1.0E+10
VARMAX(LEN1)=1.0E+10 ;VARMIN(LEN1)=-1.0E+10
VARMAX(ENUT)=1.0E+10 ;VARMIN(ENUT)=-1.0E+10
VARMAX(W2DK)=1.0E+10 ;VARMIN(W2DK)=-1.0E+10
VARMAX(V2DK)=1.0E+10 ;VARMIN(V2DK)=-1.0E+10
VARMAX(U2DK)=1.0E+10 ;VARMIN(U2DK)=-1.0E+10
VARMAX(VWDK)=1.0E+10 ;VARMIN(VWDK)=-1.0E+10
VARMAX(FWAL)=1.0E+10 ;VARMIN(FWAL)=-1.0E+10
VARMAX(EPDK)=1.0E+10 ;VARMIN(EPDK)=-1.0E+10
VARMAX(PK)=1.0E+10 ;VARMIN(PK)=-1.0E+10
VARMAX(DVW)=1.0E+10 ;VARMIN(DVW)=-1.0E+10
VARMAX(PU2)=1.0E+10 ;VARMIN(PU2)=-1.0E+10
VARMAX(PV2)=1.0E+10 ;VARMIN(PV2)=-1.0E+10
VARMAX(PW2)=1.0E+10 ;VARMIN(PW2)=-1.0E+10
VARMAX(DWDY)=1.0E+10 ;VARMIN(DWDY)=-1.0E+10
VARMAX(UWDK)=1.0E+10 ;VARMIN(UWDK)=-1.0E+10
VARMAX(UVDK)=1.0E+10 ;VARMIN(UVDK)=-1.0E+10
VARMAX(DVDX)=1.0E+10 ;VARMIN(DVDX)=-1.0E+10
VARMAX(DUDY)=1.0E+10 ;VARMIN(DUDY)=-1.0E+10
VARMAX(PVW)=1.0E+10 ;VARMIN(PVW)=-1.0E+10
VARMAX(PUV)=1.0E+10 ;VARMIN(PUV)=-1.0E+10
VARMAX(SC1)=1.0E+10 ;VARMIN(SC1)=-1.0E+10
VARMAX(TEM1)=1.0E+10 ;VARMIN(TEM1)=-1.0E+10
VARMAX(U1EX)=1.0E+10 ;VARMIN(U1EX)=-1.0E+10
************************************************************
Group 19. Data transmitted to GROUND
GENK = T
RSTM = T
FDFSOL = T
PARSOL = F
IRSMSM = 2
ISG62 = 1
CSG10   ='q1'
SPEDAT(SET,GXMONI,PLOTALL,L,T)
SPEDAT(SET,MATERIAL,37,L,T)
************************************************************
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(U1,Y,N,Y,Y,Y,Y)
OUTPUT(V1,Y,N,Y,N,N,N)
OUTPUT(W1,Y,N,Y,Y,Y,Y)
OUTPUT(KE,Y,N,Y,N,N,N)
OUTPUT(EP,Y,N,Y,Y,Y,Y)
OUTPUT(PRPS,Y,N,Y,N,N,N)
OUTPUT(DSDY,Y,N,Y,N,N,N)
OUTPUT(VTRS,Y,N,Y,Y,Y,Y)
OUTPUT(UTRS,Y,N,Y,Y,Y,Y)
OUTPUT(VSC1,Y,N,Y,Y,Y,Y)
OUTPUT(USC1,Y,N,Y,Y,Y,Y)
OUTPUT(U2RS,Y,N,Y,Y,Y,Y)
OUTPUT(V2RS,Y,N,Y,Y,Y,Y)
OUTPUT(W2RS,Y,N,Y,Y,Y,Y)
OUTPUT(UVRS,Y,N,Y,Y,Y,Y)
OUTPUT(UWRS,Y,N,Y,Y,Y,Y)
OUTPUT(VWRS,Y,N,Y,Y,Y,Y)
OUTPUT(LEN1,Y,N,Y,N,N,N)
OUTPUT(ENUT,Y,N,Y,N,N,N)
OUTPUT(W2DK,Y,N,Y,N,N,N)
OUTPUT(V2DK,Y,N,Y,N,N,N)
OUTPUT(U2DK,Y,N,Y,N,N,N)
OUTPUT(VWDK,Y,N,Y,N,N,N)
OUTPUT(FWAL,Y,N,Y,N,N,N)
OUTPUT(EPDK,Y,N,Y,N,N,N)
OUTPUT(PK,Y,N,Y,N,N,N)
OUTPUT(DVW,Y,N,Y,N,N,N)
OUTPUT(PU2,Y,N,Y,N,N,N)
OUTPUT(PV2,Y,N,Y,N,N,N)
OUTPUT(PW2,Y,N,Y,N,N,N)
OUTPUT(DWDY,Y,N,Y,N,N,N)
OUTPUT(UWDK,Y,N,Y,N,N,N)
OUTPUT(UVDK,Y,N,Y,N,N,N)
OUTPUT(DVDX,Y,N,Y,N,N,N)
OUTPUT(DUDY,Y,N,Y,N,N,N)
OUTPUT(PVW,Y,N,Y,N,N,N)
OUTPUT(PUV,Y,N,Y,N,N,N)
OUTPUT(SC1,Y,N,Y,Y,Y,Y)
OUTPUT(TEM1,Y,N,Y,Y,Y,Y)
OUTPUT(U1EX,Y,N,Y,N,N,N)
WALPRN = T
************************************************************
Group 22. Monitor Print-Out
IXMON = 1 ;IYMON = 29 ;IZMON = 1
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
IPLTF = 1 ;IPLTL = -1 ;NPLT = 10
ISWPRF = 1 ;ISWPRL = 100000
ITABL = 3 ;IPROF = 1
ABSIZ =0.5 ;ORSIZ =0.4
NTZPRF = 1 ;NCOLPF = 50
ICHR = 2 ;NCOLCO = 45 ;NROWCO = 20
No PATCHes yet used for this Group
************************************************************
Group 24. Dumps For Restarts
SAVE = T ;NOWIPE = F
NSAVE =CHAM
STOP
```