iCAx开思网
标题:
要模拟两个物体之间热传导该怎么设置?
[打印本页]
作者:
Longgang1985
时间:
2010-7-12 15:08
标题:
要模拟两个物体之间热传导该怎么设置?
我现在需要模拟两个物体之间的热传导,我给两个物体之间创建了接触单元,在两物体外表面上施加空气对流载荷,两物体接触部分表面
定义接触热传导系数,
给物体一施加27°,物体二施加83.3°。求解的结果显示两物体的温度都不变,根本就没有传热。是怎么回事?
命令流如下:
Finish
~PARAIN,'ballscrew','x_t',,SOLIDS,0,0 !
导入实体模型(
x_t
格式)
/NOPR
/GO
/FACET,NORML
/REPLOT
/title,Thermal Analysis of Ballscrew
/prep7
et,1,solid70
mptemp,,,,,,,,
mptemp,1,0
mpdata,ex,1,,2.1e11
mpdata,prxy,1,,0.3
mpdata,dens,1,,7820
mpdata,c,1,,460
mpdata,kxx,1,,36.5
uimp,1,reft,,,20
mpdata,alpx,1,,1.12e-5
esize,0.002
MSHKEY,0
MSHAPE,1,3d
!
自由网格划分
vmesh,1
esize,0.002
MSHKEY,0
MSHAPE,1,3d
vmesh,2
esize,0.002
MSHKEY,0
MSHAPE,1,3d
vmesh,3,6
/VIEW,1,1
/ANG,1
/REP,FAST
Asel,s,,,44 !
螺母内表面
Nsla,s,1
Cm,plate1,node !
生成第一个节点组件
Allsel
Asel,s,,,5 !
丝杠外表面
Nsla,s,1
Cm,shaft1,node !
生成第一个节点组件
Allsel
R,3
Real,3
et,2,170
et,3,174
Nsel,s,,,plate1
Type,2
Esln,s,0
Esurf,all
Allsel
Nsel,s,,,shaft1
Type,3
Esln,s,0
Esurf,all
Allsel
KEYOPT,3,1,2
KEYOPT,3,2,2
KEYOPT,3,4,2
KEYOPT,3,5,1
KEYOPT,3,6,0
KEYOPT,3,7,0
KEYOPT,3,8,0
KEYOPT,3,9,2
KEYOPT,3,10,0
KEYOPT,3,11,0
KEYOPT,3,12,4
KEYOPT,3,14,0
Finish
/solu !
进入求解器
Antype,trans !
定义为瞬态分析
Timint,on !
时间积分
Nropt,full !
使用完全的
NR
法
Autots,on
Time,100 !
指定求解时间
Deltim,20,20,50 !
定义时间子步
kwpave,44,59 !
坐标系偏移(点
44
和
59
的中间位置)
wprota,0,0,180 !
绕
Y
轴旋转
180°
wpoffs,0,0,0.146 !
沿转后的
Z
轴平移
0.146
cswpla,11,1,1,1 !
定义局部柱坐标系
csys,11
asel,s,area,,2,10
asel,a,area,,12,13
asel,a,area,,22,32
asel,a,area,,37,43
asel,a,area,,45,50,5
asel,a,area,,48,49
asel,a,area,,54,56
asel,a,area,,60,62
asel,a,area,,66,68
nsla,s,1
sf,all,conv,3.5,20 !
在丝杠外表面上施加空气对流载荷
Allsel
asel,s,area,,1,11,10
asel,a,area,,14,21
nsla,s,1
sf,all,conv,532.7,20 !
在丝杠内表面上施加水的对流载荷
allsel
nsel,s,loc,x,0.015
nsel,r,loc,z,-0.066,-0.036
sfdele,all, conv
allsel
nsel,s,loc,x,0.015
nsel,r,loc,z,1.232,1.262 !
删去轴承处空气对流换热系数
sfdele,all,conv
Allsel
nsel,s,loc,x,0.015
nsel,r,loc,z,-0.066,-0.036 !
删去轴承处空气对流换热系数
sf,all,conv,150,20
Allsel
nsel,s,loc,x,0.015
nsel,r,loc,z,1.232,1.262 !施加轴承与丝杠处
接触热传导系数
sf,all,conv,150,20
Allsel
nsel,s,loc,x,0.02
nsel,r,loc,z,0.46,0.685
sfdele,all,conv !
删去螺母处空气对流换热系数
allsel
nsel,s,loc,x,0.02
nsel,r,loc,z,0.46,0.685
!
施加螺母与丝杠处
接触热传导系数
sf,all,conv,150,20
allsel
Vsel,s,volu,,1
Vsel,a,volu,,3,6
nslv,s,1
D,all,temp,27
allsel
Vsel,s,volu,,2
nslv,s,1
D,all,temp,83.3
allsel
Toffst,273
Outres,,all
solve
/post1
Plnsol,temp,,0,
作者:
Longgang1985
时间:
2010-7-13 18:44
哎 怎么没人回复?高手在哪里?
欢迎光临 iCAx开思网 (https://www.icax.org/)
Powered by Discuz! X3.3