曲率为零时隧道模型命令流.docx

1、曲率为零时隧道模型命令流!* ET,1,PLANE42KEYOPT,1,3,2 ET,2,COMBIN40 MPTEMP, MPTEMP,1,0 MPDATA,EX,1,36e6 MPDATA,PRXY,1,0.3 MPTEMP, MPTEMP,1,0 MPDATA,DENS,1,2200 TB,DP,1, TBMODIF,1,1,0.18e6 TBMODIF,1,2,35 TBMODIF,1,3,MPTEMP, MPTEMP,1,0 MPDATA,EX,2,13.33e9MPDATA,PRXY,2,0.2 MPTEMP, MPTEMP,1,0 MPDATA,DENS,2,2400 nummr

2、g,all numcmp,all FLST,2,3,4,ORDE,3 FITEM,2,1 FITEM,2,7 FITEM,2,-8 LCOMB,P51X, ,0 FLST,2,3,4,ORDE,2 FITEM,2,3 FITEM,2,-5 LCOMB,P51X, ,0 TYPE, 1 MAT, 1REAL, ESYS, 0 SECNUM, TSHAP,LINE !* !* AMAP,7,15,18,2,!* !* AMAP,4,15,7,2,!* TYPE, 1 MAT, 2REAL, ESYS, 0 SECNUM, TSHAP,LINE !* !* AMAP,8,18,2,3,19!* !*

3、 AMAP,1,2,7,6,3 !* TYPE, 1 MAT, 1REAL, ESYS, 0 SECNUM, TSHAP,LINE !* !* AMAP,9,19,3,16,20 !* !* AMAP,5,6,3,16,9 !* FLST,5,2,4,ORDE,2 FITEM,5,11FITEM,5,32 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,_Y !* LESIZE,_Y1, , ,4, , , , ,1 !* FLST,5,6,4,ORDE,6 FITEM,5,33FITEM,5,34 FITEM,5,36 FITEM,5,10 FITE

4、M,5,12 FITEM,5,14 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,_Y !* LESIZE,_Y1, , ,4, , , , ,1 !* FLST,5,2,4,ORDE,2 FITEM,5,22 FITEM,5,31 CM,_Y,LINE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,_Y !* LESIZE,_Y1, , ,4, , , , ,1 !* FLST,5,5,4,ORDE,5 FITEM,5,13 FITEM,5,15 FITEM,5,21 FITEM,5,30 FITEM,5,35 CM,_Y,L

5、INE LSEL, , , ,P51X CM,_Y1,LINE CMSEL,_Y !* LESIZE,_Y1, , ,12, , , , ,1 !* MSHAPE,0,2D MSHKEY,1!* FLST,5,6,5,ORDE,5 FITEM,5,2 FITEM,5,-3 FITEM,5,6 FITEM,5,10 FITEM,5,-12 CM,_Y,AREA ASEL, , , ,P51X CM,_Y1,AREA CHKMSH,AREA CMSEL,S,_Y !* AMESH,_Y1 !* CMDELE,_Y CMDELE,_Y1 CMDELE,_Y2 !* KWPAVE, 15 CSYS,4

6、 FLST,3,12,5,ORDE,2 FITEM,3,1 FITEM,3,-12 ARSYM,X,P51X, , ,10000,0,0 EPLOT nummrg,all numcmp,all !* R,1,1.288e6,3300e3, , , , , !* R,2,0.966e6,174526,0,0,0,0, !* FLST,2,24,5,ORDE,2 FITEM,2,1 FITEM,2,-24 ARSCALE,P51X, , ,0.01,0.01,0.01,10000000000,0,1 EPLOT FLST,4,17,1,ORDE,12 FITEM,4,253 FITEM,4,265

7、 FITEM,4,-268FITEM,4,313 FITEM,4,325 FITEM,4,-327FITEM,4,361 FITEM,4,373 FITEM,4,-375FITEM,4,429 FITEM,4,441 FITEM,4,-443NGEN,2,20000,P51X, , ,-0.5, , ,1, FLST,4,17,1,ORDE,12 FITEM,4,253 FITEM,4,265 FITEM,4,-268FITEM,4,313 FITEM,4,325 FITEM,4,-327FITEM,4,361 FITEM,4,373 FITEM,4,-375FITEM,4,429 FITEM

8、,4,441 FITEM,4,-443NGEN,2,40000,P51X, , , ,-0.5, ,1, FLST,4,17,1,ORDE,12 FITEM,4,529 FITEM,4,541 FITEM,4,-544FITEM,4,661 FITEM,4,673 FITEM,4,-675FITEM,4,802 FITEM,4,814 FITEM,4,-816FITEM,4,866 FITEM,4,878 FITEM,4,-880NGEN,2,20000,P51X, , ,0.5, , ,1,FLST,4,17,1,ORDE,12 FITEM,4,529 FITEM,4,541 FITEM,4

