TALK=F;RUN( 1, 1) ************************************************************ Q1 created by VDI menu, Version 2007, Date 16/01/07 CPVNAM=VDI;SPPNAM=Core ************************************************************ Echo DISPLAY / USE settings DISPLAY Model of turbine rotor; S662 ENDDIS PHOTON USE p;;;; set prop off cl msg PRPS field gr ou z 1 con prps z 1 fi;0.0001 pause cl msg x-displacement field gr ou z 1 con DISX z 1 fi;.0001 SET VEC COMP - - - SET VEC COMP DISX DISY - VECT IZ 1 SH DASH 0 pause cl msg y-displacement field gr ou z 1 con DISY z 1 fi;.0001 pause cl msg epsx field gr ou z 1 con epsx z 1 fi;.0001 pause cl msg epsy field gr ou z 1 con epsy z 1 fi;.0001 pause cl msg strx field gr ou z 1 con strx z 1 fi;.0001 pause cl msg stry field gr ou z 1 con stry z 1 fi;.0001 ENDUSE ************************************************************ IRUNN = 1 ;LIBREF = 662 ************************************************************ Group 1. Run Title TEXT(Model of turbine rotor; S662 ) ************************************************************ Group 2. Transience STEADY = T ************************************************************ Groups 3, 4, 5 Grid Information * Overall number of cells, RSET(M,NX,NY,NZ,tolerance) RSET(M,30,30,1,1.000000E-04) * Cylindrical-polar grid CARTES=F ************************************************************ Group 6. Body-Fitted coordinates ************************************************************ Group 7. Variables: STOREd,SOLVEd,NAMEd ONEPHS = T * Non-default variable names NAME(139) =EPSZ ; NAME(140) =EPSY NAME(141) =STRY ; NAME(142) =EPSX NAME(143) =STRX ; NAME(144) =DRH1 NAME(145) =DVO1 ; NAME(146) =ENUL NAME(147) =DEN1 ; NAME(148) =PRPS NAME(149) =DISY ; NAME(150) =DISX * Solved variables list SOLVE(DISY,DISX) * Stored variables list STORE(PRPS,DEN1,ENUL,DVO1,DRH1,STRX,EPSX,STRY) STORE(EPSY,EPSZ) ************************************************************ 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=2 * Name *Ind. Dens. Viscos. Spec.heat Conduct. Expans. Compr. *110 7800.0 0.3 473.0 43.0 1.0E-5 0.5E-11 * 190 2700.0 0.35 896.0 204.0 2.35E-5 1.47E-11 ************************************************************ Group 10.Inter-Phase Transfer Processes ************************************************************ Group 11.Initialise Var/Porosity Fields FIINIT(EPSZ) = 1.001000E-10 ;FIINIT(EPSY) = 1.001000E-10 FIINIT(STRY) = 1.001000E-10 ;FIINIT(EPSX) = 1.001000E-10 FIINIT(STRX) = 1.001000E-10 ;FIINIT(DRH1) = 1.001000E-10 FIINIT(DVO1) = 1.001000E-10 ;FIINIT(ENUL) = 1.001000E-10 FIINIT(DEN1) = 1.001000E-10 ;FIINIT(PRPS) = -1.000000E+00 FIINIT(DISY) = 1.001000E-10 ;FIINIT(DISX) = 1.001000E-10 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 (LOWX ,WWALL ,3,0,0,0,0,0,1,1) COVAL (LOWX ,DISX, FIXVAL , 0.000000E+00) PATCH (HIGHX ,EWALL ,4,0,0,0,0,0,1,1) COVAL (HIGHX ,DISX, FIXVAL , 0.000000E+00) EGWF = T ************************************************************ Echo InForm settings for Group 13 inform13begin REAL(OMEGA,OMEGA2) OMEGA = 100*6.28 OMEGA2= OMEGA**2 char(FV) FV=:OMEGA2:*RV*Den1 (SOURCE of DISY at ROTOR is COVAL(FIXFLU,:FV:) with VOLU) (SOURCE of DISY at BLADE is COVAL(FIXFLU,:FV:) with VOLU) inform13end ************************************************************ Group 14. Downstream Pressure For PARAB ************************************************************ Group 15. Terminate Sweeps LSWEEP = 300 RESFAC = 1.000000E-03 ************************************************************ Group 16. Terminate Iterations ************************************************************ Group 17. Relaxation ************************************************************ Group 18. Limits ************************************************************ Group 19. EARTH Calls To GROUND Station USEGRD = T ;USEGRX = T STRA = T ASAP = T PARSOL = T CONWIZ = T ISG21 = 300 ISG52 = 3 CSG10 ='Q1' SPEDAT(SET,BOUNDARY,ZCONST,R,1.00000E+20) ************************************************************ Group 20. Preliminary Printout ECHO = T ************************************************************ Group 21. Print-out of Variables OUTPUT(DRH1,N,N,N,N,N,N) OUTPUT(DVO1,N,N,N,N,N,N) OUTPUT(ENUL,N,N,N,N,N,N) ************************************************************ Group 22. Monitor Print-Out IXMON = 15 ;IYMON = 29 ;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,1.655629E-01,1.160386E-01,9.793488E-01) GVIEW(UP,-1.603658E-01,9.830043E-01,-8.936123E-02) > DOM, SIZE, 1.046670E+00, 3.000000E-01, 1.000000E+00 > DOM, MONIT, 5.058890E-01, 2.850000E-01, 5.000000E-01 > DOM, SCALE, 1.000000E+00, 1.000000E+00, 1.000000E+00 > DOM, SNAPSIZE, 1.000000E-02 > GRID, RSET_X_1, 9, 1.000000E+00 > GRID, RSET_X_2, 11, 1.000000E+00 > GRID, RSET_X_3, 10, 1.000000E+00 > GRID, RSET_Y_1, 15, 1.000000E+00 > GRID, RSET_Y_2, 5, 1.000000E+00 > GRID, RSET_Y_3, 10, 1.000000E+00 > GRID, RSET_Z_1, 1, 1.000000E+00 > OBJ, NAME, ROTOR > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 1.046667E+00, 2.000000E-01, 1.000000E+00 > OBJ, GEOMETRY, polcu8 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, MATERIAL, 110,NOTSET > OBJ, NAME, BLADE > OBJ, POSITION, 3.140000E-01, 1.500000E-01, 0.000000E+00 > OBJ, SIZE, 3.837779E-01, 1.500000E-01, 1.000000E+00 > OBJ, GEOMETRY, polcu8 > OBJ, ROTATION24, 1 > OBJ, TYPE, BLOCKAGE > OBJ, COLOR-MODE, USER > OBJ, COLOR-VAL, 19 > OBJ, MATERIAL, 190,NOTSET > OBJ, NAME, LOWX > OBJ, POSITION, 0.000000E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 2.000000E-01, 1.000000E+00 > OBJ, GEOMETRY, poldef > OBJ, ROTATION24, 1 > OBJ, TYPE, USER_DEFINED > OBJ, NAME, HIGHX > OBJ, POSITION, 1.046667E+00, 0.000000E+00, 0.000000E+00 > OBJ, SIZE, 0.000000E+00, 2.000000E-01, 1.000000E+00 > OBJ, GEOMETRY, poldef > OBJ, ROTATION24, 1 > OBJ, TYPE, USER_DEFINED ************************************************************ STOP