TALK=T;RUN(1,1) PHOTON USE p;;;; view z msg exit smoke concentration according to single-fluid model con smos z m fi;0.001 pause;con off;red msg exit smoke concentration according to multi-fluid model con smom z m fi;0.001;pause;con off;red;view x msg x-plane smoke concentration according to single-fluid model con smos x 1 fi;0.001;pause;con off;red msg x-plane smoke concentration according to multi-fluid model con smom x 1 fi;0.001;pause;con off;red msg x-plane mixture fraction avef according to multi-fluid model con avef x 1 fi;0.001;pause;con off;red msg x-plane mixture fraction mixf according to single-fluid model con mixf x 1 fi;0.001;pause;con off;red msg x-plane fluid-1 concentration according to multi-fluid model con f1 x 1 fi;0.001;pause;con off;red msg x-plane fluid-11 concentration according to multi-fluid model con f11 x 1 fi;0.001;pause;con off;red msg x-plane fluid-6 concentration according to multi-fluid model con f6 x 1 fi;0.001 ENDUSE DISPLAY This simulation shows how the multi-fluid model of turbulence predicts a smoke-production pattern in a gas-turbine combustor which is different from, and probably more realistic than, that predicted by a conventional single-fluid model. It is explained and discussed extensively in a report which is published on CHAM's website www.cham.co.uk (Click on short-cuts, then MFM then 1998b). The geometry is that of library case 492, which is loaded first. Note the $ in #$492; it ensures that the above PHOTON USE commands remain in the Q1 file, and therefore take priority over those which appear in case 493. The injected fuel-air composition, which is stoichiometric in case 492, is made twice stoichiometric here. To reduce computation time, it is best to answer N to the question about radiation. ENDDIS PHOTON USE ext;;;; gr ou z 1; use patgeo msg boundary condition patches. Press RETURN pause msg temperature contours. Press RETURN con tmp1 y m fi;0.001;con tmp1 x m fi;0.001;con tmp1 z m fi;0.001 gr ou y m;gr ou z m msg press RETURN for view x pause; con off; view x; con tmp1 x m fi;0.001 con tmp1 y m fi;0.001; gr ou y m; gr ou x m; gr ou z 1 msg This is view x. Press RETURN for view y pause; con off; view y; con tmp1 y m fi;0.001 msg This is view y. Press RETURN for view z pause; con off; view z; con tmp1 z m fi;0.001; gr ou z m msg This is view z. Press RETURN for view x and velocity vectors pause; con off; view x msg velocity vectors. Type menu for menu and further possibilities msg Press e to end. Otherwise enter photon-readable commands vec x m sh; gr ou y m; gr ou x m; gr ou z 1 ENDUSE DISPLAY READQ1_BEGIN The following text is provided as an example of what, by use of the readq1 command, can be transmitted to EARTH for writing near the top of the RESULT file. Such text should leave columns 1 and 2 blank; and it should not extend beyond the 68th column. **************************************************************** * This library case dates from the earliest days of PHOENICS, * * when Professor WU Chung-Hua ('turbomachinery Wu', who had * * returned to China from the USA) visited CHAM in 1982. * * * * The configuration of the combustion chamber, and its being * * supplied with premixed fuel vapour and air, was proposed by * * Professor Wu's accompanying assistant. * **************************************************************** READQ1_END The shape of the combustion chamber is as shown. Pre-mixed fuel vapour and air enter near the axis on left. Secondary and dilution air enter through holes in outer wall. A 36-degree sector is simulated. secondary ox. inlets dilution inlet ____________ 1,2 _______________ ________ blocked / region / / / outlet | |_____ _ fuel-ox. inlet| Symmetry axis -- - -- -| -- - -- - -- - -- - -- - -- - -- - -- - The flow is turbulent; the Simple Chemical Reaction Scheme is used; and the reaction-rate is physically controlled by means of the Eddy-Breakup Model. ENDDIS DISPLAY Notes: (1) four macros are provided in order reduce the repetiveness of MFM q1s. (2) they are named mfm, mfm1, mfm2 and mfm3, and are normally called in that order at the top of the q1 file, which then appears as: #mfm settings of nflr, nflf, etc #mfm1 settings of #mfm2 #mfm3 (3) the character variable mfm is declared and set in the always-loaded core-library macro 014.htm, which, in its turn, declares and sets the character variables mfm1, mfm2, mfm3. (4) the values are: mfm = $L004 mfm1 = $L003 mfm2 = $L002 mfm3 = $L001 ENDDIS ************************************************************ Group 1. Run Title and Number ************************************************************ ************************************************************ TEXT(MFM; 3D Cmbstr; Conmix=5. ) ************************************************************ ************************************************************ IRUNN = 1 ;LIBREF = 492 ************************************************************ Group 2. Time dependence STEADY = T ************************************************************ Group 3. X-Direction Grid Spacing CARTES = F NX = 6 XULAST =0.628319 Method of pairs used for grid setting. XFRAC(1)=-6. ;XFRAC(2)=0.166666 ************************************************************ Group 4. Y-Direction Grid Spacing NY = 10 YVLAST =1. Method of pairs used for grid setting. YFRAC(1)=-5. ;YFRAC(2)=6.5E-03 YFRAC(3)=1. ;YFRAC(4)=5.0E-03 YFRAC(5)=1. ;YFRAC(6)=8.0E-03 YFRAC(7)=3. ;YFRAC(8)=6.5E-03 ************************************************************ Group 5. Z-Direction Grid Spacing PARAB = F NZ = 13 ZWLAST =1. Method of pairs used for grid setting. ZFRAC(1)=-2. ;ZFRAC(3)=1. ZFRAC(5)=1. ;ZFRAC(7)=1. ZFRAC(9)=1. ;ZFRAC(11)=7. ************************************************************ Group 6. Body-Fitted Coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T NAME(1)=P1 ;NAME(3)=U1 NAME(5)=V1 ;NAME(7)=W1 NAME(12)=KE ;NAME(13)=EP NAME(14)=H1 ;NAME(115)=PRPS NAME(116)=PRDM ;NAME(117)=OXDM NAME(118)=FRFM ;NAME(119)=TMPM NAME(120)=SMOS ;NAME(121)=SMOM NAME(122)=F1 ;NAME(123)=F2 NAME(124)=F3 ;NAME(125)=F4 NAME(126)=F5 ;NAME(127)=F6 NAME(128)=F7 ;NAME(129)=F8 NAME(130)=F9 ;NAME(131)=F10 NAME(132)=F11 ;NAME(133)=MNSQ NAME(134)=AVEF ;NAME(135)=MIXL NAME(136)=RATE ;NAME(137)=DEGF NAME(138)=RRAT ;NAME(139)=EPKE NAME(140)=HPOR ;NAME(141)=NPOR NAME(142)=EPOR ;NAME(143)=VPOR NAME(144)=ENUT ;NAME(145)=RHO1 NAME(146)=TMP1 ;NAME(147)=PROD NAME(148)=OXID ;NAME(149)=FUEL NAME(150)=MIXF * 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,N) SOLUTN(U1,Y,Y,N,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(H1,Y,Y,N,N,N,Y) SOLUTN(PRPS,Y,N,N,N,N,Y) SOLUTN(PRDM,Y,N,N,N,N,Y) SOLUTN(OXDM,Y,N,N,N,N,Y) SOLUTN(FRFM,Y,N,N,N,N,Y) SOLUTN(TMPM,Y,N,N,N,N,Y) SOLUTN(SMOS,Y,Y,N,N,N,Y) SOLUTN(SMOM,Y,Y,N,N,N,Y) SOLUTN(F1,Y,Y,N,N,N,Y) SOLUTN(F2,Y,Y,N,N,N,Y) SOLUTN(F3,Y,Y,N,N,N,Y) SOLUTN(F4,Y,Y,N,N,N,Y) SOLUTN(F5,Y,Y,N,N,N,Y) SOLUTN(F6,Y,Y,N,N,N,Y) SOLUTN(F7,Y,Y,N,N,N,Y) SOLUTN(F8,Y,Y,N,N,N,Y) SOLUTN(F9,Y,Y,N,N,N,Y) SOLUTN(F10,Y,Y,N,N,N,Y) SOLUTN(F11,Y,Y,N,N,N,Y) SOLUTN(MNSQ,Y,N,N,N,N,Y) SOLUTN(AVEF,Y,N,N,N,N,Y) SOLUTN(MIXL,Y,N,N,N,N,N) SOLUTN(RATE,Y,N,N,N,N,Y) SOLUTN(DEGF,Y,N,N,N,N,N) SOLUTN(RRAT,Y,N,N,N,N,N) SOLUTN(EPKE,Y,N,N,N,N,N) SOLUTN(HPOR,Y,N,N,N,N,N) SOLUTN(NPOR,Y,N,N,N,N,N) SOLUTN(EPOR,Y,N,N,N,N,N) SOLUTN(VPOR,Y,N,N,N,N,N) SOLUTN(ENUT,Y,N,N,N,N,Y) SOLUTN(RHO1,Y,N,N,N,N,Y) SOLUTN(TMP1,Y,N,N,N,N,Y) SOLUTN(PROD,Y,N,N,N,N,Y) SOLUTN(OXID,Y,N,N,N,N,Y) SOLUTN(FUEL,Y,N,N,N,N,Y) SOLUTN(MIXF,Y,Y,N,N,N,Y) DEN1 = 145 VIST = 144 EPOR = 142 ;HPOR = 140 ;NPOR = 141 ;VPOR = 143 TEMP1 = 146 PRPS = 115 ************************************************************ 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(U1,Y,Y,Y,Y,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(H1,N,Y,Y,N,Y,N) TERMS(SMOS,N,Y,Y,Y,Y,Y) TERMS(SMOM,N,Y,Y,Y,N,Y) TERMS(F1,N,Y,Y,Y,Y,Y) TERMS(F2,N,Y,Y,Y,N,Y) TERMS(F3,N,Y,Y,Y,Y,Y) TERMS(F4,N,Y,Y,Y,N,Y) TERMS(F5,N,Y,Y,Y,Y,Y) TERMS(F6,N,Y,Y,Y,N,Y) TERMS(F7,N,Y,Y,Y,Y,Y) TERMS(F8,N,Y,Y,Y,N,Y) TERMS(F9,N,Y,Y,Y,Y,Y) TERMS(F10,N,Y,Y,Y,N,Y) TERMS(F11,N,Y,Y,Y,Y,Y) TERMS(MIXF,N,Y,Y,Y,Y,Y) DIFCUT =0.5 ;ZDIFAC =1. GALA = F ;ADDDIF = F NEWRH1 = T NEWENT = T ISOLX = -1 ;ISOLY = -1 ;ISOLZ = -1 DENPCO = T ************************************************************ Group 9. Properties used if PRPS is not stored, and where PRPS = -1.0 if it is! RHO1 = GRND6 ;TMP1 = GRND7 ;EL1 = GRND4 TSURR =0. ;TEMP0 =0. ;PRESS0 =8.0E+05 DVO1DT =0. ;DRH1DP =0. RHO1A =16. ;RHO1B =29. ;RHO1C =28. TMP1A =0. ;TMP1B =0. ;TMP1C =0. TMP2A =0.054825 ;TMP2B =4.9E+07 ;TMP2C =0.054825 EMISS =0. ;SCATT =0. RADIA =0. ;RADIB =0. EL1A =0. ;EL1B =0. ;EL1C =0. ENUL =9.983361E-06 ;ENUT = GRND3 ENUTA =0. ;ENUTB =0. ;ENUTC =0. IENUTA = 0 PRNDTL(U1)=1. ;PRNDTL(V1)=1. PRNDTL(W1)=1. ;PRNDTL(KE)=1. PRNDTL(EP)=1. ;PRNDTL(H1)=1. PRNDTL(SMOS)=1. ;PRNDTL(SMOM)=1. PRNDTL(F1)=1. ;PRNDTL(F2)=1. PRNDTL(F3)=1. ;PRNDTL(F4)=1. PRNDTL(F5)=1. ;PRNDTL(F6)=1. PRNDTL(F7)=1. ;PRNDTL(F8)=1. PRNDTL(F9)=1. ;PRNDTL(F10)=1. PRNDTL(F11)=1. ;PRNDTL(MIXF)=1. PRT(U1)=1. ;PRT(V1)=1. PRT(W1)=1. ;PRT(KE)=1. PRT(EP)=1.314 ;PRT(H1)=1. PRT(SMOS)=1. ;PRT(SMOM)=1. PRT(F1)=1. ;PRT(F2)=1. PRT(F3)=1. ;PRT(F4)=1. PRT(F5)=1. ;PRT(F6)=1. PRT(F7)=1. ;PRT(F8)=1. PRT(F9)=1. ;PRT(F10)=1. PRT(F11)=1. ;PRT(MIXF)=1. CP1 = GRND10 ;CP2 =1. CP1A =1500. ;CP1B =1500. ;CP1C =1500. ;CP1D =0. ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initial field variables (PHIs) FIINIT(P1)=1.0E-10 ;FIINIT(U1)=1.0E-10 FIINIT(V1)=1.0E-10 ;FIINIT(W1)=10. FIINIT(KE)=11.25 ;FIINIT(EP)=353.255707 FIINIT(H1)=1.1595E+06 ;FIINIT(PRPS)=1.0E-10 FIINIT(PRDM)=1.0E-10 ;FIINIT(OXDM)=1.0E-10 FIINIT(FRFM)=1.0E-10 ;FIINIT(TMPM)=1.0E-10 FIINIT(SMOS)=0. ;FIINIT(SMOM)=0. FIINIT(F1)=0.090909 ;FIINIT(F2)=0.090909 FIINIT(F3)=0.090909 ;FIINIT(F4)=0.090909 FIINIT(F5)=0.090909 ;FIINIT(F6)=0.090909 FIINIT(F7)=0.090909 ;FIINIT(F8)=0.090909 FIINIT(F9)=0.090909 ;FIINIT(F10)=0.090909 FIINIT(F11)=0.090909 ;FIINIT(MNSQ)=1.0E-10 FIINIT(AVEF)=1.0E-10 ;FIINIT(MIXL)=1.0E-10 FIINIT(RATE)=31.400507 ;FIINIT(DEGF)=1.0E-10 FIINIT(RRAT)=1.0E-10 ;FIINIT(EPKE)=1.0E-10 FIINIT(HPOR)=1. ;FIINIT(NPOR)=1. FIINIT(EPOR)=1. ;FIINIT(VPOR)=1. FIINIT(ENUT)=1.0E-10 ;FIINIT(RHO1)=3.606 FIINIT(TMP1)=773. ;FIINIT(PROD)=1.0E-10 FIINIT(OXID)=1.0E-10 ;FIINIT(FUEL)=0.109649 FIINIT(MIXF)=0.109649 PATCH(CMP1 ,INIVAL, 1, 6, 1, 2, 1, 3, 1, 1) INIT(CMP1 ,PRPS,0. ,199. ) PATCH(CMP2 ,INIVAL, 1, 5, 7, 7, 1, 1, 1, 1) INIT(CMP2 ,EPOR,0. ,0.709 ) PATCH(CMP3 ,INIVAL, 1, 6, 7, 7, 1, 1, 1, 1) INIT(CMP3 ,VPOR,0. ,0.709 ) PATCH(CMP4 ,INIVAL, 1, 6, 7, 7, 1, 1, 1, 1) INIT(CMP4 ,NPOR,0. ,0.418 ) PATCH(CMP5 ,INIVAL, 1, 6, 7, 7, 1, 1, 1, 1) INIT(CMP5 ,HPOR,0. ,1. ) PATCH(CMP6 ,INIVAL, 1, 5, 8, 8, 1, 1, 1, 1) INIT(CMP6 ,EPOR,0. ,0.185 ) PATCH(CMP7 ,INIVAL, 1, 6, 8, 8, 1, 1, 1, 1) INIT(CMP7 ,VPOR,0. ,0.185 ) PATCH(CMP8 ,INIVAL, 1, 6, 8, 8, 1, 1, 1, 1) INIT(CMP8 ,V1 ,0. ,0. ) INIT(CMP8 ,NPOR,0. ,0. ) PATCH(CMP9 ,INIVAL, 1, 6, 8, 8, 1, 1, 1, 1) INIT(CMP9 ,HPOR,0. ,0.877 ) PATCH(CMP10 ,INIVAL, 1, 5, 9, 10, 1, 1, 1, 1) INIT(CMP10 ,U1 ,0. ,0. ) INIT(CMP10 ,EPOR,0. ,0. ) PATCH(CMP11 ,INIVAL, 1, 6, 9, 10, 1, 1, 1, 1) INIT(CMP11 ,PRPS,0. ,199. ) PATCH(CMP12 ,INIVAL, 1, 6, 9, 9, 1, 1, 1, 1) INIT(CMP12 ,V1 ,0. ,0. ) INIT(CMP12 ,NPOR,0. ,0. ) PATCH(CMP13 ,INIVAL, 1, 6, 9, 10, 1, 1, 1, 1) INIT(CMP13 ,W1 ,0. ,0. ) INIT(CMP13 ,HPOR,0. ,0. ) PATCH(CMP14 ,INIVAL, 1, 5, 8, 8, 2, 2, 1, 1) INIT(CMP14 ,EPOR,0. ,0.997 ) PATCH(CMP15 ,INIVAL, 1, 6, 8, 8, 2, 2, 1, 1) INIT(CMP15 ,VPOR,0. ,0.997 ) PATCH(CMP16 ,INIVAL, 1, 6, 8, 8, 2, 2, 1, 1) INIT(CMP16 ,NPOR,0. ,0.946 ) PATCH(CMP17 ,INIVAL, 1, 6, 8, 8, 2, 2, 1, 1) INIT(CMP17 ,HPOR,0. ,1. ) PATCH(CMP18 ,INIVAL, 1, 5, 9, 9, 2, 2, 1, 1) INIT(CMP18 ,EPOR,0. ,0.706 ) PATCH(CMP19 ,INIVAL, 1, 6, 9, 9, 2, 2, 1, 1) INIT(CMP19 ,VPOR,0. ,0.706 ) PATCH(CMP20 ,INIVAL, 1, 6, 9, 9, 2, 2, 1, 1) INIT(CMP20 ,NPOR,0. ,0.473 ) PATCH(CMP21 ,INIVAL, 1, 6, 9, 9, 2, 2, 1, 1) INIT(CMP21 ,HPOR,0. ,1. ) PATCH(CMP22 ,INIVAL, 1, 5, 10, 10, 2, 2, 1, 1) INIT(CMP22 ,EPOR,0. ,0.236 ) PATCH(CMP23 ,INIVAL, 1, 6, 10, 10, 2, 2, 1, 1) INIT(CMP23 ,VPOR,0. ,0.236 ) PATCH(CMP24 ,INIVAL, 1, 6, 10, 10, 2, 2, 1, 1) PATCH(CMP25 ,INIVAL, 1, 6, 10, 10, 2, 2, 1, 1) INIT(CMP25 ,HPOR,0. ,1. ) PATCH(WALL4 ,INIVAL, 1, 6, 2, 2, 1, 3, 1, 1) INIT(WALL4 ,V1 ,0. ,0. ) INIT(WALL4 ,NPOR,0. ,0. ) PATCH(WALL6 ,INIVAL, 1, 6, 1, 2, 3, 3, 1, 1) INIT(WALL6 ,W1 ,0. ,0. ) INIT(WALL6 ,HPOR,0. ,0. ) 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(FOIN ,SOUTH , 1, 6, 3, 3, 3, 3, 1, 1) COVAL(FOIN ,P1 , FIXFLU ,180.300003 ) COVAL(FOIN ,U1 ,0. ,0. ) COVAL(FOIN ,V1 ,0. ,50. ) COVAL(FOIN ,W1 ,0. ,0. ) COVAL(FOIN ,KE ,0. ,0.0625 ) COVAL(FOIN ,EP ,0. ,3.672038 ) COVAL(FOIN ,H1 ,0. ,4.001728E+06 ) COVAL(FOIN ,F11 ,0. ,1. ) COVAL(FOIN ,FUEL,0. ,0.058005 ) COVAL(FOIN ,MIXF,0. ,0.109649 ) PATCH(SOIN1 ,CELL , 1, 1, 10, 10, 7, 7, 1, 1) COVAL(SOIN1 ,P1 , FIXFLU ,8.157E-03 ) COVAL(SOIN1 ,U1 ,0. ,0. ) COVAL(SOIN1 ,V1 ,0. ,-40. ) COVAL(SOIN1 ,W1 ,0. ,0. ) COVAL(SOIN1 ,KE ,0. ,0.123 ) COVAL(SOIN1 ,EP ,0. ,8.429416 ) COVAL(SOIN1 ,H1 ,0. ,1.1595E+06 ) COVAL(SOIN1 ,F1 ,0. ,1. ) COVAL(SOIN1 ,FUEL,0. ,0. ) COVAL(SOIN1 ,MIXF,0. ,0. ) PATCH(SOIN2 ,CELL , 4, 4, 10, 10, 7, 7, 1, 1) COVAL(SOIN2 ,P1 , FIXFLU ,8.157E-03 ) COVAL(SOIN2 ,U1 ,0. ,0. ) COVAL(SOIN2 ,V1 ,0. ,-40. ) COVAL(SOIN2 ,W1 ,0. ,0. ) COVAL(SOIN2 ,KE ,0. ,0.123 ) COVAL(SOIN2 ,EP ,0. ,8.429416 ) COVAL(SOIN2 ,H1 ,0. ,1.1595E+06 ) COVAL(SOIN2 ,F1 ,0. ,1. ) COVAL(SOIN2 ,FUEL,0. ,0. ) COVAL(SOIN2 ,MIXF,0. ,0. ) PATCH(DILUIN ,CELL , 1, 1, 10, 10, 10, 10, 1, 1) COVAL(DILUIN ,P1 , FIXFLU ,0.0145 ) COVAL(DILUIN ,U1 ,0. ,0. ) COVAL(DILUIN ,V1 ,0. ,-40. ) COVAL(DILUIN ,W1 ,0. ,0. ) COVAL(DILUIN ,KE ,0. ,0.123 ) COVAL(DILUIN ,EP ,0. ,6.299674 ) COVAL(DILUIN ,H1 ,0. ,1.1595E+06 ) COVAL(DILUIN ,F1 ,0. ,1. ) COVAL(DILUIN ,FUEL,0. ,0. ) COVAL(DILUIN ,MIXF,0. ,0. ) PATCH(OUTLET ,HIGH , 1, 6, 1, 10, 13, 13, 1, 1) COVAL(OUTLET ,P1 ,1000. ,0. ) COVAL(OUTLET ,U1 ,0. ,0. ) COVAL(OUTLET ,V1 ,0. ,0. ) COVAL(OUTLET ,W1 ,0. ,0. ) COVAL(OUTLET ,KE ,0. , SAME ) COVAL(OUTLET ,EP ,0. , SAME ) COVAL(OUTLET ,H1 ,0. , SAME ) COVAL(OUTLET ,SMOS,0. , SAME ) COVAL(OUTLET ,SMOM,0. , SAME ) COVAL(OUTLET ,F1 ,0. , SAME ) COVAL(OUTLET ,F2 ,0. , SAME ) COVAL(OUTLET ,F3 ,0. , SAME ) COVAL(OUTLET ,F4 ,0. , SAME ) COVAL(OUTLET ,F5 ,0. , SAME ) COVAL(OUTLET ,F6 ,0. , SAME ) COVAL(OUTLET ,F7 ,0. , SAME ) COVAL(OUTLET ,F8 ,0. , SAME ) COVAL(OUTLET ,F9 ,0. , SAME ) COVAL(OUTLET ,F10 ,0. , SAME ) COVAL(OUTLET ,F11 ,0. , SAME ) COVAL(OUTLET ,FUEL,0. , SAME ) COVAL(OUTLET ,MIXF,0. , SAME ) PATCH(WALL1 ,NWALL , 1, 6, 10, 10, 3, 6, 1, 1) COVAL(WALL1 ,U1 , GRND2 ,0. ) COVAL(WALL1 ,W1 , GRND2 ,0. ) COVAL(WALL1 ,KE , GRND2 , GRND2 ) COVAL(WALL1 ,EP , GRND2 , GRND2 ) PATCH(WALL2 ,NWALL , 1, 6, 10, 10, 8, 9, 1, 1) COVAL(WALL2 ,U1 , GRND2 ,0. ) COVAL(WALL2 ,W1 , GRND2 ,0. ) COVAL(WALL2 ,KE , GRND2 , GRND2 ) COVAL(WALL2 ,EP , GRND2 , GRND2 ) PATCH(WALL3 ,NWALL , 1, 6, 10, 10, 11, 13, 1, 1) COVAL(WALL3 ,U1 , GRND2 ,0. ) COVAL(WALL3 ,W1 , GRND2 ,0. ) COVAL(WALL3 ,KE , GRND2 , GRND2 ) COVAL(WALL3 ,EP , GRND2 , GRND2 ) PATCH(WALL4-NW,NWALL , 1, 6, 2, 2, 1, 3, 1, 1) COVAL(WALL4-NW,U1 , GRND2 ,0. ) COVAL(WALL4-NW,W1 , GRND2 ,0. ) COVAL(WALL4-NW,KE , GRND2 , GRND2 ) COVAL(WALL4-NW,EP , GRND2 , GRND2 ) PATCH(WALL4-SW,SWALL , 1, 6, 3, 3, 1, 3, 1, 1) COVAL(WALL4-SW,U1 , GRND2 ,0. ) COVAL(WALL4-SW,W1 , GRND2 ,0. ) COVAL(WALL4-SW,KE , GRND2 , GRND2 ) COVAL(WALL4-SW,EP , GRND2 , GRND2 ) PATCH(WALL5 ,LWALL , 1, 6, 3, 6, 1, 1, 1, 1) COVAL(WALL5 ,U1 , GRND2 ,0. ) COVAL(WALL5 ,V1 , GRND2 ,0. ) COVAL(WALL5 ,KE , GRND2 , GRND2 ) COVAL(WALL5 ,EP , GRND2 , GRND2 ) PATCH(WALL6-HW,HWALL , 1, 6, 1, 2, 3, 3, 1, 1) COVAL(WALL6-HW,U1 , GRND2 ,0. ) COVAL(WALL6-HW,V1 , GRND2 ,0. ) COVAL(WALL6-HW,KE , GRND2 , GRND2 ) COVAL(WALL6-HW,EP , GRND2 , GRND2 ) PATCH(WALL6-LW,LWALL , 1, 6, 1, 2, 4, 4, 1, 1) COVAL(WALL6-LW,U1 , GRND2 ,0. ) COVAL(WALL6-LW,V1 , GRND2 ,0. ) COVAL(WALL6-LW,KE , GRND2 , GRND2 ) COVAL(WALL6-LW,EP , GRND2 , GRND2 ) PATCH(WHOLE ,PHASEM, 1, 6, 1, 10, 1, 13, 1, 1) COVAL(WHOLE ,FUEL,In-Form:source - see Grp 19) PATCH(SMOKE ,PHASEM, 1, 6, 1, 10, 1, 13, 1, 1) COVAL(SMOKE ,SMOS, FIXFLU , GRND ) COVAL(SMOKE ,SMOM, FIXFLU , GRND ) XCYCLE = F EGWF = T WALLCO = GRND2 ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 500 ;ISWC1 = 1 LITHYD = 1 ;LITFLX = 1 ;LITC = 1 ;ITHC1 = 1 SARAH =1. SELREF = T RESFAC =1.0E-03 ************************************************************ Group 16. Terminate Iterations LITER(P1)=20 ;LITER(U1)=20 LITER(V1)=20 ;LITER(W1)=20 LITER(KE)=20 ;LITER(EP)=20 LITER(H1)=20 ;LITER(SMOS)=20 LITER(SMOM)=20 ;LITER(F1)=20 LITER(F2)=20 ;LITER(F3)=20 LITER(F4)=20 ;LITER(F5)=20 LITER(F6)=20 ;LITER(F7)=20 LITER(F8)=20 ;LITER(F9)=20 LITER(F10)=20 ;LITER(F11)=20 LITER(MIXF)=20 ENDIT(P1)=1.0E-03 ;ENDIT(U1)=1.0E-03 ENDIT(V1)=1.0E-03 ;ENDIT(W1)=1.0E-03 ENDIT(KE)=1.0E-03 ;ENDIT(EP)=1.0E-03 ENDIT(H1)=1.0E-03 ;ENDIT(SMOS)=1.0E-03 ENDIT(SMOM)=1.0E-03 ;ENDIT(F1)=1.0E-03 ENDIT(F2)=1.0E-03 ;ENDIT(F3)=1.0E-03 ENDIT(F4)=1.0E-03 ;ENDIT(F5)=1.0E-03 ENDIT(F6)=1.0E-03 ;ENDIT(F7)=1.0E-03 ENDIT(F8)=1.0E-03 ;ENDIT(F9)=1.0E-03 ENDIT(F10)=1.0E-03 ;ENDIT(F11)=1.0E-03 ENDIT(MIXF)=1.0E-03 ************************************************************ Group 17. Relaxation RELAX(P1,LINRLX,1.) RELAX(U1,FALSDT,0.02) RELAX(V1,FALSDT,0.02) RELAX(W1,FALSDT,0.02) RELAX(KE,LINRLX,0.5) RELAX(EP,LINRLX,0.5) RELAX(H1,FALSDT,10.) RELAX(PRPS,LINRLX,1.) RELAX(PRDM,LINRLX,1.) RELAX(OXDM,LINRLX,1.) RELAX(FRFM,LINRLX,1.) RELAX(TMPM,LINRLX,1.) RELAX(SMOS,FALSDT,1.0E+09) RELAX(SMOM,FALSDT,1.0E+09) RELAX(F1,LINRLX,1.) RELAX(F2,LINRLX,1.) RELAX(F3,LINRLX,1.) RELAX(F4,LINRLX,1.) RELAX(F5,LINRLX,1.) RELAX(F6,LINRLX,1.) RELAX(F7,LINRLX,1.) RELAX(F8,LINRLX,1.) RELAX(F9,LINRLX,1.) RELAX(F10,LINRLX,1.) RELAX(F11,LINRLX,1.) RELAX(MNSQ,LINRLX,1.) RELAX(AVEF,LINRLX,1.) RELAX(MIXL,LINRLX,1.) RELAX(RATE,LINRLX,1.) RELAX(DEGF,LINRLX,1.) RELAX(RRAT,LINRLX,1.) RELAX(EPKE,LINRLX,1.) RELAX(ENUT,LINRLX,1.) RELAX(RHO1,LINRLX,1.) RELAX(TMP1,LINRLX,1.) RELAX(PROD,LINRLX,1.) RELAX(OXID,LINRLX,1.) RELAX(FUEL,LINRLX,1.) RELAX(MIXF,FALSDT,1.0E+09) KELIN = 3 OVRRLX =0. EXPERT = F ;NNORSL = F ************************************************************ Group 18. Limits VARMAX(P1)=1.0E+10 ;VARMIN(P1)=-1.0E+10 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(H1)=1.0E+10 ;VARMIN(H1)=-1.0E+10 VARMAX(PRPS)=1.0E+10 ;VARMIN(PRPS)=-1.0E+10 VARMAX(PRDM)=1.0E+10 ;VARMIN(PRDM)=-1.0E+10 VARMAX(OXDM)=1.0E+10 ;VARMIN(OXDM)=-1.0E+10 VARMAX(FRFM)=1.0E+10 ;VARMIN(FRFM)=-1.0E+10 VARMAX(TMPM)=1.0E+10 ;VARMIN(TMPM)=-1.0E+10 VARMAX(SMOS)=1.0E+10 ;VARMIN(SMOS)=-1.0E+10 VARMAX(SMOM)=1.0E+10 ;VARMIN(SMOM)=-1.0E+10 VARMAX(F1)=1. ;VARMIN(F1)=0. VARMAX(F2)=1. ;VARMIN(F2)=0. VARMAX(F3)=1. ;VARMIN(F3)=0. VARMAX(F4)=1. ;VARMIN(F4)=0. VARMAX(F5)=1. ;VARMIN(F5)=0. VARMAX(F6)=1. ;VARMIN(F6)=0. VARMAX(F7)=1. ;VARMIN(F7)=0. VARMAX(F8)=1. ;VARMIN(F8)=0. VARMAX(F9)=1. ;VARMIN(F9)=0. VARMAX(F10)=1. ;VARMIN(F10)=0. VARMAX(F11)=1. ;VARMIN(F11)=0. VARMAX(MNSQ)=1. ;VARMIN(MNSQ)=0. VARMAX(AVEF)=1. ;VARMIN(AVEF)=0. VARMAX(MIXL)=1.0E+10 ;VARMIN(MIXL)=-1.0E+10 VARMAX(RATE)=1.0E+10 ;VARMIN(RATE)=-1.0E+10 VARMAX(DEGF)=1.0E+10 ;VARMIN(DEGF)=-1.0E+10 VARMAX(RRAT)=1.0E+10 ;VARMIN(RRAT)=-1.0E+10 VARMAX(EPKE)=1.0E+10 ;VARMIN(EPKE)=-1.0E+10 VARMAX(HPOR)=1.0E+10 ;VARMIN(HPOR)=-1.0E+10 VARMAX(NPOR)=1.0E+10 ;VARMIN(NPOR)=-1.0E+10 VARMAX(EPOR)=1.0E+10 ;VARMIN(EPOR)=-1.0E+10 VARMAX(VPOR)=1.0E+10 ;VARMIN(VPOR)=-1.0E+10 VARMAX(ENUT)=1.0E+10 ;VARMIN(ENUT)=-1.0E+10 VARMAX(RHO1)=1.0E+10 ;VARMIN(RHO1)=-1.0E+10 VARMAX(TMP1)=1.0E+10 ;VARMIN(TMP1)=773. VARMAX(PROD)=1.0E+10 ;VARMIN(PROD)=0. VARMAX(OXID)=1.0E+10 ;VARMIN(OXID)=0. VARMAX(FUEL)=1.0E+10 ;VARMIN(FUEL)=0. VARMAX(MIXF)=1.0E+10 ;VARMIN(MIXF)=-1.0E+10 ************************************************************ Group 19. Data transmitted to GROUND GENK = T READQ1 = T PARSOL = F ISG62 = 1 CHSOA =0.054825 ;CHSOB =1. SPEDAT(SET,PROPERTY,TMP1,C,=MAX(773.&(H1-4.9E+07*FUEL)/(1500.*FUE$) SPEDAT(SET,PROPERTY,TMP1,C,L+1500.*OXID+1500.*PROD))!IMAT<100) SPEDAT(SET,PROPERTY,RHO1,C,=(P1+8.0E+05)*1.0/(FUEL/16.+OXID/29.+P$) SPEDAT(SET,PROPERTY,RHO1,C,ROD/28.)/(TMP1*8313.4)) SPEDAT(SET,STORED,PROD,C,=(MIXF-FUEL)*(1+17.24)!ZSLFIN) SPEDAT(SET,STORED,OXID,C,=1-FUEL-PROD!ZSLFIN) SPEDAT(SET,SOURCE,FUEL!WHOLE,C,=COVAL(1.*EPKE&0.0)) SPEDAT(SET,STORED,RRAT,C,=1.*EPKE*FUEL!ZSLFIN) SPEDAT(SET,LONGNAME,TMP1,C,absolute_temperature_of_the_gas_Kelvin) SPEDAT(SET,STORED,DEGF,C,=(9./5.)*(TMP1-273)!ZSLFIN) SPEDAT(SET,LONGNAME,DEGF,C,degrees_Fahrenheit) SPEDAT(SET,LONGNAME,RRAT,C,rate_of_consumption_of_fuel_kg/m^3sec) SPEDAT(SET,STORED,MIXL,C,=LEN1!ZSLFIN) SPEDAT(SET,STORED,RATE,C,=EPKE!ZSLFIN) SPEDAT(SET,MFM,FFUIN,R,0.109649) SPEDAT(SET,MFM,TAIRIN,R,773.) SPEDAT(SET,MFM,TFUIN,R,773.) SPEDAT(SET,MFM,TSTOIC,R,2106.90918) SPEDAT(SET,MFM,FACST,R,0.054825) SPEDAT(SET,MFM,GASCON,R,8314.) SPEDAT(SET,MFM,SPVLMX,R,100.) SPEDAT(SET,MFM,SPVLMN,R,1.0E-02) SPEDAT(SET,MFM,SMOCON,R,1.) SPEDAT(SET,MFM,SMOEXP,R,7.) SPEDAT(SET,MFM,MFMMOD,C,SCRS) SPEDAT(SET,MFM,NFLUIDS,I,11) SPEDAT(SET,MFM,NFLR,I,1) SPEDAT(SET,MFM,NFLF,I,11) SPEDAT(SET,MFM,CONREA,R,0.) SPEDAT(SET,MFM,CONMIX,R,5.) SPEDAT(SET,MFM,VISCON,R,0.) SPEDAT(SET,GXMONI,PLOTALL,L,T) SPEDAT(SET,MATERIAL,0,L,T) SPEDAT(SET,MATERIAL,199,L,T) ************************************************************ Group 20. Preliminary Printout DISTIL = T ;NULLPR = F NDST = 0 DSTTOL =1.0E-02 EX(P1)=204.5 ;EX(U1)=1.01 EX(V1)=5.748 ;EX(W1)=7.893 EX(KE)=52.830002 ;EX(EP)=1.995E+04 EX(H1)=1.93E+06 ;EX(PRPS)=0.9385 EX(PRDM)=0.5259 ;EX(OXDM)=0.4056 EX(FRFM)=7.007E-03 ;EX(TMPM)=1266. EX(SMOS)=3.38E-06 ;EX(SMOM)=7.983E-06 EX(F1)=0.07249 ;EX(F2)=0.1613 EX(F3)=0.2186 ;EX(F4)=0.1438 EX(F5)=0.07713 ;EX(F6)=0.04748 EX(F7)=0.03901 ;EX(F8)=0.05254 EX(F9)=0.05453 ;EX(F10)=0.02652 EX(F11)=0.04501 ;EX(MNSQ)=0.3369 EX(AVEF)=0.03621 ;EX(MIXL)=0. EX(RATE)=290.5 ;EX(DEGF)=0. EX(RRAT)=0. ;EX(EPKE)=290.5 EX(HPOR)=0. ;EX(NPOR)=0. EX(EPOR)=0. ;EX(VPOR)=0. EX(ENUT)=0.01362 ;EX(RHO1)=2.198 EX(TMP1)=1121. ;EX(PROD)=0.4996 EX(OXID)=0.4337 ;EX(FUEL)=5.078E-03 EX(MIXF)=0.03247 ************************************************************ 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(U1,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(H1,Y,N,Y,Y,Y,Y) OUTPUT(PRPS,Y,N,Y,N,N,N) OUTPUT(PRDM,Y,N,Y,N,N,N) OUTPUT(OXDM,Y,N,Y,N,N,N) OUTPUT(FRFM,Y,N,Y,N,N,N) OUTPUT(TMPM,Y,N,Y,N,N,N) OUTPUT(SMOS,Y,N,Y,Y,Y,Y) OUTPUT(SMOM,Y,N,Y,Y,Y,Y) OUTPUT(F1,Y,N,Y,Y,Y,Y) OUTPUT(F2,Y,N,Y,Y,Y,Y) OUTPUT(F3,Y,N,Y,Y,Y,Y) OUTPUT(F4,Y,N,Y,Y,Y,Y) OUTPUT(F5,Y,N,Y,Y,Y,Y) OUTPUT(F6,Y,N,Y,Y,Y,Y) OUTPUT(F7,Y,N,Y,Y,Y,Y) OUTPUT(F8,Y,N,Y,Y,Y,Y) OUTPUT(F9,Y,N,Y,Y,Y,Y) OUTPUT(F10,Y,N,Y,Y,Y,Y) OUTPUT(F11,Y,N,Y,Y,Y,Y) OUTPUT(MNSQ,Y,N,Y,N,N,N) OUTPUT(AVEF,Y,N,Y,N,N,N) OUTPUT(MIXL,Y,N,Y,N,N,N) OUTPUT(RATE,Y,N,Y,N,N,N) OUTPUT(DEGF,Y,N,Y,N,N,N) OUTPUT(RRAT,Y,N,Y,N,N,N) OUTPUT(EPKE,Y,N,Y,N,N,N) OUTPUT(HPOR,N,N,N,N,N,N) OUTPUT(NPOR,N,N,N,N,N,N) OUTPUT(EPOR,N,N,N,N,N,N) OUTPUT(VPOR,N,N,N,N,N,N) OUTPUT(ENUT,Y,N,Y,N,N,N) OUTPUT(RHO1,Y,N,Y,N,N,N) OUTPUT(TMP1,Y,N,Y,N,N,N) OUTPUT(PROD,Y,N,Y,N,N,N) OUTPUT(OXID,Y,N,Y,N,N,N) OUTPUT(FUEL,Y,N,Y,Y,Y,Y) OUTPUT(MIXF,Y,N,Y,Y,Y,Y) ************************************************************ Group 22. Monitor Print-Out IXMON = 3 ;IYMON = 5 ;IZMON = 5 NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1 UWATCH = T ;USTEER = T HIGHLO = F ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 500 ;NUMCLS = 5 NXPRIN = -1 ;IXPRF = 3 ;IXPRL = 3 NYPRIN = 1 ;IYPRF = 1 ;IYPRL = 10000 NZPRIN = 2 ;IZPRF = 1 ;IZPRL = 10000 XZPR = F ;YZPR = T IPLTF = 2 ;IPLTL = 100 ;NPLT = 5 ISWPRF = 1 ;ISWPRL = 100000 ITABL = 1 ;IPROF = 1 ABSIZ =0.5 ;ORSIZ =0.4 NTZPRF = 1 ;NCOLPF = 50 ICHR = 2 ;NCOLCO = 45 ;NROWCO = 40 PATCH(IZ4 ,CONTUR, 1, 6, 1, 10, 4, 4, 1, 1) PLOT(IZ4 ,TMP1,1. ,10. ) PATCH(XSECIN1 ,CONTUR, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(XSECIN1 ,W1 ,0. ,10. ) PLOT(XSECIN1 ,TMP1,0. ,10. ) PLOT(XSECIN1 ,FUEL,0. ,10. ) PLOT(XSECIN1 ,MIXF,0. ,10. ) PATCH(XSECIN2 ,CONTUR, 4, 4, 1, 10, 1, 13, 1, 1) PLOT(XSECIN2 ,W1 ,0. ,10. ) PLOT(XSECIN2 ,TMP1,0. ,10. ) PLOT(XSECIN2 ,FUEL,0. ,10. ) PLOT(XSECIN2 ,MIXF,0. ,10. ) PATCH(PROF1 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF1 ,F1 ,0. ,0. ) PATCH(PROF2 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF2 ,F2 ,0. ,0. ) PATCH(PROF3 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF3 ,F3 ,0. ,0. ) PATCH(PROF4 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF4 ,F4 ,0. ,0. ) PATCH(PROF5 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF5 ,F5 ,0. ,0. ) PATCH(PROF6 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF6 ,F6 ,0. ,0. ) PATCH(PROF7 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF7 ,F7 ,0. ,0. ) PATCH(PROF8 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF8 ,F8 ,0. ,0. ) PATCH(PROF9 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF9 ,F9 ,0. ,0. ) PATCH(PROF10 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF10 ,F10 ,0. ,0. ) PATCH(PROF11 ,PROFIL, 1, 1, 1, 10, 1, 13, 1, 1) PLOT(PROF11 ,F11 ,0. ,0. ) PATCH(MIDDLE ,PROFIL, 1, 1, 5, 5, 1, 13, 1, 1) PLOT(MIDDLE ,MNSQ,0. ,0. ) PLOT(MIDDLE ,AVEF,0. ,0. ) PLOT(MIDDLE ,ENUT,0. ,0. ) ************************************************************ Group 24. Dumps For Restarts SAVE = T ;NOWIPE = F NSAVE =CHAM STOP