错误提示见图所示,在第四个加载步出现了不收敛状况,将荷载步数变大些还是不收敛,遇到这种情况应该如何办呢?下面是这个例子的源程序。
!KINH滞回
FINISH
/CLEAR
/PREP7
ANTYPE,STATIC
ET,1,SOLID65
R,1
MP,EX,1,30E3
MP,NUXY,1,0.2
TB,CONCR,1,1
TBTEMP,0
TBDATA,1,0.3,0.5,2.5,-1
TB,KINH,1,1,10
TBPT,,150E-6,4.5
TBPT,,600E-6,14.8
TBPT,,1000E-6,20.25
TBPT,,1300E-6,22.3
TBPT,,1480E-6,22.8
TBPT,,1620E-6,22.8
TBPT,,1800E-6,22.3
TBPT,,2000E-6,21.4
TBPT,,3500E-6,12.8
TBPT,,5000E-6, 9.0
BLOCK,0,50,0,50,0,50
ESIZE,10
VMESH,ALL
MSHAPE,0,3D
NSEL,S,LOC,X,0
D,ALL,UX,0
NSEL,S,LOC,Y,0
D,ALL,UY,0
NSEL,S,LOC,Z,0
D,ALL,UZ,0
NSEL,S,LOC,Y,50
CP,1,UY,ALL
NSEL,ALL
FINISH
/VIEW,1,1,1,1
/REPLOT
/SOLU
OUTRES,ALL,ALL
TIME,20
NSUBST,20,0,20
D,1,UY,-.04
LSWRITE,1
TIME,35
NSUBST,15,0,15
D,1,UY,-.01
LSWRITE,2
TIME,90
NSUBST,55,0,55
D,1,UY,-.12
LSWRITE,3
TIME,125
NSUBST,35,0,35
D,1,UY,-.05
LSWRITE,4
TIME,175
NSUBST,50,0,50
D,1,UY,-.15
LSWRITE,5
LSSOLVE,1,5
FINISH
/POST26
NSOL,2,1,U,Y,UY
RFORCE,3,1,F,Y,FY
ADD,4,2,,,STRAIN,,,-1/50
ADD,5,3,,,STRESS,,,-1/2500
/AXLAB,X,STRAIN
/AXLAB,Y,STRESS
XVAR,4
PLVAR,5
FINISH
请指教!谢谢!
|