9、,-544FITEM,4,661 FITEM,4,673 FITEM,4,-675FITEM,4,802 FITEM,4,814 FITEM,4,-816FITEM,4,866 FITEM,4,878 FITEM,4,-880NGEN,2,40000,P51X, , , ,-0.5, ,1, TYPE, 2 MAT, 1REAL, 1 ESYS, 0 SECNUM, TSHAP,LINE !* FLST,2,2,1 FITEM,2,429 FITEM,2,20429 E,P51X FLST,2,2,1 FITEM,2,441 FITEM,2,20441 E,P51X FLST,2,2,1 FI

10、TEM,2,442 FITEM,2,20442 E,P51X FLST,2,2,1 FITEM,2,443 FITEM,2,20443 E,P51X FLST,2,2,1 FITEM,2,361 FITEM,2,20361 E,P51X FLST,2,2,1 FITEM,2,20373 FITEM,2,373 E,P51X FLST,2,2,1 FITEM,2,374 FITEM,2,20374 E,P51X FLST,2,2,1 FITEM,2,375 FITEM,2,20375 E,P51X FLST,2,2,1 FITEM,2,313 FITEM,2,20313 E,P51X FLST,

11、2,2,1 FITEM,2,325 FITEM,2,20325 E,P51X FLST,2,2,1 FITEM,2,326 FITEM,2,20326 E,P51X FLST,2,2,1 FITEM,2,327 FITEM,2,20327 E,P51X FLST,2,2,1 FITEM,2,20253 FITEM,2,253 E,P51X FLST,2,2,1 FITEM,2,20266 FITEM,2,266 E,P51X FLST,2,2,1 FITEM,2,267 FITEM,2,20267 E,P51X FLST,2,2,1 FITEM,2,268 FITEM,2,20268 E,P5

12、1X FLST,2,2,1 FITEM,2,265 FITEM,2,20265 E,P51X FLST,2,2,1 FITEM,2,866 FITEM,2,20866 E,P51X FLST,2,2,1 FITEM,2,878 FITEM,2,20878 E,P51X FLST,2,2,1 FITEM,2,20879 FITEM,2,879 E,P51X FLST,2,2,1 FITEM,2,880 FITEM,2,20880 E,P51X FLST,2,2,1 FITEM,2,802 FITEM,2,20802 E,P51X FLST,2,2,1 FITEM,2,814 FITEM,2,20

13、814 E,P51X FLST,2,2,1 FITEM,2,815 FITEM,2,20815 E,P51X FLST,2,2,1 FITEM,2,816 FITEM,2,20816 E,P51X FLST,2,2,1 FITEM,2,661 FITEM,2,20661 E,P51X FLST,2,2,1 FITEM,2,673 FITEM,2,20673 E,P51X FLST,2,2,1 FITEM,2,20674 FITEM,2,674 E,P51X FLST,2,2,1 FITEM,2,675 FITEM,2,20675 E,P51X FLST,2,2,1 FITEM,2,529 FI

14、TEM,2,20529 E,P51X FLST,2,2,1 FITEM,2,542 FITEM,2,20542 E,P51X FLST,2,2,1 FITEM,2,543 FITEM,2,20543 E,P51X FLST,2,2,1 FITEM,2,544 FITEM,2,20544 E,P51X FLST,2,2,1 FITEM,2,20541 FITEM,2,541 E,P51X TYPE, 2 MAT, 1REAL, 2 ESYS, 0 SECNUM, TSHAP,LINE !* FLST,2,2,1 FITEM,2,429 FITEM,2,40429 E,P51X FLST,2,2,

15、1 FITEM,2,441 FITEM,2,40441 E,P51X FLST,2,2,1 FITEM,2,442 FITEM,2,40442 E,P51X FLST,2,2,1 FITEM,2,443 FITEM,2,40443 E,P51X FLST,2,2,1 FITEM,2,361 FITEM,2,40361 E,P51X FLST,2,2,1 FITEM,2,373 FITEM,2,40373 E,P51X FLST,2,2,1 FITEM,2,374 FITEM,2,40374 E,P51X FLST,2,2,1 FITEM,2,375 FITEM,2,40375 E,P51X F

16、LST,2,2,1 FITEM,2,313 FITEM,2,40313 E,P51X FLST,2,2,1 FITEM,2,325 FITEM,2,40325 E,P51X FLST,2,2,1 FITEM,2,326 FITEM,2,40326 E,P51X FLST,2,2,1 FITEM,2,327 FITEM,2,40327 E,P51X FLST,2,2,1 FITEM,2,253 FITEM,2,40253 E,P51X FLST,2,2,1 FITEM,2,266 FITEM,2,40266 E,P51X FLST,2,2,1 FITEM,2,267 FITEM,2,40267

