马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
/prep7
*set,b,20
*set,h,20
et,1,beam3
r,1,b*h,b*(h**3)/12,h
MP,EX,1,200e3
MP,PRXY,1,0.3
k,1,0,0,0
k,2,1000,0,0
l,1,2
HPTCREATE,LINE,1,0,RATI,0.75,
ESIZE,100
LMESH,all
finish
/SOLU
antype,0
DK,1,UX,0
DK,1,UY,0
DK,2,UY,0
FK,3,FY,-2000
SOLVE
finish
/post1
etable,evolume,volu,
ssum
*get,volume,ssum,,item,evolume
etable,smaxi,nmisc,1
esort,etab,smaxi,0,1,,
*get,smaxii,sort,,max
etable,smaxj,nmisc,3
esort,etab,smaxj,0,1,,
*get,smaxjj,sort,,max
*set,smax,smaxii>smaxjj
lgwrite,analysis,txt
/opt
opanl,analysis,txt
opvar,b,dv,10,50,1e-3
opvar,h,dv,10,50,1e-3
opvar,smax,sv,195,200,1e-3
opvar,volume,obj,,,200
optype,firs
opfrst,30,100,0.2
opexe
plvaropt,h,b
[ 本帖最后由 zhouxman 于 2009-3-17 21:07 编辑 ] |