跪求冷却过程的计算

bigbigseawaves

问题是这样的：在一个面上加了一个热流HFLUX，作用50S后进行冷却，先后采用了两种冷却方式，第一种是采用SFADELE，第二种是采用不加任何载荷进行求解，但实际效果是还采用原来的载荷进行计算。
FINISH
/CLEAR

/CONFIG,NRES,1000000
/PREP7
/COM,  Structural   
/COM,  Thermal  

ET,1,SOLID5   !
MPTEMP,1,20,200,600,800,1000,1200
MPDATA,KXX,1,1,13.31,16.33,22.38,25.07,27.53,29.76
MPDATA,C,1,1,470,508,592,634,676,719
MP,DENS,1,7890
MP,EX,1,1.80e11
MP,ALPX,1,15e-6
MP,PRXY,1,0.288

!!!!!!!!!!!!!!!!!!!***************建模
BLOCK,-60,60,-60,60,0,10   
BLOCK,-30,30,-30,30,0,10
vSBv,1,2, ,DELETE,KEEP
allsel
!!!!!!!!!!!!!!!!!!!***************网格划分SWEEP
FLST,5,2,6,ORDE,2   
FITEM,5,2   
FITEM,5,-3  
CM,_Y,VOLU  
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
VSWEEP,_Y1  
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  

!!!!!!!!!!!!!!!!!!!***************算法设置
/SOLU
ANTYPE,4
NROPT,FULL
OUTRES,ALL,1
!tunif,50
tref,20
kbc,1
LUMPM,0

!!!!!!!!!!!!!!!!!!!***************积分精度设置
TSRES,ERASE
TIMINT,1
TINTP,0.005, , ,-1,0.5,-1,  
TIM=0

!!!!!!!!!!!!!!!!!!!***************时间和步长设置
TIME,50
AUTOTS,1   
NSUBST,10  
!!!!!!!!!!!!!!!!!!!***************加载面位置的选择
ALLSEL,ALL  
ASEL,S,LOC,X,-30,30   
ASEL,R,LOC,Y,-30,30   
ASEL,R,LOC,Z,10

!!!!!!!!!!!!!!!!!!!***************具体加载面位置的选择
FLST,2,1,5,ORDE,1   
FITEM,2,8   

!!!!!!!!!!!!!!!!!!!***************热流设置加热计算
/GO
!*  
/STATUS,SOLU
SFA,P51X,1,HFLUX,1E8
SOLVE
!!!!!!!!!!!!!!!!!!!***************冷却计算
TIME,500
AUTOTS,1
NSUBST,5
/STATUS,SOLU
SFADELE,P51X,1,HFLUX
SOLVE
SAVE


另外一种方式是：
TIME,500
NSUBST,5
SOLVE
SAVE

下天雄

分两个过程来求解
1、求解加热后的温度分布
2、以第一步的最后温度为初始载荷，进行冷却分析

你不能在同一个/solu里，两个过程都进行的

bigbigseawaves

你好，谢谢指点！我按照你说的又做了一遍，还是不行！
FINISH
/CLEAR

/CONFIG,NRES,1000000
/PREP7
/COM,  Structural   
/COM,  Thermal  

ET,1,SOLID5   !
MPTEMP,1,20,200,600,800,1000,1200
MPDATA,KXX,1,1,13.31,16.33,22.38,25.07,27.53,29.76
MPDATA,C,1,1,470,508,592,634,676,719
MP,DENS,1,7890
MP,EX,1,1.80e11
MP,ALPX,1,15e-6
MP,PRXY,1,0.288

!!!!!!!!!!!!!!!!!!!***************建模
BLOCK,-60,60,-60,60,0,10   
BLOCK,-30,30,-30,30,0,10
vSBv,1,2, ,DELETE,KEEP
allsel
!!!!!!!!!!!!!!!!!!!***************网格划分SWEEP
FLST,5,2,6,ORDE,2   
FITEM,5,2   
FITEM,5,-3  
CM,_Y,VOLU  
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'   
CMSEL,S,_Y  
!*  
VSWEEP,_Y1  
!*  
CMDELE,_Y   
CMDELE,_Y1  
CMDELE,_Y2  
!*  

!!!!!!!!!!!!!!!!!!!***************算法设置
/SOLU
ANTYPE,4
NROPT,FULL
OUTRES,ALL,1
!tunif,50
tref,20
kbc,1
LUMPM,0

!!!!!!!!!!!!!!!!!!!***************积分精度设置
TSRES,ERASE
TIMINT,1
TINTP,0.005, , ,-1,0.5,-1,  
TIM=0

!!!!!!!!!!!!!!!!!!!***************时间和步长设置
TIME,50
AUTOTS,1   
NSUBST,10  
!!!!!!!!!!!!!!!!!!!***************加载面位置的选择
ALLSEL,ALL  
ASEL,S,LOC,X,-30,30   
ASEL,R,LOC,Y,-30,30   
ASEL,R,LOC,Z,10

!!!!!!!!!!!!!!!!!!!***************具体加载面位置的选择
FLST,2,1,5,ORDE,1   
FITEM,2,8   

!!!!!!!!!!!!!!!!!!!***************热流设置加热计算
/GO
!*  
/STATUS,SOLU
SFA,P51X,1,HFLUX,1E8
SOLVE
!!!!!!!!!!!!!!!!!!!***************冷却计算
/STATUS,SOLU
ddelet,all,temp
outres,all,LAST
TIME,100
DELTIM,10
AUTOS,1
SOLVE