| 
fini
x
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。您需要 登录 才可以下载或查看,没有账号?我要加入 
  /clear
 /filename,simple-supported beam
 /title,simple-supported beam
 /prep7
 et,1,beam3
 r,1,0.08,0.107,0.2
 mp,ex,1,3e10
 mp,nuxy,1,0.2
 mp,dens,1,2500
 n,1,0,0,0
 n,21,20,0,0
 fill,1,21,19
 type,1
 mat,1
 real,1
 *do,i,1,20
 e,i,i+1
 *enddo
 fini
 /sol
 antype,modal
 modopt,lanb,6
 mxpand,6
 d,1,ux
 d,1,uy
 d,21,uy
 solve
 /post1
 set,list
 /eshape,1
 set,first
 pldisp,0
 prnsol,u,y
 set,next
 pldisp,0
 prnsol,u,y
 set,next
 pldisp,0
 prnsol,u,y
 set,next
 pldisp,0
 prnsol,u,y
 set,next
 pldisp,0
 prnsol,u,y
 set,next
 pldisp,0
 prnsol,u,y
 
 振型不对,自振频率与数值解相差也很大,麻烦高手指点。
 |