!EX4.17 線性/非線性靜力分析的單點重啟動分析
finish
/clear
/filname,rtest1
l0=1000
b0=10
h0=20
/prep7
k,1
k,2,l0
l,1,2
et,1,beam3
mp,ex,1,2.0e5
mp,prxy,1,0.3
r,1,b0*h0,b0*h0*h0*h0/12,h0
lesize,all,,,10
lmesh,all
d,1,all
/solu
antype,0
!nlgeom,on
outres,all,all
autots,off
nsubst,10
f,2,fy,2000
solve
save
finish
/clear
/filname,rtest1
/solu
resume
antype,,rest
f,7,fy,4440
nsubst,20
solve
finish
/post26
nsol,2,2,u,y
rforce,3,1,f,y
prod,4,3,,,,,,-1
xvar,2
plvar,4
prvar,2,4