以下是命令流:
!静力分析
/com,structural
/clear
/filename,pipe
/title,static_analysis
/prep7
!定义单元类型以及实常数
et,1,pipe59
keyopt,1,1,1
keyopt,1,2,1
KEYOPT,1,3,0
KEYOPT,1,5,0
KEYOPT,1,6,0
KEYOPT,1,7,0
KEYOPT,1,9,0
!定义单元实常数
R,1,0.3556,0.0175,1.0,2.0,865,0,
RMORE,69.829,1.0,1.0,0,1e-6, ,
RMORE, ,
MPTEMP,,,,,,,,
MPTEMP,1,0
!输入弹性模量
MPDATA,EX,1,,2.07e11
!输入泊松比
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
!输入材料密度
MPDATA,DENS,1,,7850
/AUTO,1
/REP,FAST
/VIEW,1,,-1
/ANG,1
/REP,FAST
K,1,0,0,-1356,
K,2,800.8,0,0
L,1,2
LESIZE,ALL,,,1000
LMESH,ALL
d,1,all
d,2,all
acel,,,9.8,
/pbc,all,,1
/replot
finish
/solu
antype,static
nlgeom,on
sstif,on
solve
finish |