马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?我要加入
x
自编了一段程序,目的是想循环添加质量单元,然后计算其模态频率,
/PREP7
ET,2,MASS21
R,2,10,10,10, , , ,
FINISN
NELEM=10
LBEAM=1
J=10
deltL=LBEAM/NELEM
V=10
NNODE=NELEM+1
deltt=deltL/V
/solu
ANTYPE,2
MSAVE,0
MODOPT,LANB,5
EQSLV,SPAR
MXPAND,5, , ,1
LUMPM,0
PSTRES,0
MODOPT,LANB,5,1,9999999999, ,OFF
*do,ii,2,nnode+1,1
outres,all,all
time,ii*deltt
nsubst,5
*if,ii,lt,nnode+1,then
nsel,S,loc,X,(ii-1)*deltl
/PREP7
TYPE, 2
MAT,
REAL, 2
ESYS, 0
SECNUM,
TSHAP,LINE
E, ii
FINISH
allsel
solve
*endif
*enddo
SOLVE
finish
总是出现以下错误提示:
NSUBST is not a recognized BEGIN command, abbreviation, or macro.
This command will be ignored.
谁能帮我解决啊?含泪期待着高手
|