TALK=F;RUN( 1, 1) ************************************************************ Q1 created by VDI menu, Version 3.6, Date 01/04/04 CPVNAM=VDI;SPPNAM=Core ************************************************************ Echo DISPLAY / USE settings DISPLAY This input file illustrates the In-Form heat source setting for external plates. The problem considered is the 2d convective heat exchange of air between non-uniformly heated up horizontal walls. The cooling air is moved from left to right. The heat flux is increased with a channel length on a south wall and is decreased on a north wall. The set heat sources depend on a length of a channel. Therefore the In-Form facilities are used. The south and north walls are VR objects with PLATE type. The source formula is placed inside a VR objects commands block. The In-Form setting for heat flux per unit area at south wall is > OBJ, INFSRC_TEM1, 1000.*XG with VOLU The In-Form setting for whole heat flux at north wall is > OBJ, INFSRC_TEM1, 100.*(1-XG) with WHOL The Q1 contains VRV USE commands ENDDIS VRV USE * Start of frame * Setting display swiches AXIS ON CELPOS OFF CONTOUR SCALE ON TEXT ON GRID OFF WIREFRAME OFF * Domain scaling factors SCALE 1.000000E+00 1.000000E+00 1.000000E+00 * Settings for current slice PROBE 4.750000E-01 9.000000E-02 5.000000E-02; PROBE ON SLICE Z SLICE OUTLINE ON * View and up directions VIEW 0.000000E+00 0.000000E+00 1.000000E+00 UP 0.000000E+00 1.000000E+00 0.000000E+00 * View centre VIEW CENTRE 4.000000E-01 1.000000E-01 5.000000E-02 * View size VIEW SIZE 4.600000E-01 * View perspective VIEW DEPTH 3.000000E+00;VIEW TILT 0.8 DOMAIN ON * Setting object visibility and painting status OBJECT SHOW TYPE INLET OBJECT PAINT TYPE INLET OFF OBJECT SHOW TYPE OUTLET OBJECT PAINT TYPE OUTLET OFF OBJECT SHOW TYPE PLATE OBJECT PAINT TYPE PLATE OFF VARIABLE Temperature; VARIABLE RANGE 1.999997E+01 4.167127E+01 VECTOR ON VECTOR INTERVAL 2 1 1 CONTOUR ON CONTOUR BLANK ON CONTOUR AVERAGE ON SURFACE OFF ENDUSE ************************************************************ IRUNN = 1 ;LIBREF = 0 ************************************************************ Group 1. Run Title TEXT(Heat exchange by external plates.) ************************************************************ Group 2. Transience STEADY = T ************************************************************ Groups 3, 4, 5 Grid Information * Overall number of cells, RSET(M,NX,NY,NZ,tolerance) RSET(M,20,10,1) ************************************************************ Group 6. Body-Fitted coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T * Non-default variable names NAME(148) =DEN1 ; NAME(150) =TEM1 * Solved variables list SOLVE(P1 ,U1 ,V1 ,TEM1) * Stored variables list STORE(DEN1) * Additional solver options SOLUTN(P1 ,Y,Y,Y,N,N,Y) SOLUTN(TEM1,Y,Y,Y,N,N,Y) ************************************************************ Group 8. Terms & Devices ************************************************************ Group 9. Properties PRESS0 = 1.000000E+05 ;TEMP0 = 2.730000E+02 * Domain material is: 0 Air at 20 deg C, 1 atm SETPRPS(1, 0) ENUT = 0.000000E+00 DVO1DT = 3.410000E-03 PRNDTL(TEM1) = 1.000000E+00 ************************************************************ 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 EGWF = T ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 100 RESFAC = 1.000000E-03 ************************************************************ Group 16. Terminate Iterations ************************************************************ Group 17. Relaxation RELAX(P1 ,LINRLX, 1.000000E+00) RELAX(TEM1,LINRLX, 1.000000E+00) ************************************************************ Group 18. Limits VARMAX(U1 ) = 1.000000E+06 ;VARMIN(U1 ) =-1.000000E+06 VARMAX(V1 ) = 1.000000E+06 ;VARMIN(V1 ) =-1.000000E+06 ************************************************************ Group 19. EARTH Calls To GROUND Station USEGRD = T ;USEGRX = T ASAP = T PARSOL = T SPEDAT(SET,FACETDAT,NUMOBJ,I,5) ************************************************************ Group 20. Preliminary Printout ECHO = T DISTIL = T ;NULLPR = F NDST = 0 DSTTOL = 1.000000E-02 EX (P1 ) = 1.020000E-02 ;EX (U1 ) = 1.000000E+00 EX (V1 ) = 6.690000E-04 ;EX (DEN1) = 1.189000E+00 EX (TEM1) = 2.229000E+01 ************************************************************ Group 21. Print-out of Variables ************************************************************ Group 22. Monitor Print-Out IXMON = 10 ;IYMON = 5 ;IZMON = 1 NPRMON = 100000 NPRMNT = 1 TSTSWP = -1 ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 100000 ISWPRF = 1 ;ISWPRL = 100000 No PATCHes used for this Group ************************************************************ Group 24. Dumps For Restarts 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.000000E+00, 2.000000E-01, 1.000000E-01 > DOM, MONIT, 4.750000E-01, 9.000000E-02, 5.000000E-02 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > DOM, SNAPSIZE, 1.000000E-02 > OBJ, NAME, INLET > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 2.000000E-01, 1.000000E-01 > OBJ, GEOMETRY, cube3t > OBJ, ROTATION24, 1 > OBJ, TYPE, INLET > OBJ, PRESSURE, 0.000000E+00 > OBJ, VELOCITY, 1.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, TEMPERATURE, 2.000000E+01 > OBJ, NAME, OUTLET > OBJ, POSITION, 1.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 2.000000E-01, 1.000000E-01 > OBJ, GEOMETRY, cube12t > OBJ, ROTATION24, 1 > OBJ, TYPE, OUTLET > OBJ, PRESSURE, 0.000000E+00 > OBJ, TEMPERATURE, SAME > OBJ, COEFFICIENT, 1.000000E+03 > OBJ, NAME, SPLATE > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 1.000000E+00, 0.000000E+00, 1.000000E-01 > OBJ, GEOMETRY, cube13 > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE Echo InForm setting > OBJ, INFSRC_TEM1, 1000.*XG with VOLU > OBJ, NAME, NPLATE > OBJ, POSITION, 0.000000E+00, 2.000000E-01, 0.000000E+00 > OBJ, SIZE, 1.000000E+00, 0.000000E+00, 1.000000E-01 > OBJ, GEOMETRY, cube13 > OBJ, ROTATION24, 1 > OBJ, TYPE, PLATE Echo InForm setting > OBJ, INFSRC_TEM1, 100.*(1-XG) with WHOL #maxabs STOP