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 Pressurised long rectangle pipe in cartesian system ENDDIS PHOTON USE p;;;; set prop off cl msg PRPS fields gr ou z 1 cont PRPS z 1 fil;.0001 pause cl msg x-displacement fields gr ou z 1 cont DISX z 1 fil;.0001 SET VEC COMP - - - SET VEC COMP DISX DISY - VECT IZ 1 SH DASH 0 pause cl msg y-displacement fields gr ou z 1 cont DISY z 1 fil;.0001 vec z 1 co 1 pause ENDUSE ************************************************************ IRUNN = 1 ;LIBREF = 699 ************************************************************ Group 1. Run Title TEXT(Cartesian Pressurised long cylinder;S699) ************************************************************ Group 2. Transience STEADY = T ************************************************************ Groups 3, 4, 5 Grid Information * Overall number of cells, RSET(M,NX,NY,NZ,tolerance) RSET(M,15,15,1,1.000000E-05) ************************************************************ Group 6. Body-Fitted coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T * Non-default variable names NAME(140) =V1TH ; NAME(141) =DISR NAME(142) =EPSZ ; NAME(143) =EPSX NAME(144) =EPSY ; NAME(145) =STRZ NAME(146) =STRY ; NAME(147) =STRX NAME(148) =PRPS ; NAME(149) =DISX NAME(150) =DISY * Solved variables list SOLVE(DISX,DISY) SOLUTN(P1 ,Y,N,N,N,N,N) SOLUTN(U1 ,Y,N,N,N,N,N) SOLUTN(V1 ,Y,N,N,N,N,N) * Stored variables list STORE(PRPS,STRX,STRY,STRZ,EPSY,EPSX,EPSZ,DISR) STORE(P1) ************************************************************ Echo InForm settings for Group 7 inform7begin REAL(PI,PO) PI=1.e7 ! inner pressure PO=1.e6 ! outer pressure inform7end ************************************************************ Group 8. Terms & Devices ************************************************************ Group 9. Properties RHO1 = 1.000000E+00 ENUL = 1.000000E-05 CP1 = 1.000000E+00 ENUT = 0.000000E+00 DVO1DT = 3.410000E-03 * List of user-defined materials to be read by EARTH MATFLG=T;IMAT=1 * Name *Ind. Dens. Viscos. Spec.heat Conduct. Expans. Compr. *160 7800.0 0.3 473.0 43.0 1.0E-5 0.5E-11 ************************************************************ 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(STRZ) = 1.001000E-10 FIINIT(STRY) = 1.001000E-10 ;FIINIT(STRX) = 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 ************************************************************ Echo InForm settings for Group 11 INFORM11BEGIN (initial of P1 is :PO:) (INITIAL of P1 at BODY is 0.0) (INITIAL of P1 at INNER is :PI:) INFORM11END ************************************************************ Group 12. Convection and diffusion adjustments No PATCHes used for this Group ************************************************************ Group 13. Boundary & Special Sources PATCH (LEFT ,WWALL ,1,0,0,0,0,0,1,1) COVAL (LEFT ,DISX, 1.000000E+00, 0.000000E+00) PATCH (BOTTOM ,SWALL ,2,0,0,0,0,0,1,1) COVAL (BOTTOM ,DISY, 1.000000E+00, 0.000000E+00) EGWF = T ************************************************************ Echo InForm settings for Group 13 inform13begin inform13end ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 400 RESFAC = 1.000000E-07 ************************************************************ Group 16. Terminate Iterations ************************************************************ Group 17. Relaxation RELAX(DISX,LINRLX, 1.000000E+00) RELAX(DISY,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 STRA = T ASAP = T PARSOL = F ISG21 = 400 ISG50 = 1 ISG52 = 3 CSG10 ='Q1' SPEDAT(SET,BOUNDARY,ZCONST,R,1.00000E+20) ************************************************************ Echo InForm settings for Group 19 inform19begin inform19end ************************************************************ Group 20. Preliminary Printout ECHO = T ************************************************************ Group 21. Print-out of Variables ************************************************************ Group 22. Monitor Print-Out IXMON = 29 ;IYMON = 29 ;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,-7.627644E-02,-1.266963E-01,9.890046E-01) GVIEW(UP,-3.736368E-01,9.232514E-01,8.945644E-02) > DOM, SIZE, 1.000000E+00, 1.000000E+00, 2.000000E-01 > DOM, MONIT, 4.750000E-01, 4.750000E-01, 1.000000E-01 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > GRID, RSET_X_1, 3, 1.000000E+00 > GRID, RSET_X_2, 9, 1.000000E+00 > GRID, RSET_X_3, 3, 1.000000E+00 > GRID, RSET_Y_1, 3, 1.000000E+00 > GRID, RSET_Y_2, 9, 1.000000E+00 > GRID, RSET_Y_3, 3, 1.000000E+00 > GRID, RSET_Z_1, 1, 1.000000E+00 > OBJ, NAME, LEFT > OBJ, POSITION, 0.000000E+00, 2.000000E-01, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 6.000000E-01, 2.000000E-01 > OBJ, GEOMETRY, default > OBJ, ROTATION24, 1 > OBJ, TYPE, USER_DEFINED > OBJ, NAME, BOTTOM > OBJ, POSITION, 2.000000E-01, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 6.000000E-01, 0.000000E+00, 2.000000E-01 > OBJ, GEOMETRY, default > OBJ, ROTATION24, 1 > OBJ, TYPE, USER_DEFINED > OBJ, NAME, BODY > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 8.000000E-01, 8.000000E-01, 2.000000E-01 > OBJ, GEOMETRY, cube14 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, COLOR-MODE, DEFAULT2 > OBJ, OPAQUE, 50 > OBJ, MATERIAL, 160,NOTSET > OBJ, NAME, INNER > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 2.000000E-01, 2.000000E-01, 2.000000E-01 > OBJ, GEOMETRY, cubet > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, COLOR-MODE, USER > OBJ, COLOR-VAL, 15 > OBJ, OPAQUE, 100 > OBJ, MATERIAL, 0, Air at 20 deg C, 1 atm, treated as i ************************************************************ STOP