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 one side internal plates.
The problem considered is the 2d convective heat exchange of air
between non-uniformly heated up horizontal plates.
The heat flux is increased with a channel length on a lower plate
and is decreased on a upper plate.
The set heat sources depend on a length of a channel. Therefore
the In-Form facilities are used.
The lower and upper plates 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 lower plate is
> OBJ, INFSRC_TEM1, 1000.*XG with VOLU
The In-Form setting for whole heat flux at upper 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 = 154
************************************************************
Group 1. Run Title
TEXT(Heat exchange by one side internal 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,NPOR)
* 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.011000E-02 ;EX (U1 ) = 1.000000E+00
EX (V1 ) = 2.613000E-04 ;EX (DEN1) = 1.189000E+00
EX (TEM1) = 2.226000E+01 ;EX (NPOR) = 8.000000E-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, 8.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, LPLATE
> OBJ, POSITION, 0.000000E+00, 5.000000E-02, 0.000000E+00
> OBJ, SIZE, 1.000000E+00, 0.000000E+00, 1.000000E-01
> OBJ, GEOMETRY, cube13
> OBJ, ROTATION24, 1
> OBJ, TYPE, PLATE
> OBJ, POROSITY, 0.000000E+00
> OBJ, SIDE, HIGH
Echo InForm setting
> OBJ, INFSRC_TEM1, 1000.*XG with VOLU
> OBJ, NAME, UPLATE
> OBJ, POSITION, 0.000000E+00, 1.500000E-01, 0.000000E+00
> OBJ, SIZE, 1.000000E+00, 0.000000E+00, 1.000000E-01
> OBJ, GEOMETRY, cube13
> OBJ, ROTATION24, 1
> OBJ, TYPE, PLATE
> OBJ, POROSITY, 0.000000E+00
> OBJ, SIDE, LOW
Echo InForm setting
> OBJ, INFSRC_TEM1, 100.*(1-XG) with WHOL
#maxabs
STOP