GROUP 1. Run title and other preliminaries
TEXT(RADIATION TEST CASE - XYZ          :D208
TITLE
    GROUP 2. Transience; time-step specification
STEADY=T
    GROUP 3. X-direction grid specification
CARTES=T
NREGX=3
IREGX=1;GRDPWR(X,1,0.01,1)
IREGX=2;GRDPWR(X,1,0.01,1)
IREGX=3;GRDPWR(X,1,0.01,1)
    GROUP 4. Y-direction grid specification
NREGY=3
IREGY=1;GRDPWR(Y,1,0.01,1)
IREGY=2;GRDPWR(Y,1,0.01,1)
IREGY=3;GRDPWR(Y,1,0.01,1)
    GROUP 5. Z-direction grid specification
NREGZ=3
IREGZ=1;GRDPWR(Z,1,0.01,1)
IREGZ=2;GRDPWR(Z,1,0.01,1)
IREGZ=3;GRDPWR(Z,1,0.01,1)
    GROUP 7. Variables stored, solved & named
SOLVE(P1,U1,V1,W1,TEM1)
SOLUTN(P1,Y,Y,Y,N,N,N)
SOLUTN(TEM1,Y,Y,Y,N,N,Y)
STORE(RHO1,ENUL,EMIS,PRPS)
    GROUP 8. Terms (in differential equations) & devices
IVARBK=-1;ISOLBK=1
ISOLX=0;ISOLY=0;ISOLZ=0
DIFCUT=0.0
    GROUP 9. Properties of the medium (or media)
SETPRPS(1,1)
PRESS0=133.0
RHO1=1.568E-03
ENUL=1.070E-02
    GROUP 10. Inter-phase-transfer processes and properties
    GROUP 11. Initialization of variable or porosity fields
FIINIT(P1)=0.0;FIINIT(U1)=0.0;FIINIT(V1)=0.0;FIINIT(W1)=0.0
FIINIT(TEM1)=290.0;FIINIT(EMIS)=0.0;FIINIT(PRPS)=-1
CONPOR(BLK1,-1,CELL,-2,-2,-2,-2,-2,-2)
COVAL(BLK1,PRPS,0.0,111)
    GROUP 13. Boundary conditions and special sources
PATCH(WALL1,HWALL,1,3,1,3,3,3,1,1)
COVAL(WALL1,TEM1,1.0,290.0)
COVAL(WALL1,U1,1.0,0.0)
COVAL(WALL1,V1,1.0,0.0)
PATCH(WALL2,LWALL,1,3,1,3,1,1,1,1)
COVAL(WALL2,TEM1,1.0,290.0)
COVAL(WALL2,U1,1.0,0.0)
COVAL(WALL2,V1,1.0,0.0)
PATCH(WALL3,NWALL,1,3,3,3,1,3,1,1)
COVAL(WALL3,TEM1,1.0,290.0)
COVAL(WALL3,U1,1.0,0.0)
COVAL(WALL3,W1,1.0,0.0)
PATCH(WALL4,SWALL,1,3,1,1,1,3,1,1)
COVAL(WALL4,TEM1,1.0,290.0)
COVAL(WALL4,U1,1.0,0.0)
COVAL(WALL4,W1,1.0,0.0)
PATCH(WALL5,EWALL,3,3,1,3,1,3,1,1)
COVAL(WALL5,TEM1,1.0,290.0)
COVAL(WALL5,V1,1.0,0.0)
COVAL(WALL5,W1,1.0,0.0)
PATCH(WALL6,WWALL,1,1,1,3,1,3,1,1)
COVAL(WALL6,TEM1,1.0,290.0)
COVAL(WALL6,V1,1.0,0.0)
COVAL(WALL6,W1,1.0,0.0)
S2SR=T
PATCH(@RI001,LOW,1,3,1,3,1,1,1,1)
COVAL(@RI001,TEM1,0.0,600)
COVAL(@RI001,EMIS,198,0.0)
PATCH(@RI002,HIGH,1,3,1,3,3,3,1,1)
COVAL(@RI002,TEM1,0.0,600)
COVAL(@RI002,EMIS,198,0.0)
PATCH(@RI003,SOUTH,1,3,1,1,1,3,1,1)
COVAL(@RI003,TEM1,0.0,600)
COVAL(@RI003,EMIS,198,0.0)
PATCH(@RI004,NORTH,1,3,3,3,1,3,1,1)
COVAL(@RI004,TEM1,0.0,600)
COVAL(@RI004,EMIS,198,0.0)
PATCH(@RI005,WEST,1,1,1,3,1,3,1,1)
COVAL(@RI005,TEM1,0.0,600)
COVAL(@RI005,EMIS,198,0.0)
PATCH(@RI006,EAST,3,3,1,3,1,3,1,1)
COVAL(@RI006,TEM1,0.0,600)
COVAL(@RI006,EMIS,198,0.0)
PATCH(@RI007,LOW,2,2,2,2,2,2,1,1)
COVAL(@RI007,TEM1,GRND1,GRND1)
COVAL(@RI007,EMIS,198,0.0)
PATCH(@RI008,HIGH,2,2,2,2,2,2,1,1)
COVAL(@RI008,TEM1,GRND1,GRND1)
COVAL(@RI008,EMIS,198,0.0)
PATCH(@RI009,SOUTH,2,2,2,2,2,2,1,1)
COVAL(@RI009,TEM1,GRND1,GRND1)
COVAL(@RI009,EMIS,198,0.0)
PATCH(@RI010,NORTH,2,2,2,2,2,2,1,1)
COVAL(@RI010,TEM1,GRND1,GRND1)
COVAL(@RI010,EMIS,198,0.0)
PATCH(@RI011,EAST,2,2,2,2,2,2,1,1)
COVAL(@RI011,TEM1,GRND1,GRND1)
COVAL(@RI011,EMIS,198,0.0)
PATCH(@RI012,WEST,2,2,2,2,2,2,1,1)
COVAL(@RI012,TEM1,GRND1,GRND1)
COVAL(@RI012,EMIS,198,0.0)
    GROUP 15. Termination of sweeps
LSWEEP=100
    GROUP 16. Termination of iterations
SELREF=T;RESFAC=1.000E-03
    GROUP 17. Under-relaxation devices
RELAX(P1,LINRLX,0.8);RELAX(TEM1,LINRLX,0.3)
RELAX(U1,FALSDT,1.0);RELAX(V1,FALSDT,1.0)
RELAX(W1,FALSDT,1.0)
    GROUP 18. Limits on variables or increments to them
VARMIN(TEM1)=200.0;VARMAX(TEM1)=1000.0
    GROUP 19. Data communicated by satellite to GROUND
SPEDAT(SET,CVD,NUMRAY,I,1)
SPEDAT(SET,CVD,NOSPCT,L,T)
SPEDAT(SET,CVD,RADCVD,L,T)
    GROUP 21. Print-out of variables
NYPRIN=1;NZPRIN=1
    GROUP 22. Spot-value print-out
TSTSWP=-1
IYMON=1;IZMON=1
    GROUP 24. Dumps for restarts