TALK=T;RUN(1,1) DISPLAY This case provides a test of the Lam-Bremhorst low-Reynolds number k-e model for 2d steady developing flow in a channel. As a test of symmetry both halves of the channel are considered in the y-z plane. In addition the temperature equation is solved via the TEM1 variable with conduction through outer slabs of fireclay brick on either side of the channel. At each wall a uniformly- distributed heat flux is applied to the fluid. The case provides a test of the correct representation of blockages via the "conjugate-heat-transfer" facility. The results of this calculation may be compared with calculations of the same case ( excepting conduction in the solid ) without blockages and also with blockages represented by the "porosity" facility. A relatively coarse grid is used so as to permit convergence in about 400 sweeps. The problem has been set up to perform 30 sweeps only, so as to reduce execution times in performing routine testing procedures. ENDDIS ************************************************************ Group 1. Run Title and Number ************************************************************ ************************************************************ TEXT(LAM-BRE_2D Y-Z CONJ CHANNEL TEST :T217) ************************************************************ ************************************************************ IRUNN = 1 ;LIBREF = 14 ************************************************************ Group 2. Time dependence STEADY = T ************************************************************ Group 3. X-Direction Grid Spacing CARTES = T NX = 1 XULAST =1. XFRAC(1)=1. ************************************************************ Group 4. Y-Direction Grid Spacing NY = 34 YVLAST =1. YFRAC(1)=0.025 ;YFRAC(2)=0.05 YFRAC(3)=0.075 ;YFRAC(4)=0.1 YFRAC(5)=0.100023 ;YFRAC(6)=0.100063 YFRAC(7)=0.100137 ;YFRAC(8)=0.100269 YFRAC(9)=0.100507 ;YFRAC(10)=0.100935 YFRAC(11)=0.101705 ;YFRAC(12)=0.103092 YFRAC(13)=0.105588 ;YFRAC(14)=0.11008 YFRAC(15)=0.118167 ;YFRAC(16)=0.132724 YFRAC(17)=0.15 ;YFRAC(18)=0.167276 YFRAC(19)=0.181833 ;YFRAC(20)=0.18992 YFRAC(21)=0.194412 ;YFRAC(22)=0.196908 YFRAC(23)=0.198295 ;YFRAC(24)=0.199065 YFRAC(25)=0.199493 ;YFRAC(26)=0.199731 YFRAC(27)=0.199863 ;YFRAC(28)=0.199937 YFRAC(29)=0.199977 ;YFRAC(30)=0.2 YFRAC(31)=0.225 ;YFRAC(32)=0.25 YFRAC(33)=0.275 ;YFRAC(34)=0.3 ************************************************************ Group 5. Z-Direction Grid Spacing PARAB = F NZ = 10 ZWLAST =0.5 ZFRAC(1)=0.1 ;ZFRAC(2)=0.2 ZFRAC(3)=0.3 ;ZFRAC(4)=0.4 ZFRAC(5)=0.5 ;ZFRAC(6)=0.6 ZFRAC(7)=0.7 ;ZFRAC(8)=0.8 ZFRAC(9)=0.9 ;ZFRAC(10)=1. ************************************************************ Group 6. Body-Fitted Coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T NAME(1)=P1 ;NAME(5)=V1 NAME(7)=W1 ;NAME(12)=KE NAME(13)=EP ;NAME(16)=C1 NAME(38)=PRPS ;NAME(39)=TEM1 NAME(40)=BLOK ;NAME(49)=WDIS NAME(50)=ENUT ;NAME(150)=LTLS * Y in SOLUTN argument list denotes: * 1-stored 2-solved 3-whole-field * 4-point-by-point 5-explicit 6-harmonic averaging SOLUTN(P1,Y,Y,Y,N,N,Y) SOLUTN(V1,Y,Y,N,N,N,Y) SOLUTN(W1,Y,Y,N,N,N,Y) SOLUTN(KE,Y,Y,N,N,N,N) SOLUTN(EP,Y,Y,N,N,N,N) SOLUTN(C1,Y,Y,Y,N,N,Y) SOLUTN(PRPS,Y,N,N,N,N,Y) SOLUTN(TEM1,Y,Y,Y,N,N,Y) SOLUTN(BLOK,Y,N,N,N,N,Y) SOLUTN(WDIS,Y,N,N,N,N,Y) SOLUTN(ENUT,Y,N,N,N,N,Y) SOLUTN(LTLS,Y,Y,Y,N,N,Y) VIST = 50 IVARBK = 39 ;ISOLBK = 1 PRNITS= F ;OPTRLX= F ;NOSIP= F ;ALLVBC= F DBSOLV= F ;IMPINI= F ;EARL1D= F PRPS = 38 ************************************************************ 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(P1,Y,Y,Y,N,Y,Y) TERMS(V1,Y,Y,Y,Y,Y,Y) TERMS(W1,Y,Y,Y,Y,Y,Y) TERMS(KE,N,Y,Y,Y,Y,N) TERMS(EP,N,Y,Y,Y,Y,N) TERMS(C1,N,Y,Y,Y,Y,Y) TERMS(TEM1,N,Y,Y,Y,N,Y) TERMS(LTLS,N,N,Y,N,Y,Y) DIFCUT =0.5 ;ZDIFAC =1. GALA = F ;ADDDIF = F NEWENT = 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 = GRND4 TSURR =0. ;TEMP0 =0. ;PRESS0 =0. DVO1DT =0. ;DRH1DP =0. EMISS =0. ;SCATT =0. RADIA =0. ;RADIB =0. EL1A =0. ;EL1B =0. ;EL1C =0. ENUL = FILE ;ENUT = GRND3 ENUTA =0. ;ENUTB =0. ;ENUTC =0. IENUTA = 3 PRNDTL(V1)=1. ;PRNDTL(W1)=1. PRNDTL(KE)=1. ;PRNDTL(EP)=1. PRNDTL(C1)=1. ;PRNDTL(TEM1)=CONDFILE PRNDTL(LTLS)=1. PRT(V1)=1. ;PRT(W1)=1. PRT(KE)=1. ;PRT(EP)=1.314 PRT(C1)=1. ;PRT(TEM1)=1. PRT(LTLS)=1. CP1 =1. ;CP2 =1. * List of user-defined materials to be read by EARTH MATFLG=T;IMAT=2 * Name *Ind. Dens. Viscos. Spec.heat Conduct. Expans. Compr. *34 1.0 1.E-5 1.E3 0.01 0 * 152 2000 1.0 960 1.0 0 ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initial field variables (PHIs) FIINIT(P1)=1.0E-03 ;FIINIT(V1)=1.0E-10 FIINIT(W1)=10. ;FIINIT(KE)=0.389857 FIINIT(EP)=7.998817 ;FIINIT(C1)=1.0E-10 FIINIT(PRPS)=34. ;FIINIT(TEM1)=300. FIINIT(BLOK)=1. ;FIINIT(WDIS)=0.05 FIINIT(ENUT)=1.0E-10 ;FIINIT(LTLS)=1.0E-10 PATCH(SOLIDS ,INIVAL, 1, 1, 1, 4, 1, 10, 1, 1) INIT(SOLIDS ,PRPS,0. ,152. ) INIT(SOLIDS ,BLOK,0. ,2. ) PATCH(SOLIDN ,INIVAL, 1, 1, 31, 34, 1, 10, 1, 1) INIT(SOLIDN ,PRPS,0. ,152. ) INIT(SOLIDN ,BLOK,0. ,3. ) INIADD = F FSWEEP = 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(KESOURCE,PHASEM, 0, 0, 0, 0, 0, 0, 1, 1) COVAL(KESOURCE,KE , GRND4 , GRND4 ) COVAL(KESOURCE,EP , GRND4 , GRND4 ) PATCH(INL ,LOW , 1, 1, 5, 30, 1, 1, 1, 1) COVAL(INL ,P1 , FIXFLU ,10. ) COVAL(INL ,W1 ,0. ,10. ) COVAL(INL ,KE ,0. ,0.389857 ) COVAL(INL ,EP ,0. ,7.998817 ) COVAL(INL ,C1 ,0. ,1. ) COVAL(INL ,TEM1,0. ,300. ) PATCH(OUTL ,HIGH , 1, 1, 5, 30, 10, 10, 1, 1) COVAL(OUTL ,P1 ,1000. ,0. ) COVAL(OUTL ,W1 ,0. ,0. ) COVAL(OUTL ,KE ,0. ,0. ) COVAL(OUTL ,EP ,0. ,0. ) COVAL(OUTL ,C1 ,0. , SAME ) COVAL(OUTL ,TEM1,0. , SAME ) PATCH(SOLID-NW,NWALL , 1, 1, 30, 30, 1, 10, 1, 1) COVAL(SOLID-NW,W1 , GRND2 , SAME ) COVAL(SOLID-NW,KE ,1. ,0. ) PATCH(SOLID-SW,SWALL , 1, 1, 5, 5, 1, 10, 1, 1) COVAL(SOLID-SW,W1 , GRND2 , SAME ) COVAL(SOLID-SW,KE ,1. ,0. ) PATCH(GP12DFNT,CELL , 1, 1, 30, 30, 1, 10, 1, 1) COVAL(GP12DFNT,KE ,0. ,0. ) COVAL(GP12DFNT,EP ,0. ,0. ) COVAL(GP12DFNT,C1 ,0. ,0. ) PATCH(GP12DFNB,CELL , 1, 1, 4, 4, 1, 10, 1, 1) COVAL(GP12DFNB,KE ,0. ,0. ) COVAL(GP12DFNB,EP ,0. ,0. ) COVAL(GP12DFNB,C1 ,0. ,0. ) PATCH(GP12DFN1,CELL , 1, 1, 29, 29, 1, 10, 1, 1) COVAL(GP12DFN1,V1 ,0. ,0. ) PATCH(GP12DFN2,CELL , 1, 1, 4, 4, 1, 10, 1, 1) COVAL(GP12DFN2,V1 ,0. ,0. ) PATCH(GP12CNN1,CELL , 1, 1, 29, 29, 1, 10, 1, 1) COVAL(GP12CNN1,V1 ,0. ,0. ) PATCH(GP12CNN2,CELL , 1, 1, 4, 4, 1, 10, 1, 1) COVAL(GP12CNN2,V1 ,0. ,0. ) PATCH(HEATN ,NORTH , 1, 1, 30, 30, 1, 10, 1, 1) COVAL(HEATN ,TEM1, FIXFLU ,1000. ) PATCH(HEATS ,SOUTH , 1, 1, 5, 5, 1, 10, 1, 1) COVAL(HEATS ,TEM1, FIXFLU ,1000. ) XCYCLE = F EGWF = T WALLCO = GRND2 ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 30 ;ISWC1 = 1 LITHYD = 1 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1 SELREF = T RESFAC =1.0E-05 ************************************************************ Group 16. Terminate Iterations LITER(P1)=20 ;LITER(V1)=10 LITER(W1)=10 ;LITER(KE)=20 LITER(EP)=20 ;LITER(C1)=20 LITER(TEM1)=20 ;LITER(LTLS)=20 ENDIT(P1)=1.0E-03 ;ENDIT(V1)=1.0E-03 ENDIT(W1)=1.0E-03 ;ENDIT(KE)=1.0E-03 ENDIT(EP)=1.0E-03 ;ENDIT(C1)=1.0E-03 ENDIT(TEM1)=1.0E-03 ;ENDIT(LTLS)=1.0E-03 ************************************************************ Group 17. Relaxation RELAX(P1,LINRLX,1.) RELAX(V1,FALSDT,0.025) RELAX(W1,FALSDT,0.025) RELAX(KE,FALSDT,0.025) RELAX(EP,FALSDT,0.025) RELAX(C1,FALSDT,1.0E+09) RELAX(PRPS,LINRLX,1.) RELAX(TEM1,FALSDT,1.0E+09) RELAX(BLOK,LINRLX,1.) RELAX(WDIS,LINRLX,1.) RELAX(ENUT,LINRLX,1.) RELAX(LTLS,FALSDT,1.0E+09) KELIN = 1 OVRRLX =0. EXPERT = F ;NNORSL = F ************************************************************ Group 18. Limits VARMAX(P1)=1.0E+10 ;VARMIN(P1)=-1.0E+10 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(C1)=1.0E+10 ;VARMIN(C1)=1.0E-10 VARMAX(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10 VARMAX(TEM1)=1.0E+10 ;VARMIN(TEM1)=-1.0E+10 VARMAX(BLOK)=1.0E+10 ;VARMIN(BLOK)=-1.0E+10 VARMAX(WDIS)=1.0E+10 ;VARMIN(WDIS)=-1.0E+10 VARMAX(ENUT)=1.0E+10 ;VARMIN(ENUT)=-1.0E+10 VARMAX(LTLS)=1.0E+10 ;VARMIN(LTLS)=-1.0E+10 ************************************************************ Group 19. Data transmitted to GROUND GENK = T YPLS = T PARSOL = F IENUTA = 3 ISG62 = 1 CSG10 ='q1' SPEDAT(SET,GXMONI,PLOTALL,L,T) SPEDAT(SET,MATERIAL,34,L,T) SPEDAT(SET,MATERIAL,152,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(P1,Y,N,Y,Y,Y,Y) OUTPUT(V1,Y,N,Y,Y,Y,Y) OUTPUT(W1,Y,N,Y,Y,Y,Y) OUTPUT(KE,Y,N,Y,Y,Y,Y) OUTPUT(EP,Y,N,Y,Y,Y,Y) OUTPUT(C1,Y,N,Y,Y,Y,Y) OUTPUT(PRPS,N,N,N,N,N,N) OUTPUT(TEM1,Y,N,Y,Y,Y,Y) OUTPUT(BLOK,N,N,N,N,N,N) OUTPUT(WDIS,Y,N,Y,N,N,N) OUTPUT(ENUT,Y,N,Y,N,N,N) OUTPUT(LTLS,Y,N,Y,Y,Y,Y) ************************************************************ Group 22. Monitor Print-Out IXMON = 1 ;IYMON = 30 ;IZMON = 5 NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1 UWATCH = T ;USTEER = T HIGHLO = F ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 30 ;NUMCLS = 5 NYPRIN = 1 ;IYPRF = 1 ;IYPRL = 10000 NZPRIN = 1 ;IZPRF = 1 ;IZPRL = 10000 XZPR = F ;YZPR = F IPLTF = 1 ;IPLTL = -1 ;NPLT = -1 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