再次求救：面热源加载后冷却无法实现！
本帖最后由 bigbigseawaves 于 2009-11-19 08:18 编辑问题是这样的：在一个面上加了一个热流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 补充一下：没有辐射和对流，只依靠热传导，以前做类似的问题是冷却一段时间后整个区域温度接近一致，但这个问题看似简单却不知道问题出在什么地方。 even withonly conduction, where is your isothermal boundary (T=0) condition?
otherwise, no thermal energy will be dissipated... 具体点好吗？我的问题好像不需要设置什么温度边界条件？我设置了一个起始温度，加了一个热载荷，最后不加载荷再计算。。。。
页:
[1]