文档库 最新最全的文档下载
当前位置:文档库 › ANSYS建模ADPL(梁单元)

ANSYS建模ADPL(梁单元)

FINISH
/CLEAR
/PREP7 !前处理
!桩参数
ET,1,BEAM3 !定义单元类型
!桩材料参数
MP,EX,1,3e10
MP,PRXY,1,0.3
MP,DENS,1,2500

ET,2,PLANE183 !定义单元类型
KEYOPT,1,3,2 !设置单元特征为平面应变
!基岩材料参数
MP,EX,2,20E9
MP,PRXY,2,0.22
MP,DENS,2,2600
!滑带土材料参数
MP,EX,3,3E9
MP,PRXY,3,0.35
MP,DENS,3,2140

!设置截面
SECTYPE,1,BEAM,RECT,,0
SECOFFSET,CENT
SECDATA,2000,2000,0,0,0,0,0,0,0,0,0,0
SECTYPE,2,BEAM,RECT,,0
SECOFFSET,CENT
SECDATA,1500,2000,0,0,0,0,0,0,0,0,0,0


K,1,0,0,0 !创建关键点
K,2,0,60,0
K,3,0,90,0
K,4,80,130,0
K,5,80,100,0
K,6,80,94,0
K,7,90,136,0
K,8,90,135,0
K,9,90,130,0
K,10,90,105,0
K,11,90,94,0
K,12,200,190,0
K,13,200,160,0
K,14,200,0,0
LSTR,1,2 !创建直线
LSTR,2,3
LSTR,3,4
LSTR,4,12
LSTR,2,13
LSTR,1,14
LSTR,12,13
LSTR,13,14
A,2,3,4,12,13,10,5
A,1,2,13,14

!定义参数并生成梁单元
TYPE,1
MAT,1
ESYS,0
SECNUM,1
TSHAPE,LINE
E,4,5
E,5,6
E,7,8
E,8,9
E,9,10
E,10,11

TYPE,1
MAT,1
ESYS,0
SECNUM,2
TSHAPE,LINE
E,4,9

!划分网格
AATT,1,,1
MSHAPE,1,2D
MSHKEY,0
ESIZE,10,0,
AMESH,1,1,1
ESIZE,,,
ALLSEL,ALL
AMESH,2,2,1

SAVE

/SOLU
NSUBST,20 !设置荷载子步数
NLGEOM,ON !打开大变形
NROPT,FULL !NR法设置
PRED,ON !打开非线性监测
LNSRCH,ON !打开线性分析
OUTRES,ALL,LAST !输出项设置

!施加约束条件
NSEL,S,LOC,X,0 !约束左右边界
D,ALL,UX
NSEL,S,LOC,X,200
D,ALL,UX
NSEL,S,LOC,Y,0 !约束底边
D,ALL,ALL
ACEL,0,9800,0 !沿着-Y方向的重力加速度为9.8M/s2
ALLSEL,ALL
SAVE
FINISH

/SOLU
SOLVE
SAVE
FINISH





相关文档