TALK=T;RUN(1,1) photon use p parphi gr ou x 1 msg volume fractions of hot fluid con br2 x 1 sh;0 1 100 pause con off;red msg contours of longitudinal velocity of cold fluid con sw1 x 1 z 1 5 sh;0 120 100 msg contours of longitudinal velocity of hot fluid con fw2 x 1 z 6 m sh;0 120 100 msg note the discontinuity pause con off;red msg contours of lateral velocity of cold fluid con cv1 x 1 y 1 12 sh;-10 40 100 msg contours of lateral velocity of hot fluid con dv2 x 1 y 13 m sh;-10 40 100 msg note the discontinuity pause con off;red msg contours of temperature of cold fluid con tmp1 x 1 y 1 12 sh;int 100 msg contours of temperature of hot fluid con tmp2 x 1 y 13 m sh;int 100 msg note the discontinuity pause con off;red se ve co u1 cv1 sw1 se ve re 200 msg vectors of cold-gas velocity vec x 1 y 1 13 sh se ve co u1 dv2 fw2 se ve re 200 msg vectors of cold-gas velocity vec x 1 y 13 m sh msg note the discontinuity pause msg contours of mass-transfer rate con mdot x 1 sh;int 100 msg msg Press e to END enduse DISPLAY The 1985-version of the two-fluid model of turbulence is here used for simulating turbulent combustion in gases. The diffusion flux is directly calculated from the normal-to-wall-velocities; an additional source for the normal-to-wall momentum equations, due to the mean-velocity gradient, is postulated. The flame spreads from a flame holder in a stream of pre-mixed combustible gas in a duct of constant cross-section. duct wall /////////////////////////////////////// -----------------------*--------------- /*****/ ----> /*****/ flame ------> inlet ** **/ exit -[*]--------------------------------------- flame holder axis Reference: Imperial College research of JZ Wu, 1985 ENDDIS ************************************************************ Group 1. Run Title and Number ************************************************************ ************************************************************ TEXT(Steady 2-fluid ducted flame; parab:W977 ) ************************************************************ ************************************************************ 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 = 25 YVLAST =0.0381 YFRAC(1)=0.04 ;YFRAC(3)=0.12 YFRAC(5)=0.2 ;YFRAC(7)=0.28 YFRAC(9)=0.36 ;YFRAC(11)=0.44 YFRAC(13)=0.52 ;YFRAC(15)=0.6 YFRAC(17)=0.68 ;YFRAC(19)=0.76 YFRAC(21)=0.84 ;YFRAC(23)=0.92 YFRAC(25)=1. ************************************************************ Group 5. Z-Direction Grid Spacing PARAB = T NZ = 35 ZWLAST =0.308 ZFRAC(1)=0.028571 ;ZFRAC(3)=0.085714 ZFRAC(5)=0.142857 ;ZFRAC(7)=0.2 ZFRAC(9)=0.257143 ;ZFRAC(11)=0.314286 ZFRAC(13)=0.371429 ;ZFRAC(15)=0.428571 ZFRAC(17)=0.485714 ;ZFRAC(19)=0.542857 ZFRAC(21)=0.6 ;ZFRAC(23)=0.657143 ZFRAC(25)=0.714286 ;ZFRAC(27)=0.771429 ZFRAC(29)=0.828571 ;ZFRAC(31)=0.885714 ZFRAC(33)=0.942857 ;ZFRAC(35)=1. ************************************************************ Group 6. Body-Fitted Coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = F EQUVEL = F NAME(1)=P1 ;NAME(5)=CV1 NAME(6)=DV2 ;NAME(7)=SW1 NAME(8)=FW2 ;NAME(9)=AR1 NAME(10)=BR2 ;NAME(14)=EH1 NAME(15)=H2 ;NAME(22)=MDOT NAME(23)=LEN ;NAME(24)=VIS NAME(147)=DEN2 ;NAME(148)=DEN1 NAME(149)=TMP2 ;NAME(150)=TMP1 * 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,N,N,N,Y) SOLUTN(CV1,Y,Y,N,N,N,Y) SOLUTN(DV2,Y,Y,N,N,N,Y) SOLUTN(SW1,Y,Y,N,N,N,Y) SOLUTN(FW2,Y,Y,N,N,N,Y) SOLUTN(AR1,Y,Y,N,N,N,Y) SOLUTN(BR2,Y,Y,N,N,N,Y) SOLUTN(EH1,Y,Y,N,N,N,Y) SOLUTN(H2,Y,Y,N,N,N,Y) SOLUTN(MDOT,Y,N,N,N,N,N) SOLUTN(LEN,Y,N,N,N,N,N) SOLUTN(VIS,Y,N,N,N,N,N) SOLUTN(DEN2,Y,N,N,N,N,Y) SOLUTN(DEN1,Y,N,N,N,N,Y) SOLUTN(TMP2,Y,N,N,N,N,Y) SOLUTN(TMP1,Y,N,N,N,N,Y) DEN1 = 148 DEN2 = 147 VIST = 24 INTMDT = 22 TEMP1 = 150 TEMP2 = 149 LEN1 = 23 ************************************************************ 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(CV1,Y,Y,Y,Y,Y,Y) TERMS(DV2,Y,Y,Y,Y,N,Y) TERMS(SW1,Y,Y,Y,Y,Y,Y) TERMS(FW2,Y,Y,Y,Y,N,Y) TERMS(AR1,Y,Y,Y,Y,Y,Y) TERMS(BR2,Y,Y,Y,Y,N,Y) TERMS(EH1,N,Y,Y,N,Y,Y) TERMS(H2,N,Y,Y,N,N,Y) DIFCUT =0. ;ZDIFAC =1. GALA = F ;ADDDIF = F NEWRH1 = T NEWRH2 = T NEWENT = T EQDVDP = F ISOLX = -1 ;ISOLY = -1 ;ISOLZ = -1 ************************************************************ Group 9. Properties used if PRPS is not stored, and where PRPS = -1.0 if it is! RHO1 = GRND5 ;TMP1 = GRND2 ;EL1 = GRND9 TSURR =0. ;TEMP0 =0. ;PRESS0 =1.0E+05 DVO1DT =0. ;DRH1DP =0. RHO1A =0. ;RHO1B =3.3E-03 ;RHO1C =0. TMP1A =300. ;TMP1B =0. ;TMP1C =0. EMISS =0. ;SCATT =0. RADIA =0. ;RADIB =0. EL1A =0. ;EL1B =0. ;EL1C =0. RHO2 = GRND5 ;TMP2 = GRND2 ;EL2 =0. DVO2DT =0. ;DRH2DP =0. RHO2A =0. ;RHO2B =3.3E-03 ;RHO2C =0. TMP2A =300. ;TMP2B =0. ;TMP2C =0. ENUL =1.0E-05 ;ENUT = GRND4 ENUTA =1. ;ENUTB =0. ;ENUTC =0. IENUTA = 0 DRH2DP =0. PHINT(CV1)=-2.022E+04 ;PHINT(DV2)=-2.022E+04 PHINT(SW1)=-2.022E+04 ;PHINT(FW2)=-2.022E+04 PHINT(AR1)=-2.022E+04 ;PHINT(BR2)=-2.022E+04 PHINT(EH1)=-2.022E+04 ;PHINT(H2)=-2.022E+04 PRNDTL(CV1)=1. ;PRNDTL(DV2)=1. PRNDTL(SW1)=1. ;PRNDTL(FW2)=1. PRNDTL(AR1)=1. ;PRNDTL(BR2)=1. PRNDTL(EH1)=1. ;PRNDTL(H2)=1. PRT(CV1)=1. ;PRT(DV2)=1. PRT(SW1)=1. ;PRT(FW2)=1. PRT(AR1)=1. ;PRT(BR2)=1. PRT(EH1)=1. ;PRT(H2)=1. CP1 =6.666667E-04 ;CP2 =6.666667E-04 ************************************************************ Group 10.Inter-Phase Transfer Processes CFIPS = GRND4 RLOLIM =0. ;CMDOT = GRND1 CFIPA =0. ;CFIPB =1. CFIPC =0.05 ;CFIPD =-1. CMDTA =30. ;CMDTB =0.5 CMDTC =0. ;CMDTD =0. CINT(P1)=1. ;CINT(CV1)=1. CINT(DV2)=1. ;CINT(SW1)=1. CINT(FW2)=1. ;CINT(AR1)=1. CINT(BR2)=1. ;CINT(EH1)=10. CINT(H2)=10. PHINT(P1)=-2.022E+04 ;PHINT(CV1)=-2.022E+04 PHINT(DV2)=-2.022E+04 ;PHINT(SW1)=-2.022E+04 PHINT(FW2)=-2.022E+04 ;PHINT(AR1)=-2.022E+04 PHINT(BR2)=-2.022E+04 ;PHINT(EH1)=-2.022E+04 PHINT(H2)=-2.022E+04 ************************************************************ Group 11.Initial field variables (PHIs) FIINIT(P1)=1.0E-10 ;FIINIT(CV1)=1.0E-10 FIINIT(DV2)=1.0E-10 ;FIINIT(SW1)=30. FIINIT(FW2)=30. ;FIINIT(AR1)=0.5 FIINIT(BR2)=0.5 ;FIINIT(EH1)=1.0E-10 FIINIT(H2)=1.0E-10 ;FIINIT(MDOT)=1.0E-10 FIINIT(LEN)=1.0E-10 ;FIINIT(VIS)=1.0E-10 FIINIT(DEN2)=1.0E-10 ;FIINIT(DEN1)=1.0E-10 FIINIT(TMP2)=1.0E-10 ;FIINIT(TMP1)=1.0E-10 No PATCHes yet used for this Group 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(INLET ,LOW , 1, 1, 1, 25, 1, 1, 1, 1) COVAL(INLET ,CV1 ,0. ,0. ) COVAL(INLET ,DV2 ,0. ,0. ) COVAL(INLET ,SW1 ,0. ,0. ) COVAL(INLET ,FW2 ,0. ,30. ) COVAL(INLET ,AR1 , FIXFLU ,0. ) COVAL(INLET ,BR2 , FIXFLU ,30. ) COVAL(INLET ,EH1 ,0. ,0. ) COVAL(INLET ,H2 ,0. ,0. ) PATCH(HOLD ,LOW , 1, 1, 1, 2, 1, 1, 1, 1) COVAL(HOLD ,EH1 , FIXVAL ,0.6 ) COVAL(HOLD ,H2 , FIXVAL ,0.6 ) PATCH(NORTHWAL,NWALL , 1, 1, 25, 25, 1, 35, 1, 1) COVAL(NORTHWAL,SW1 ,1. ,0. ) COVAL(NORTHWAL,FW2 ,1. ,0. ) PATCH(SHSO ,CELL , 1, 1, 1, 25, 1, 35, 1, 1) COVAL(SHSO ,CV1 , FIXFLU , GRND5 ) COVAL(SHSO ,DV2 , FIXFLU , GRND5 ) PATCH(CHSO ,VOLUME, 1, 1, 1, 25, 1, 35, 1, 1) COVAL(CHSO ,EH1 , GRND7 ,1. ) COVAL(CHSO ,H2 , GRND7 ,1. ) XCYCLE = F EGWF = T WALLCO = GRND2 ************************************************************ Group 14. Downstream Pressure For PARAB IPARAB = 0 AZPH =0. ;PBAR =0. ************************************************************ Group 15. Terminate Sweeps LSWEEP = 1 ;ISWC1 = 1 LITHYD = 50 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1 ISWR1 = 1 ;ISWR2 = 10000 SELREF = T RESFAC =1.0E-05 ************************************************************ Group 16. Terminate Iterations LITER(P1)=20 ;LITER(CV1)=10 LITER(DV2)=10 ;LITER(SW1)=10 LITER(FW2)=10 ;LITER(AR1)=1 LITER(BR2)=1 ;LITER(EH1)=20 LITER(H2)=20 ENDIT(P1)=1.0E-03 ;ENDIT(CV1)=1.0E-03 ENDIT(DV2)=1.0E-03 ;ENDIT(SW1)=1.0E-03 ENDIT(FW2)=1.0E-03 ;ENDIT(AR1)=1.0E-03 ENDIT(BR2)=1.0E-03 ;ENDIT(EH1)=1.0E-03 ENDIT(H2)=1.0E-03 ************************************************************ Group 17. Relaxation RELAX(P1,LINRLX,0.5) RELAX(CV1,FALSDT,1.0E-04) RELAX(DV2,FALSDT,1.0E-04) RELAX(SW1,FALSDT,1.0E-04) RELAX(FW2,FALSDT,1.0E-04) RELAX(AR1,LINRLX,0.1) RELAX(BR2,LINRLX,0.1) RELAX(EH1,FALSDT,1.0E-04) RELAX(H2,FALSDT,1.0E-04) RELAX(MDOT,LINRLX,0.1) RELAX(LEN,LINRLX,1.) RELAX(VIS,LINRLX,1.) RELAX(DEN2,LINRLX,1.) RELAX(DEN1,LINRLX,1.) RELAX(TMP2,LINRLX,1.) RELAX(TMP1,LINRLX,1.) OVRRLX =0. EXPERT = F ;NNORSL = F ************************************************************ Group 18. Limits VARMAX(P1)=1.0E+10 ;VARMIN(P1)=-1.0E+10 VARMAX(CV1)=1.0E+06 ;VARMIN(CV1)=-1.0E+06 VARMAX(DV2)=1.0E+06 ;VARMIN(DV2)=-1.0E+06 VARMAX(SW1)=1.0E+06 ;VARMIN(SW1)=-1.0E+06 VARMAX(FW2)=1.0E+06 ;VARMIN(FW2)=-1.0E+06 VARMAX(AR1)=1. ;VARMIN(AR1)=1.0E-06 VARMAX(BR2)=1. ;VARMIN(BR2)=1.0E-06 VARMAX(EH1)=1.0E+10 ;VARMIN(EH1)=-1.0E+10 VARMAX(H2)=1.0E+10 ;VARMIN(H2)=-1.0E+10 VARMAX(MDOT)=1.0E+10 ;VARMIN(MDOT)=-1.0E+10 VARMAX(LEN)=1.0E+10 ;VARMIN(LEN)=-1.0E+10 VARMAX(VIS)=1.0E+10 ;VARMIN(VIS)=-1.0E+10 VARMAX(DEN2)=1.0E+10 ;VARMIN(DEN2)=-1.0E+10 VARMAX(DEN1)=1.0E+10 ;VARMIN(DEN1)=-1.0E+10 VARMAX(TMP2)=1.0E+10 ;VARMIN(TMP2)=-1.0E+10 VARMAX(TMP1)=1.0E+10 ;VARMIN(TMP1)=-1.0E+10 ************************************************************ Group 19. Data transmitted to GROUND PARSOL = F ISG62 = 1 CHSOA =3500. ;CHSOB =5. SHSOA =1. SPEDAT(SET,GXMONI,PLOTALL,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(CV1,Y,N,Y,Y,Y,Y) OUTPUT(DV2,Y,N,Y,Y,Y,Y) OUTPUT(SW1,Y,N,Y,Y,Y,Y) OUTPUT(FW2,Y,N,Y,Y,Y,Y) OUTPUT(AR1,N,N,N,N,N,N) OUTPUT(BR2,Y,N,Y,Y,Y,Y) OUTPUT(EH1,Y,N,Y,Y,Y,Y) OUTPUT(H2,Y,N,Y,Y,Y,Y) OUTPUT(MDOT,Y,Y,Y,Y,Y,Y) OUTPUT(LEN,N,N,Y,Y,N,N) OUTPUT(VIS,N,N,Y,Y,N,N) OUTPUT(DEN2,Y,N,Y,N,N,N) OUTPUT(DEN1,Y,N,Y,N,N,N) OUTPUT(TMP2,Y,N,Y,N,N,N) OUTPUT(TMP1,Y,N,Y,N,N,N) ************************************************************ Group 22. Monitor Print-Out IXMON = 1 ;IYMON = 12 ;IZMON = 17 NPRMON = 100 ;NPRMNT = 1 ;TSTSWP = -1 UWATCH = T ;USTEER = T HIGHLO = F ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 50 ;NUMCLS = 5 NYPRIN = 2 ;IYPRF = 1 ;IYPRL = 10000 NZPRIN = 2 ;IZPRF = 1 ;IZPRL = 10000 IPLTF = 1 ;IPLTL = 1000 ;NPLT = 2 ISWPRF = 1 ;ISWPRL = 100000 ITABL = 3 ;IPROF = 1 ABSIZ =0.5 ;ORSIZ =0.4 NTZPRF = 1 ;NCOLPF = 50 ICHR = 2 ;NCOLCO = 45 ;NROWCO = 20 PATCH(LPRO1 ,PROFIL, 1, 1, 12, 12, 1, 35, 1, 1) PLOT(LPRO1 ,P1 ,0. ,0. ) PATCH(WPRO ,PROFIL, 1, 1, 12, 12, 1, 35, 1, 1) PLOT(WPRO ,CV1 ,0.1 ,0.1 ) PLOT(WPRO ,DV2 ,0.1 ,0.1 ) PLOT(WPRO ,SW1 ,1. ,1. ) PLOT(WPRO ,FW2 ,1. ,1. ) ************************************************************ Group 24. Dumps For Restarts SAVE = T ;NOWIPE = F NSAVE =CHAM IDISPA = 2 ;IDISPB = 0 ;IDISPC = 0 STOP