TALK=F;RUN( 1, 1) ************************************************************ Q1 created by VDI menu, Version 2007, Date 26/09/07 CPVNAM=VDI;SPPNAM=Core ************************************************************ Echo DISPLAY / USE settings DISPLAY VR-Beam and gravity force ENDDIS PHOTON USE p;;;; set prop off msg msg DISX contours msg cont DISX z 1 fil;.0001 SET VEC COMP - - - SET VEC COMP DISX DISY - VECT IZ 1 SH DASH 0 pause cl msg msg DISY contours msg cont DISY z 1 fil;.0001 pause cl msg msg EpsX contours msg cont EPSX z 1 fil;.0001 pause cl msg msg EpsY contours msg cont EPSY z 1 fil;.0001 pause ENDUSE ************************************************************ IRUNN = 1 ;LIBREF = 799 ************************************************************ Group 1. Run Title TEXT(2D VR-bar & gravity force; s799 ) ************************************************************ Group 2. Transience STEADY = T ************************************************************ Groups 3, 4, 5 Grid Information * Overall number of cells, RSET(M,NX,NY,NZ,tolerance) RSET(M,32,16,1) ************************************************************ Group 6. Body-Fitted coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T * Non-default variable names NAME(143) =EPSZ ; NAME(144) =EPSX NAME(145) =EPSY ; NAME(146) =VISL NAME(147) =DRH1 ; NAME(148) =PRPS NAME(149) =DISX ; NAME(150) =DISY * Solved variables list SOLVE(DISX,DISY) * Stored variables list STORE(PRPS,DRH1,VISL,EPSY,EPSX,EPSZ) ************************************************************ Echo InForm settings for Group 7 inform7begin inform7end ************************************************************ Group 8. Terms & Devices ************************************************************ Group 9. Properties * Domain material index is 160 signifying: * NOTSET SETPRPS(1,160,Q1) ENUT = 0.000000E+00 DRH1DP = 5.000000E-12 DVO1DT = 1.000000E-05 * List of user-defined materials to be read by EARTH MATFLG=T;IMAT=2 * Name *Ind. Dens. Viscos. Spec.heat Conduct. Expans. Compr. *160 7800.0 0.3 473.0 43.0 1.0E-5 0.5E-11 * 161 17800.0 0.3 473.0 43.0 1.0E-5 0.5E-9 ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initialise Var/Porosity Fields FIINIT(EPSZ) = 1.001000E-10 ;FIINIT(EPSX) = 1.001000E-10 FIINIT(EPSY) = 1.001000E-10 ;FIINIT(VISL) = 1.001000E-10 FIINIT(DRH1) = 1.001000E-10 ;FIINIT(PRPS) = 0.000000E+00 FIINIT(DISX) = 0.000000E+00 ;FIINIT(DISY) = 0.000000E+00 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 PATCH (FIXEND ,WWALL ,1,0,0,0,0,0,1,1) COVAL (FIXEND ,DISX, 1.000000E+00, 0.000000E+00) COVAL (FIXEND ,DISY, 1.000000E+00, 0.000000E+00) EGWF = T ************************************************************ Echo InForm settings for Group 13 inform13begin (source of DISY at BODY is COVAL(FIXFLU,-9.8*Den1) with VOLU) (source of DISY at BODY2 is COVAL(FIXFLU,-9.8*Den1) with VOLU) inform13end ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 7000 RESFAC = 1.000000E-03 ************************************************************ Group 16. Terminate Iterations ************************************************************ Group 17. Relaxation RELAX(DISX,LINRLX, 1.000000E+00) RELAX(DISY,LINRLX, 1.000000E+00) ************************************************************ Group 18. Limits ************************************************************ Group 19. EARTH Calls To GROUND Station USEGRD = T ;USEGRX = T STRA = T ASAP = T PARSOL = F ISG21 = 300 ISG52 = 3 CSG10 ='q1' ************************************************************ Group 20. Preliminary Printout ECHO = T ************************************************************ Group 21. Print-out of Variables OUTPUT(VISL,N,N,N,N,N,N) OUTPUT(DRH1,N,N,N,N,N,N) OUTPUT(PRPS,Y,N,N,N,N,N) ************************************************************ Group 22. Monitor Print-Out IXMON = 27 ;IYMON = 8 ;IZMON = 1 NPRMON = 100000 NPRMNT = 1 TSTSWP = -1 ************************************************************ Group 23.Field Print-Out & Plot Control NPRINT = 100000 NXPRIN = 1 NYPRIN = 1 ISWPRF = 1 ;ISWPRL = 100000 No PATCHes used for this Group ************************************************************ Group 24. Dumps For Restarts GVIEW(P,-4.932082E-02,-7.048585E-03,9.987581E-01) GVIEW(UP,-1.039770E-01,9.945779E-01,1.884478E-03) > DOM, SIZE, 1.000000E+00, 2.000000E-01, 2.000000E-01 > DOM, MONIT, 7.500000E-01, 9.333333E-02, 1.000000E-01 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > GRID, RSET_X_1, 16, 1.000000E+00 > GRID, RSET_X_2, 12, 1.000000E+00 > GRID, RSET_X_3, 4, 1.000000E+00 > GRID, RSET_Y_1, 5, 1.000000E+00 > GRID, RSET_Y_2, 6, 1.000000E+00 > GRID, RSET_Y_3, 5, 1.000000E+00 > GRID, RSET_Z_1, 1, 1.000000E+00 > OBJ, NAME, FIXEND > OBJ, POSITION, 0.000000E+00, 6.000000E-02, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 8.000000E-02, 2.000000E-01 > OBJ, GEOMETRY, default > OBJ, ROTATION24, 1 > OBJ, TYPE, USER_DEFINED > OBJ, NAME, BODY > OBJ, POSITION, 0.000000E+00, 6.000001E-02, 0.000000E+00 > OBJ, SIZE, 5.000000E-01, 7.999998E-02, 2.000000E-01 > OBJ, GEOMETRY, cube14 > OBJ, ROTATION24, 1 > OBJ, VISIBLE, NO > OBJ, TYPE, BLOCKAGE > OBJ, COLOR-MODE, USER > OBJ, COLOR-VAL, 8 > OBJ, MATERIAL, 161,NOTSET > OBJ, NAME, BODY2 > OBJ, POSITION, 5.000000E-01, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 4.000000E-01, 2.000000E-01, 2.000000E-01 > OBJ, GEOMETRY, cyl1 > OBJ, ROTATION24, 1 > OBJ, VISIBLE, NO > OBJ, TYPE, BLOCKAGE > OBJ, COLOR-MODE, USER > OBJ, COLOR-VAL, 125 > OBJ, MATERIAL, 160,NOTSET ************************************************************ STOP