e8.09.txt

来自「王新敏的ANSYS工程结构数值分析命令流 王新敏的ANSYS工程结构数值分析命」· 文本 代码 · 共 40 行

!EX8.9 二力杆几何非线性分析示例
finish
/clear
/prep7
l0=100
cta=6
*afun,deg
l1=2*l0*cos(cta)
h1=l0*sin(cta)
aa=10
em=2e5
et,1,link1
mp,ex,1,em 
r,1,aa 
k,1
k,2,0.5*l1,h1
k,3,l1
l,1,2
l,2,3
lesize,all,,,1
lmesh,all
finish       
/solu
dk,1,all
dk,3,all
fk,2,fy,-1200
antype,0
nlgeom,1
nsubst,100
outres,all,all
arclen,on
!arctrm,u,25,2,uy 
solve 
/post26
/gformat,f,20,7
nsol,2,2,u,y
PROD,3,2,,,,,,-1
prod,4,1,,,,,,1200
xvar,3
plvar,4