|
/prep7
!-------------------------------------------
ET,1,SHELL63 !壳单元
MP,EX,1,2.1e5 !C20混凝土
MP,NUXY,1,0.2
R,1,200, , , , , , !壁厚200
R,2,150, , , , , , !肋厚150
!-------------------------------------------
!建模
k,1,0,0,0
k,2,325,0,0
k,3,325,520.4250,0
k,4,4100,1390.4250,0
k,5,4100,5145.0,0
k,6,4100,5508.0,0
k,7,4100,5975.0,0
k,8,3675,5145,0
k,9,3675,5470,0
k,10,0,5975,0
l,1,2
l,2,3
l,3,4
l,4,5
l,5,6
l,6,7
l,5,8
l,8,9
AROTAT,1,2,3,4,5,6,1,10,360,4,
AROTAT,7,8, , , , ,1,10,360,4,
NUMMRG,ALL, , , ,LOW
NUMCMP,ALL
!-------------------------------------------
!划分网格
ASEL,S,,,1,24,1,,
AATT,1,1,1,0,
ASEL,S,,,25,32,1,,
AATT,1,2,1,0,
ALLSEL,ALL
AESIZE,ALL,400,
AMESH,ALL
!-------------------------------------------
!施加边界
LSEL,S,,,27,29,2,,
LSEL,A,,,33,35,2,,
LSEL,A,,,39,41,2,,
LSEL,A,,,45,47,2,,
DL,ALL,,ALL,
ALLSEL,ALL
DTRAN
!-------------------------------------------
!施加静水压力
ASEL,S,,,1,5,1,,
ASEL,A,,,7,11,1,,
ASEL,A,,,13,17,1,,
ASEL,A,,,19,23,1,,
NSEL,ALL
NSLA,S,1
SFGRAD,PRES,0,Y,5508.0,-1e-5
SF,ALL,PRES,0
ALLSEL,ALL
!-------------------------------------------
!求解
/solu
solve
!-------------------------------------------
!后处理
/post1
PLNSOL,U,SUM,0,
|