24小时热门版块排行榜    

查看: 1221  |  回复: 1

heyy001

新虫 (小有名气)

[求助] ansys的热应力分析算出来的初始应力不为零,参考温度应该怎么设?

finish
/clear
/FILNAME,thermal1,0
/PREP7  
!*  
ET,1,PLANE55   
!*  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,KXX,1,,0.61  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,DENS,1,,900  
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,C,1,,4200
!*  
RECTNG,-3.5,3.5,0,0.4,  

LSEL,S,LENGTH,,7
LESIZE,ALL, , ,40, , , , ,0
!*  
LSEL,S,LENGTH,,0.4
LESIZE,ALL, , ,10, , , , ,0

MSHAPE,0,2D
MSHKEY,1
AMESH,1   
!*  
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
*DEL,_FNCNAME   
*DEL,_FNCMTID   
*DEL,_FNCCSYS   
*SET,_FNCNAME,'T1'  
*SET,_FNCCSYS,0
! /INPUT,t1.func,,,1
*DIM,%_FNCNAME%,TABLE,6,9,1,,,,%_FNCCSYS%   
!   
! Begin of equation: {Y}/0.4*-20
*SET,%_FNCNAME%(0,0,1), 0.0, -999   
*SET,%_FNCNAME%(2,0,1), 0.0
*SET,%_FNCNAME%(3,0,1), 0.0
*SET,%_FNCNAME%(4,0,1), 0.0
*SET,%_FNCNAME%(5,0,1), 0.0
*SET,%_FNCNAME%(6,0,1), 0.0
*SET,%_FNCNAME%(0,1,1), 1.0, -1, 0, 0.4, 0, 0, 3
*SET,%_FNCNAME%(0,2,1), 0.0, -2, 0, 1, 3, 4, -1
*SET,%_FNCNAME%(0,3,1),   0, -1, 0, 0, 0, 0, 0  
*SET,%_FNCNAME%(0,4,1), 0.0, -3, 0, 1, 0, 0, -1
*SET,%_FNCNAME%(0,5,1), 0.0, -4, 0, 1, -1, 2, -3
*SET,%_FNCNAME%(0,6,1), 0.0, -1, 0, 20, 0, 0, -4
*SET,%_FNCNAME%(0,7,1), 0.0, -3, 0, 1, -4, 3, -1
*SET,%_FNCNAME%(0,8,1), 0.0, -1, 0, 1, -2, 3, -3
*SET,%_FNCNAME%(0,9,1), 0.0, 99, 0, 1, -1, 0, 0
! End of equation: {Y}/0.4*-20  
!-->
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
allsel
D,all, , %T1% , , , ,TEMP, , , , ,
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ALLSEL
FINISH
/SOLU
SOLVE
save

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

FINISH  
/PREP7  
lsclear,all
ETCHG,TTS   
!*  
KEYOPT,1,1,0
KEYOPT,1,3,2
KEYOPT,1,6,0
!*  

*do,i,1,10,1
MPTEMP,,,,,,,,  
MPTEMP,1,0  
MPDATA,EX,i,,2.3e9
MPDATA,PRXY,i,,0.35  

MPTEMP,,,,,,,,  
MPTEMP,1,0  
UIMP,I,REFT,,,1-i*2  
MPDATA,ALPX,i,,55e-5
*enddo


*do,i,1,10,1
NSEL,S,LOC,Y,0+(i-1)*0.04,0.04+(i-1)*0.04
ESLN,S,1
EMODIF,all,MAT,i,  
*enddo



ALLSEL
LDREAD,TEMP,,,7200, ,'thermal1','rth',' '  


NSEL,S,LOC,X,   
D,ALL, , , , , ,UX, , , , ,
!NSEL,R,LOC,Y,   
!D,ALL, , , , , ,UY, , , , ,


NSEL,S,LOC,X, 3.5  
D,ALL, , , , , ,UX, , , , ,
D,ALL, , , , , ,UY, , , , ,


NSEL,S,LOC,X, -3.5  
D,ALL, , , , , ,UX, , , , ,
D,ALL, , , , , ,UY, , , , ,
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
ALLSEL
FINISH
/SOLU
antype,0
SOLVE


finish
/post1
NSEL,S,LOC,X, 3.5
回复此楼

» 猜你喜欢

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

bxy0801

新虫 (初入文坛)

楼主最后解决这个问题了么???
2楼2016-04-19 09:56:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 heyy001 的主题更新
信息提示
请填处理意见