! ANSYS在荷載步之間改變材料屬性例子
! Example of modify material between load steps in ANSYS
! 材料泊松比隨荷載增加而逐步增大
! 作者：陸新征 清華大學(xué)土木系
! Author: Lu Xinzheng Dept. Civil Engrg. of Tsinghua University

[Money=50]

FINISH
/CLEAR
/PREP7
FORCE=1. !初始荷載
FC=30. !極限荷載
NSTEP=30 !加載步數(shù)
EMU0=0.2 !初始泊松比為0.2
EMUU=0.499 !最終泊松比為0.499
SVM=0. !VON MISES應(yīng)力
!*
ET,1,SOLID45
!*
!*
MP,EX,1,30E3
MP,NUXY,1,EMU0
!建立模型
BLC4,0,0,100,100,100
ESIZE,100,0,
VMESH,ALL
/SOLU
!輸出RESTART文件
RESCONTRL,DEFINE,ALL,-1,1
NLGEOM,1
D,2,ALL
D,4,UY
D,5,UY
D,6,UY
D,5,UX

FINISH
SAVE
!分步加載
*DO,I,1,NSTEP
FINISH
/SOLU
!使用重啟動(dòng)功能
*IF,I,GT,1,THEN
ANTYPE,,REST,
PARRES, CHANGE , PARAM, TXT,
*ENDIF
! 如果荷載超過強(qiáng)度的50%，則線性提高泊松比
*IF,SVM,GE,FC*0.5,THEN
MP,EX,1,30E3
MP,NUXY,1,EMU0+(EMUU-EMU0)*(SVM/FC-0.5)/0.5
*ENDIF

!得到下一步荷載
FORCE=FORCE+1
!加載
SFE,ALL,4,PRES, , FORCE, , ,
SOLVE
FINISH
/POST1
!得到VON MISES應(yīng)力
*GET,SVM,ELEM,1,NMISC, 4
PARSAV, ALL, PARAM, TXT,
FINISH
*ENDDO

[/Money]