TALK=T;RUN( 1, 1) #cls display 1-D PARSOL HEAT CONDUCTION Ý\\\\\\Ý---------------------------------------Ý\\\\\\\Ý AL air AL x= 0. 0.025 0.125 0.15 BC.T=1.0 [k] T=0.[K] Analytical Solution ----------------------------------------------------------- ix = 1 2 3 4 5 6 7 T = 1. 1. 1. 0.9 0.8 0.7 0.6 ----------------------------------------------------------- ix = 8 9 10 11 12 13 14 15 T = 0.5 0.4 0.3 0.2 0.1 0. 0. 0. ----------------------------------------------------------- Note: This case was used to test PARSOL accuracy ENDDIS #pause ************************************************************ Q1 created by VDI menu, Version 3.4, Date 26/07/01 CPVNAM=VDI;SPPNAM=Core ************************************************************ IRUNN = 1 ;LIBREF = 0 ************************************************************ Group 1. Run Title TEXT(Parallel plates with uniform temperature) ************************************************************ Group 2. Transience STEADY = T ************************************************************ Groups 3, 4, 5 Grid Information * Overall number of cells, RSET(M,NX,NY,NZ,tolerance) RSET(M,15,1,1) * Set overall domain extent: * xulast yvlast zwlast name ySI= 1.000000E+00; xSI= 1.500000E-01; ZSI= 1.000000E+00 RSET(D,CHAM ) ************************************************************ Group 6. Body-Fitted coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T * Non-default variable names NAME(148) =PRPS ; NAME(149) =TEM1 * Solved variables list SOLVE(TEM1) * Stored variables list STORE(PRPS) * Additional solver options SOLUTN(TEM1,Y,Y,Y,N,N,Y) ************************************************************ Group 8. Terms & Devices ************************************************************ Group 9. Properties SETPRPS(1, 0) RHO1 = 1.189000E+00 CP1 = 1.005000E+03 ENUL = 1.544000E-05 ;ENUT = 0.000000E+00 DRH1DP = 1.000000E-05 DVO1DT = 3.410000E-03 PRNDTL(TEM1) = -2.580000E-02 ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initialise Var/Porosity Fields No PATCHes used for this Group INIADD = f ************************************************************ Group 12. Convection and diffusion adjustments No PATCHes used for this Group ************************************************************ Group 13. Boundary & Special Sources No PATCHes used for this Group ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 250 RESFAC = 1.000000E-05 ************************************************************ Group 16. Terminate Iterations ************************************************************ Group 17. Relaxation ************************************************************ Group 18. Limits ************************************************************ Group 19. EARTH Calls To GROUND Station USEGRD = T ;USEGRX = T ASAP = T PARSOL = T ************************************************************ Group 20. Preliminary Printout ECHO = T distil=t; dsttol=1e-03 EX(PRPS)= 2.740E+01 EX(TEM1)= 5.000E-01 ************************************************************ Group 21. Print-out of Variables ************************************************************ Group 22. Monitor Print-Out IXMON = 1 ;IYMON = 1 ;IZMON = 1 NPRMON = 100000 NPRMNT = 1 TSTSWP = -1 ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 100000 NxPRIN = 1 IxPRF = 1 ;IxPRL = nx ISWPRF = 1 ;ISWPRL = 100000 IPROF = 3 PATCH (MYPLOT ,PROFIL,1,nx,1,1,1,1,1,1) PLOT(MYPLOT ,TEM1, 0.000000E+00, 0.000000E+00) ************************************************************ Group 24. Dumps For Restarts restrt(all) NOWIPE = T ************************************************************ Group 25. DEBUG Group DEBUG = T DBEDGE = T DBCOMP = T DBCMPN = T IREGDB = -1 DBSOL2 = T DBGPHI(TEM1) = T iswdb2=100 GVIEW(P,0.000000E+00,0.000000E+00,-1.000000E+00) GVIEW(UP,0.000000E+00,-1.000000E+00,0.000000E+00) > DOM, SIZE, 1.500000E-01, 1.000000E+00, 1.000000E+00 > DOM, MONIT, 1.050000E-01, 5.000000E-01, 5.000000E-01 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > DOM, SNAPSIZE, 1.000000E-02 > GRID, RSET_X_1, 15, 1.000000E+00 > GRID, RSET_Y_1, 1, 1.000000E+00 > GRID, RSET_Z_1, 1, 1.000000E+00 > DOM, RELAX, 5.000000E-01 > OBJ1, NAME, B3 > OBJ1, POSITION, 0.000000E+00, 1.000000E+00, 0.000000E+00 > OBJ1, SIZE, 1.500000E-01, 0.000000E+00, 1.000000E+00 > OBJ1, CLIPART, cube11 > OBJ1, ROTATION24, 1 > OBJ1, GRID, 2.000000E+00 > OBJ1, TYPE, PLATE > OBJ1, ADIABATIC, 0.000000E+00, 0.000000E+00 > OBJ2, NAME, B5 > OBJ2, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ2, SIZE, 1.500000E-01, 0.000000E+00, 1.000000E+00 > OBJ2, CLIPART, cube11 > OBJ2, ROTATION24, 1 > OBJ2, GRID, 2.000000E+00 > OBJ2, TYPE, PLATE > OBJ2, ADIABATIC, 0.000000E+00, 0.000000E+00 > OBJ3, NAME, B4 > OBJ3, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ3, SIZE, 2.500000E-02, 1.000000E+00, 1.000000E+00 > OBJ3, CLIPART, cube14 > OBJ3, ROTATION24, 1 > OBJ3, GRID, 2.000000E+00 > OBJ3, TYPE, BLOCKAGE > OBJ3, MATERIAL, 100 > OBJ3, ADIABATIC, 0.000000E+00, 0.000000E+00 > OBJ3, INI_TEMP, 1.000000E+00 > OBJ4, NAME, B6 > OBJ4, POSITION, 1.250000E-01, 0.000000E+00, 0.000000E+00 > OBJ4, SIZE, 2.500000E-02, 1.000000E+00, 1.000000E+00 > OBJ4, CLIPART, cube14 > OBJ4, ROTATION24, 1 > OBJ4, GRID, 2.000000E+00 > OBJ4, TYPE, BLOCKAGE > OBJ4, MATERIAL, 100 > OBJ4, ADIABATIC, 0.000000E+00, 0.000000E+00 > OBJ4, INI_TEMP, 0.000000E+00 > OBJ5, NAME, B7 > OBJ5, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ5, SIZE, 0.000000E+00, 1.000000E+00, 1.000000E+00 > OBJ5, CLIPART, cube13 > OBJ5, ROTATION24, 1 > OBJ5, TYPE, PLATE > OBJ5, SURF_TEMP, 0.000000E+00, 1.000000E+00 > OBJ6, NAME, B8 > OBJ6, POSITION, 1.500000E-01, 0.000000E+00, 0.000000E+00 > OBJ6, SIZE, 0.000000E+00, 1.000000E+00, 1.000000E+00 > OBJ6, CLIPART, cube13 > OBJ6, ROTATION24, 1 > OBJ6, TYPE, PLATE > OBJ6, SURF_TEMP, 0.000000E+00, 0.000000E+00 M