马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
假如一个基座下悬挂一个弹簧振子,基座运动的话弹簧振子应该会振动,但是分析出来发现弹簧没有变形,命令流如下,求助各位大神
FINISH
/CLEAR
/PREP7
ET,1,BEAM188
et,10,combin14
ET,100,MASS21,,,0
KEYOPT,100,3,4
KEYOPT,10,2,0
KEYOPT,10,3,0
MPTEMP,1,0
MPDATA,EX,1,,2.06e11
MPDATA,PRXY,1,,0.3
MPDATA,DENS,1,,7846
SECTYPE,111,beam,I
SECDATA,0.1,0.1,0.2,0.0114,0.0114,0.007
SECOFFSET,origin
!!!建立节点
N,1,0,0,0
n,101,1,0,0
n,201,2,0,0
fill,1,101,99,2,1
fill,101,201,99,102,1
!!!建立单元
mat,1
type,1
secnum,111
e,1,2
egen,200,1,-1
ALLS
!!!建立弹簧单元
ngen,2,200,101,,,,,-0.16
r,10,1
type,10
real,10
e,301,101
r,100,18.36
MAT,1
TYPE,100
REAL,100
e,301
nsel,s,,,1
nsel,a,,,201
CM,NN,NODE
D,NN,ALL
ALLS
ACEL,,,9.8
ALLS
C****求解
!瞬态分析
/SOLU
ANTYPE,TRANS
TRNOPT,FULL
NLGEOM,ON
SOLCONTROL,ON
PRED,ON
KBC,1
T0=0.1E-3
tx=0.02/12
*DO,I,T0,1,tx
TIME,I
f=25
FZZ1=6000*SIN(2*3.14*f*I)
F,101,FZ,FZZ1
ALLS
SOLVE
*ENDDO
FINISH
请各位大神看一下有什么问题
|