TALK=T;RUN(1,1) DISPLAY The problem considered is 2D supersonic flow in a 'supersonic diffuser', i.e. a converging duct. The problem is solved using the IPARAB=4 option of the parabolic solver. The flow enters axially at MACH 2, and then passes over a 8o corner where a weak oblique shock wave is generated of angle 37o, which is in turn reflected from the bottom of the duct to arrive at the top corner of the exit plane. The PHOENICS results are compared with the results of shock theory below: M1 M2 M3 | P1/Po1 P2/Po1 P3/Po1 Theory 2.0 1.71 1.42 | 0.128 0.197 0.293 PHOENICS 2.0 1.75 1.45 | 0.128 0.192 0.293 Here, M, P and Po denote Mach number, static pressure and total pressure, respectively; and 1, 2 and 3 denote inlet, post shock, and post reflected-shock, respectively. ENDDIS PHOTON USE p parphi con mach x 1 fi;.01 pau;cl vec x 1 sh pau;cl con p1 x 1 fi;.01 pau;cl con rho1 x 1 fi;.01 ENDUSE ************************************************************ Group 1. Run Title and Number ************************************************************ ************************************************************ TEXT(2D Flow In A Supersonic Diffuser ) ************************************************************ ************************************************************ 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 = 80 YVLAST =1. AZYV =1. ;AZRI =0. ;AZAL =0. YFRAC(1)=0.0125 ;YFRAC(3)=0.0375 YFRAC(5)=0.0625 ;YFRAC(7)=0.0875 YFRAC(9)=0.1125 ;YFRAC(11)=0.1375 YFRAC(13)=0.1625 ;YFRAC(15)=0.1875 YFRAC(17)=0.2125 ;YFRAC(19)=0.2375 YFRAC(21)=0.2625 ;YFRAC(23)=0.2875 YFRAC(25)=0.3125 ;YFRAC(27)=0.3375 YFRAC(29)=0.3625 ;YFRAC(31)=0.3875 YFRAC(33)=0.4125 ;YFRAC(35)=0.4375 YFRAC(37)=0.4625 ;YFRAC(39)=0.4875 YFRAC(41)=0.5125 ;YFRAC(43)=0.5375 YFRAC(45)=0.5625 ;YFRAC(47)=0.5875 YFRAC(49)=0.6125 ;YFRAC(51)=0.6375 YFRAC(53)=0.6625 ;YFRAC(55)=0.6875 YFRAC(57)=0.7125 ;YFRAC(59)=0.7375 YFRAC(61)=0.7625 ;YFRAC(63)=0.7875 YFRAC(65)=0.8125 ;YFRAC(67)=0.8375 YFRAC(69)=0.8625 ;YFRAC(71)=0.8875 YFRAC(73)=0.9125 ;YFRAC(75)=0.9375 YFRAC(77)=0.9625 ;YFRAC(79)=0.9875 ************************************************************ Group 5. Z-Direction Grid Spacing PARAB = T NZ = 320 ZWADD =-7.115387 ZWLAST =2.3 ZFRAC(1)=3.125E-03 ;ZFRAC(81)=0.253125 ZFRAC(161)=0.503125 ;ZFRAC(241)=0.753125 ************************************************************ Group 6. Body-Fitted Coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T NAME(1)=P1 ;NAME(5)=V1 NAME(7)=W1 ;NAME(149)=MACH NAME(150)=RHO1 * 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(V1,Y,Y,N,N,N,Y) SOLUTN(W1,Y,Y,N,N,N,Y) SOLUTN(MACH,Y,N,N,N,N,Y) SOLUTN(RHO1,Y,N,N,N,N,Y) DEN1 = 150 ************************************************************ 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,N,Y,Y,Y) TERMS(W1,Y,Y,N,Y,Y,Y) DIFCUT =0.5 ;ZDIFAC =1. GALA = F ;ADDDIF = F NEWRH1 = T U1AD =0. ;V1AD = GRND1 ;W1AD =0. 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 = GRND3 ;TMP1 =0. ;EL1 =0. TSURR =0. ;TEMP0 =0. ;PRESS0 =0. DVO1DT =0. ;DRH1DP = GRND3 RHO1A =1. ;RHO1B =0.714286 ;RHO1C =0. EMISS =0. ;SCATT =0. RADIA =0. ;RADIB =0. ENUL =1.0E-05 ;ENUT =0. CP1 =1. ;CP2 =1. ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initial field variables (PHIs) FIINIT(P1)=0.127805 ;FIINIT(V1)=1.0E-10 FIINIT(W1)=1.763834 ;FIINIT(MACH)=1.0E-10 FIINIT(RHO1)=0.230048 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(IN ,LOW , 1, 1, 1, 80, 1, 1, 1, 1) COVAL(IN ,P1 , FIXFLU ,0.405767 ) COVAL(IN ,V1 ,0. ,0. ) COVAL(IN ,W1 ,0. ,1.763834 ) XCYCLE = F EGWF = T WALLCO = GRND2 ************************************************************ Group 14. Downstream Pressure For PARAB IPARAB = 4 AZPH =0. ;PBAR =0. ************************************************************ Group 15. Terminate Sweeps LSWEEP = 1 ;ISWC1 = 1 LITHYD = 10 ;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 ENDIT(P1)=1.0E-03 ;ENDIT(V1)=1.0E-03 ENDIT(W1)=1.0E-03 ************************************************************ Group 17. Relaxation RELAX(P1,LINRLX,0.7) RELAX(V1,FALSDT,1.303977) RELAX(W1,FALSDT,1.303977) RELAX(MACH,LINRLX,1.) RELAX(RHO1,LINRLX,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(MACH)=1.0E+10 ;VARMIN(MACH)=-1.0E+10 VARMAX(RHO1)=1.0E+10 ;VARMIN(RHO1)=-1.0E+10 ************************************************************ Group 19. Data transmitted to GROUND PARSOL = F ISG62 = 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(V1,Y,N,Y,Y,Y,Y) OUTPUT(W1,Y,N,Y,Y,Y,Y) OUTPUT(MACH,Y,N,Y,N,N,N) OUTPUT(RHO1,Y,N,Y,N,N,N) ************************************************************ Group 22. Monitor Print-Out IXMON = 1 ;IYMON = 40 ;IZMON = 1 NPRMON = 100000 ;NPRMNT = 1 ;TSTSWP = -1 UWATCH = T ;USTEER = T HIGHLO = F ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 100000 ;NUMCLS = 5 NYPRIN = 2 ;IYPRF = 1 ;IYPRL = 10000 NZPRIN = 80 ;IZPRF = 1 ;IZPRL = 10000 IPLTF = 1 ;IPLTL = -1 ;NPLT = 2 ISWPRF = 1 ;ISWPRL = 100000 ITABL = 2 ;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 IDISPA = 2 ;IDISPB = 1 ;IDISPC = 320 STOP