马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？我要加入
x
弹簧下挂个质点，质点受200sin(15t)的力，为什么质子位移是0
/PREP7
/TITLE,HARMONIC RESPONSE OF A SPRING-MASS SYSTEM
ANTYPE,MODAL
MODOPT,REDUC,2,,,2
ET,1,COMBIN40,,,2
R,1,16,,2
N,1
N,2,0,10
REAL,1
E,1,2
M,1,UY
OUTPR,,ALL
D,2,ALL
FINISH
/SOLU
SOLVE
FINISH
/solu
antype,4
trnopt,full
time,0
autots,0
deltim,0.2,,,1
kbc,0
outpr,basic,all
*do,i,1,60,1
time,0.2*i
autots,0
deltim,0.2,,,1
kbc,0
fn=200*sin(i*15*0.2)
fk,1,fy,fn
solve
*enddo
finish
/post26
file,'file','rst','.'
nsol,2,1,u,y, uy_2
xvar,1
plvar,2,
[ 本帖最后由 rodge 于 2007-10-31 00:58 编辑 ] |
发表于 2007-10-30 15:21
提升卡
变色卡
显身卡