ANSYS重启动求解
浏览:10158 回答:4
本人采用分离迭代进行进行车桥耦合的求解,每一时刻需要提取结构该时刻的响应来计算下一时刻施加在结构上的力,因此循环的每一步都要重启动~在瞬态分析的设置中,我定义了一个子步,但运行程序后发现,随着循环次数的增加I,荷载步数始终为1,而子步数不断增加,直到I~求大神指点
finish
/clear
/input,model,txt
!导入模型
finish
!初始参数设置
/prep7
...
finish
!------------------------------------------------------------------------耦合循环开始
*DO,I,1,3
!瞬态动力学分析
/SOLU
ANTYPE,TRANS
TRNOPT,full
ALPHAD,ALFA
BETAD,BETA
TIMINT,ON
TIME,I*DELL
NSUBST,1
KBC,1
AUTOTS,OFF
FDELE,ALL,ALL
!删除上一步施加的力
F,nodes(N_S(1,I)+1),FZ,-F_Rl(1,I)
F,nodes(N_S(1,I)),FZ,-F_Rt(1,I)
OUTRES,ALL,ALL
LSWRITE,I
SOLVE
s!a!v!e
finish
/post26 !后处理
FILE,dy,rst
NUMVAR,200
!提取结构响应
!!------------------------
finish
!根据此时刻结构响应计算下一时刻施加在结构上的力
...
PPP=jieshu(1,I)
!判别循环是否结束
*IF,PPP,EQ,1,THEN
*exit
*ENDIF
parsave,all,parameter!保存参数
/filname,dy$/solu$resume$antype,,rest
parres,,parameter!重新载入参数
*ENDDO
s!a!v!e
图为循环至I=2时的情况,可以看到荷载步数为1,子步数为2,令我费解~
finish
/clear
/input,model,txt
!导入模型
finish
!初始参数设置
/prep7
...
finish
!------------------------------------------------------------------------耦合循环开始
*DO,I,1,3
!瞬态动力学分析
/SOLU
ANTYPE,TRANS
TRNOPT,full
ALPHAD,ALFA
BETAD,BETA
TIMINT,ON
TIME,I*DELL
NSUBST,1
KBC,1
AUTOTS,OFF
FDELE,ALL,ALL
!删除上一步施加的力
F,nodes(N_S(1,I)+1),FZ,-F_Rl(1,I)
F,nodes(N_S(1,I)),FZ,-F_Rt(1,I)
OUTRES,ALL,ALL
LSWRITE,I
SOLVE
s!a!v!e
finish
/post26 !后处理
FILE,dy,rst
NUMVAR,200
!提取结构响应
!!------------------------
finish
!根据此时刻结构响应计算下一时刻施加在结构上的力
...
PPP=jieshu(1,I)
!判别循环是否结束
*IF,PPP,EQ,1,THEN
*exit
*ENDIF
parsave,all,parameter!保存参数
/filname,dy$/solu$resume$antype,,rest
parres,,parameter!重新载入参数
*ENDDO
s!a!v!e

图为循环至I=2时的情况,可以看到荷载步数为1,子步数为2,令我费解~
楼主解决了吗,可以指点一下吗