马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
[watermark]大家好,我现在做板方面的研究,目前自己想用anysy模拟一下板的非线性屈曲,发现出来的时间-位移曲线是一直线,请各位高手出手相助,我的联系方式:dustofwind@163.com
下面是我的命令流:
!-----------薄板屈曲及非线性屈曲
!----------单位:SI
/PREP7
ET,1,SHELL181
keyopt,1,8,2
r,1,0.005
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,210e9
MPDATA,PRXY,1,,0.3
RECTNG,,1,,1,
/AUTO,1
/REP,FAST
esize,0.05
amesh,all
FINISH
/SOL
nsel,s,loc,x
d,all,ux,,,,,uz
nsel,s,loc,x,1
d,all,uz
nsel,s,loc,y
d,all,uy,,,,,uz
nsel,s,loc,y,1
d,all,uz
nsel,s,loc,x
*get,n,node,,count
f,all,fx,1/n
nsel,s,loc,x,1
f,all,fx,-1/n
allsel
antype,static
pstres,on
solve
fini
/solu
antype,buckle
bucopt,lanb,1
mxpand,1
solve
fini
/post1
set,list
set,first
pldisp,1
*get,fcr,mode,1,freq
/prep7
upgeom,0.1,,,file,rst
fini
!非线性求解
/solu
antype,static
nlgeom,on
outres,all,1
nsel,s,loc,x
f,all,fx,1.2*fcr/n
nsel,s,loc,x,1
f,all,fx,-1.2*fcr/n
allsel
nsubst,100
arclen,4,0.001
neqit,12
allsel
solve
fini
/post26
nsol,2,261,u,z
prod,3,2,,,,,,-1000 !换算成mm
prod,4,1,,,,,,1.2*fcr/1000 !换算成KN
/axlab,x,displace(mm)
/axlab,y,load(KN)
xvar,3
plvar,4
[/watermark] |