17、E,P51X FLST,2,2,1 FITEM,2,268 FITEM,2,40268 E,P51X FLST,2,2,1 FITEM,2,265 FITEM,2,40265 E,P51X FLST,2,2,1 FITEM,2,866 FITEM,2,40866 E,P51X FLST,2,2,1 FITEM,2,878 FITEM,2,40878 E,P51X FLST,2,2,1 FITEM,2,879 FITEM,2,40879 E,P51X FLST,2,2,1 FITEM,2,880 FITEM,2,40880 E,P51X FLST,2,2,1 FITEM,2,802 FITEM,

18、2,40802 E,P51X FLST,2,2,1 FITEM,2,814 FITEM,2,40814 E,P51X FLST,2,2,1 FITEM,2,815 FITEM,2,40815 E,P51X FLST,2,2,1 FITEM,2,816 FITEM,2,40816 E,P51X FLST,2,2,1 FITEM,2,661 FITEM,2,40661 E,P51X FLST,2,2,1 FITEM,2,673 FITEM,2,40673 E,P51X FLST,2,2,1 FITEM,2,674 FITEM,2,40674 E,P51X FLST,2,2,1 FITEM,2,67

19、5 FITEM,2,40675 E,P51X FLST,2,2,1 FITEM,2,529 FITEM,2,40529 E,P51X FLST,2,2,1 FITEM,2,542 FITEM,2,40542 E,P51X FLST,2,2,1 FITEM,2,543 FITEM,2,40543 E,P51X FLST,2,2,1 FITEM,2,544 FITEM,2,40544 E,P51X FLST,2,2,1 FITEM,2,541 FITEM,2,40541 E,P51X FINISH /SOLFLST,2,34,1,ORDE,24 FITEM,2,20253 FITEM,2,2026

20、5 FITEM,2,-20268 FITEM,2,20313 FITEM,2,20325 FITEM,2,-20327 FITEM,2,20361 FITEM,2,20373 FITEM,2,-20375 FITEM,2,20429 FITEM,2,20441 FITEM,2,-20443 FITEM,2,20529 FITEM,2,20541 FITEM,2,-20544 FITEM,2,20661 FITEM,2,20673 FITEM,2,-20675 FITEM,2,20802 FITEM,2,20814 FITEM,2,-20816 FITEM,2,20866 FITEM,2,208

21、78 FITEM,2,-20880 !* /GO D,P51X, , , , , ,ALL, , , , , FLST,2,34,1,ORDE,24 FITEM,2,40253 FITEM,2,40265 FITEM,2,-40268 FITEM,2,40313 FITEM,2,40325 FITEM,2,-40327 FITEM,2,40361 FITEM,2,40373 FITEM,2,-40375 FITEM,2,40429 FITEM,2,40441 FITEM,2,-40443 FITEM,2,40529 FITEM,2,40541 FITEM,2,-40544 FITEM,2,40

22、661 FITEM,2,40673 FITEM,2,-40675 FITEM,2,40802 FITEM,2,40814 FITEM,2,-40816 FITEM,2,40866 FITEM,2,40878 FITEM,2,-40880 !* /GO D,P51X, , , , , ,ALL, , , , , D,P51X, , , , , ,ALL, , , , , FLST,2,31,1,ORDE,10 FITEM,2,233 FITEM,2,237 FITEM,2,-240FITEM,2,269 FITEM,2,-279FITEM,2,513 FITEM,2,517 FITEM,2,-5

23、19FITEM,2,545 FITEM,2,-555!* /GO D,P51X, , , , , ,ALL, , , , , FLST,5,4,5,ORDE,4 FITEM,5,3 FITEM,5,8 FITEM,5,15 FITEM,5,20 ASEL,S, , ,P51X ESLA,S ekill,all esel,ALLesel,s,live !选择活单元，即所有围岩实体单元nsle,s !选择生单元上的节点nsel,invert !反向选择，即选择了死单元上的节点d,all,all !将死单元上的节点allse antype,modalmodopt,subsp,2allselSOLVE

24、FINISH /POST1 set,listFINISH/solu!ACEL, , 9.81, 0, !在Y方向施加重力加速度ANTYPE,TRANSTRNOPT,FULLNROPT, FULL, !采用全牛顿拉普森法进行求解!NROPT,INITAUTOTS,onNLGEOM,on!确定阻尼系数ALPHAD, 0.126349436BETAD, 0.019358854*DIM,accel,TABLE,1000,1*TREAD,accel,elcetr,txt !地震波据说是El-centro波；这个文件很奇怪，把前面那TM_START=0.001 !列删了以后就不行。TM_END=8TM_INCR=0.02Allsel !选择所有内容*DO,TM,TM_START,TM_END,TM_INCRdeltim,0.02,0.001,0.02TIME,TM+0.02OUTRES,BASIC,LAST!OUTRES,ALL,allkbc,0!ACEL, accel(tm), 9.81, 0, !在Y方向施加重力加速度ACEL,accel(tm)*2/3, Allsel !选择所有内容Solve !求解计算*ENDDOFinish