Group 1. Run Title TEXT(SIMPLE FLOW TUBE TEST CASE- COMPLEX:D202 TITLE Group 2. Transience STEADY=T Groups 3, 4, 5 Grid Information CARTES=F NREGX=1;REGEXT(X,1) IREGX=1;GRDPWR(X,1,0.01,1) NREGY=2;REGEXT(Y,1) IREGY=1;GRDPWR(Y,4,0.05,-2) IREGY=2;GRDPWR(Y,2,0.0005,1) NREGZ=3;REGEXT(Z,1) IREGZ=1;GRDPWR(Z,4,0.07,1) IREGZ=2;GRDPWR(Z,3,0.02,1) IREGZ=3;GRDPWR(Z,2,0.02,1) Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS=T NAME(C1)=S177;NAME(C2)=S181;NAME(C3)=S182;NAME(C4)=S80 NAME(C5)=S97;NAME(C6)=S188;NAME(C7)=S189;NAME(C8)=S190 NAME(C9)=S191;NAME(C10)=S192;NAME(C11)=S193;NAME(C12)=S194 NAME(C13)=S195;NAME(C14)=S196;NAME(C15)=S200 NAME(96)=BLOK;NAME(97)=TEM1;NAME(98)=DEN1;NAME(99)=PRPS SOLVE(P1,V1,W1,TEM1,S181,S182,S80,S97) STORE(S177,S188,S189,S190,S191,S192,S193,S194,S195,S196) STORE(S200,PRPS,DEN1,BLOK,CNDT,SPHT,DEPO,ENUL) SOLUTN(P1,Y,Y,Y,N,N,Y) SOLUTN(TEM1,Y,Y,Y,N,N,Y) SOLUTN(S181,Y,Y,Y,N,N,Y) SOLUTN(S182,Y,Y,Y,N,N,Y) SOLUTN(S80,Y,Y,Y,N,N,Y) SOLUTN(S97,Y,Y,Y,N,N,Y) IVARBK=-1;ISOLBK=1 Group 8. Terms & Devices NEWRH1=T;NEWENL=T ISOLX=0;ISOLY=0;ISOLZ=0 USOURC=T;UDIFNE=T;DIFCUT=0.0 Group 9. Properties ;; ;PRNDTL(S177)=-GRND8 PRNDTL(S181)=-GRND8;PRNDTL(S182)=-GRND8 PRNDTL(S80)=-GRND8;PRNDTL(S97)=-GRND8 PRESS0=133.0 CSG10='q1' MATFLG=T;IMAT=1 70 GRND8 GRND8 GRND8 GRND8 1.000 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 Group 11.Initialise Var/Porosity Fields FIINIT(P1)=0.0;FIINIT(W1)=0.0;FIINIT(V1)=0.0 FIINIT(TEM1)=290;FIINIT(S177)=0.9425 FIINIT(S181)=1.0E-6;FIINIT(S182)=1.0E-6 FIINIT(S80)=0.0575;FIINIT(S97)=1.0E-4 FIINIT(BLOK)=1.0;FIINIT(PRPS)=70 CONPOR(WAF,-1.00,CELL,-#1,-#1,-#2,-#2,-#2,-#2) INIT(WAF,BLOK,0.000E+00,2.000E+00) INIT(WAF,PRPS,0.000E+00,111) RSTPRP=F;INIADD=F Group 13. Boundary & Special Sources REAL(RHOIN,UAV);RHOIN=1.744E-3;UAV=0.393 INLET(IN,LOW,#1,#1,#1,#2,#1,#1,#1,#1) VALUE(IN,P1,UAV*RHOIN);VALUE(IN,W1,UAV) VALUE(IN,TEM1,290);VALUE(IN,S177,0.9425) VALUE(IN,S181,1.0E-20);VALUE(IN,S182,1.0E-20) VALUE(IN,S80,0.0575);VALUE(IN,S97,1.0E-20) OUTLET(OUT,HIGH,#1,#1,#1,#2,#3,#3,#1,#1) VALUE(OUT,V1,SAME);VALUE(OUT,W1,SAME) VALUE(OUT,P1,0.0);VALUE(OUT,TEM1,SAME) VALUE(OUT,S177,SAME);VALUE(OUT,S181,SAME) VALUE(OUT,S182,SAME);VALUE(OUT,S80,SAME) VALUE(OUT,S97,SAME) PATCH(WALL,NWALL,#1,#1,#2,#2,#1,#3,#1,#1) COVAL(WALL,W1,1.0,0.0);COVAL(WALL,TEM1,1.0,290) PATCH(WAFER,CELL,#1,#1,#2,#2,#2,#2,#1,#1) COVAL(WAFER,TEM1,FIXVAL,573) PATCH(SURF1,NORTH,#1,#1,#1,#1,#2,#2,1,LSTEP) COVAL(SURF1,S181,FIXFLU,GRND1) COVAL(SURF1,S182,FIXFLU,GRND1) COVAL(SURF1,S80,FIXFLU,GRND1) COVAL(SURF1,S97,FIXFLU,GRND1) COVAL(SURF1,P1,1.000,GRND1) COVAL(SURF1,TEM1,FIXFLU,GRND1) PATCH(RELT,PHASEM,1,NX,1,NY,1,NZ,1,LSTEP) COVAL(RELT,S181,GRND1,SAME) COVAL(RELT,S182,GRND1,SAME) COVAL(RELT,S80,GRND1,SAME) COVAL(RELT,S97,GRND1,SAME) EGWF=T Group 15. Terminate Sweeps LSWEEP=50 SELREF=T RESFAC=1.000E-03 Group 16. Terminate Iterations ENDIT(P1)=1.000E-03;ENDIT(V1)=1.000E-03 ENDIT(W1)=1.000E-03;ENDIT(TEM1)=1.000E-03 Group 17. Relaxation RELAX(P1,LINRLX,1.000E+00);RELAX(V1,FALSDT,1.042E-01) RELAX(W1,FALSDT,1.042E-01);RELAX(TEM1,FALSDT,1.042E+01) RELAX(S181,LINRLX,0.3);RELAX(S182,LINRLX,0.3) RELAX(S80,LINRLX,0.3);RELAX(S97,LINRLX,0.3) Group 18. Limits VARMIN(S177)=1.0E-20;VARMAX(S177)=1.0 VARMIN(S181)=1.0E-20;VARMAX(S181)=1.0 VARMIN(S182)=1.0E-20;VARMAX(S182)=1.0 VARMIN(S80)=1.0E-20;VARMAX(S80)=1.0 VARMIN(S97)=1.0E-20;VARMAX(S97)=1.0 VARMIN(TEM1)=200.0;VARMAX(TEM1)=1000.0 Group 19. EARTH Calls To GROUND Station GENK=T SPEDAT(SET,CVD,MCDOPT,I,2) SPEDAT(SET,CVD,BINOPT,I,4) SPEDAT(SET,CVD,MCPROP,I,3) SPEDAT(SET,CVD,CHMRLX,R,5.00000E-01) SPEDAT(SET,CVD,NGREAC,I,0) SPEDAT(SET,CVD,NSREAC,I,16) SPEDAT(SET,CVD,SREAC(1),I,23) SPEDAT(SET,CVD,SREAC(2),I,24) SPEDAT(SET,CVD,SREAC(3),I,25) SPEDAT(SET,CVD,SREAC(4),I,26) SPEDAT(SET,CVD,SREAC(5),I,27) SPEDAT(SET,CVD,SREAC(6),I,28) SPEDAT(SET,CVD,SREAC(7),I,29) SPEDAT(SET,CVD,SREAC(8),I,30) SPEDAT(SET,CVD,SREAC(9),I,31) SPEDAT(SET,CVD,SREAC(10),I,32) SPEDAT(SET,CVD,SREAC(11),I,33) SPEDAT(SET,CVD,SREAC(12),I,34) SPEDAT(SET,CVD,SREAC(13),I,35) SPEDAT(SET,CVD,SREAC(14),I,36) SPEDAT(SET,CVD,SREAC(15),I,37) SPEDAT(SET,CVD,SREAC(16),I,38) NAMGRD=CVD Group 21. Print-out of Variables OUTPUT(BLOK,Y,N,Y,N,N,N) OUTPUT(DEN1,Y,N,Y,N,N,N) OUTPUT(PRPS,Y,N,Y,N,N,N) Group 22. Monitor Print-Out IXMON=1;IYMON=4;IZMON=5 TSTSWP=-1 Group 24. Dumps For Restarts