fini
/config,nres,20000
/solu
allsel
NT=1000
DT=0.005
timint,on !动力学选项,考虑惯性和阻尼的影响打开积分效果
!非线性选项
neqit,20 !指定每个子步最大平衡迭代次数
cnvtol,f,,0.01,2 !指定收敛公差
ncnv,1 !指定不收敛时的处理办法,此地为终止计算
nlgeom,on !打开大应变效应
*dim,ac,,NT
/input,tianjin,txt
outpr,basic,all
OUTRES,ALL,all
ANTYPE,TRANS
*do,i,1,NT
ACEL,ac(i),,,
TIME,i*DT
KBC,0
AUTOTS,0
lswrite,i
*enddo
lssolve,1,1000
save
fini
我看到的例题,地震波为天津波tianjin.txt文件 |