iCAx开思网

标题: ansys热分析资料 [打印本页]

作者: grantstar 时间: 2005-7-16 10:27
标题: ansys热分析资料
部分ansys热分析资料共享

作者: ls1111 时间: 2005-7-19 19:52
楼主!我第一个顶你!!!

作者: nervlee 时间: 2005-8-1 18:40

非常有用的資料
3Q

作者: shreea 时间: 2005-8-3 21:10
楼主古道热肠！

作者: ccz205 时间: 2005-8-17 00:35
/BATCH
/FILNAME,stave1,0
/TITLE,steady-state
/units,SI
!几何参数设定
*SET,O1X,0 ！炉壳的起点坐标
*SET,O1Y,0
*SET,O2X,0 ！填料层的起点坐标
*SET,O2Y,0.03
*SET,O3X,0 ！铸铁面的起点坐标
*SET,O3Y,0.05
*SET,O4X,0 ！铜面的起点坐标
*SET,O4Y,0.09
*SET,O5X,0.11 ！第一个冷却水管的起点坐标
*SET,O5Y,0.09
*SET,O6X,0.37 ！第二个冷却水管的起点坐标
*SET,O6Y,0.09
*SET,O7X,0.63 ！第三个冷却水管的起点坐标
*SET,O7Y,0.09
*SET,O8X,0.89 ！第四个冷却水管的起点坐标
*SET,O8Y,0.09
*SET,O9X,0    ！炉渣厚度起点坐标
*SET,O9Y,0.13
*SET,L,2.0 ！冷却壁的长度
*SET,d1,0.03  ！炉壳的厚度
*SET,d2,0.02  ！填料层的厚度
*SET,d3,0.04 ！铸铁层的厚度
*SET,d4,0.04 ！铜层的厚度
*SET,d5,0.02 ！渣皮层的厚度
*SET,D,d1+d2+d3+d4  ！冷却壁的厚度
*SET,W,1.0       ！冷却壁的宽度
*SET,RI,0.028    ！冷却水管的内径
*SET,RO,0.03    ！冷却水管的外径
！边界条件的定义参数
*SET,Hair,9.45 !空气与炉壳之间的对流换热系数
*SET,Tair,25
*SET,Hwater,401.56 !冷却水管与冷却水之间的对流换热系数
*SET,Twater,30
*SET,Hgas,232 !炉气与渣壳表面之间的对流换热系数
*SET,Tgas,1600
！边界条件的定义参数
!定义分析类型为热分析
/NOPR
/PMETH,OFF,0
KEYW,PR_SET,1
KEYW,PR_STRUC,0
KEYW,PR_THERM,1
KEYW,PR_FLUID,0
KEYW,PR_ELMAG,0
KEYW,MAGNOD,0
KEYW,MAGEDG,0
KEYW,MAGHFE,0
KEYW,MAGELC,0
KEYW,PR_MULTI,0
KEYW,PR_CFD,0
/GO
!定义分析类型为热分析
!进入前处理器
/PREP7
！定义单元类型
ET,1,PLANE55
！定义材料属性
！导热系数参数设定
！炉壳导热系数
MPTEMP,,,,,,,,
MPTEMP,1,0
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPDATA,KXX,1,,52.5
MPDATA,KXX,1,,50.00
MPDATA,KXX,1,,47.50
MPDATA,KXX,1,,45.00
MPDATA,KXX,1,,42.50
MPDATA,KXX,1,,40.00
MPDATA,KXX,1,,37.50
MPDATA,KXX,1,,34.50
!填料层导热系数
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,2,,20
!球墨铸铁面导热系数
MPTEMP,,,,,,,,
MPTEMP,1,0
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPDATA,KXX,3,,42.5
MPDATA,KXX,3,,39.80
MPDATA,KXX,3,,37.10
MPDATA,KXX,3,,34.40
MPDATA,KXX,3,,31.70
MPDATA,KXX,3,,29.00
MPDATA,KXX,3,,26.30
MPDATA,KXX,3,,23.30
!铜面导热系数
MPTEMP,,,,,,,,
MPTEMP,1,0
MPTEMP,2,100
MPTEMP,3,200
MPTEMP,4,300
MPTEMP,5,400
MPTEMP,6,500
MPTEMP,7,600
MPTEMP,8,700
MPDATA,KXX,4,,401
MPDATA,KXX,4,,393
MPDATA,KXX,4,,388
MPDATA,KXX,4,,384
MPDATA,KXX,4,,379
MPDATA,KXX,4,,366
MPDATA,KXX,4,,352
MPDATA,KXX,4,,334
!填料层导热系数
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,KXX,5,,2.0
!冷却水管导热系数
！线性膨胀系数参数设定
！设定温度单位为摄氏度
TOFFST,273
!建立模型
BLC4,O1X,O1Y,W,d1
BLC4,O2X,O2Y,W,d2
BLC4,O3X,O3Y,W,d3
BLC4,O4X,O4Y,W,d4
！产生四个圆孔
CYL4,0.11,0.09,0.03
FLST,3,1,5,ORDE,1
FITEM,3,5
AGEN,2,P51X, , ,0.26,0,0, ,0
FLST,3,1,5,ORDE,1
FITEM,3,6
AGEN,2,P51X, , ,0.26,0,0, ,0
FLST,3,1,5,ORDE,1
FITEM,3,7
AGEN,2,P51X, , ,0.26,0,0, ,0
FLST,2,2,5,ORDE,2
FITEM,2,3
FITEM,2,-4
FLST,3,4,5,ORDE,2
FITEM,3,5
FITEM,3,-8
ASBA,P51X,P51X
！结束圆孔
NUMCMP,ALL
！粘合
AGLUE,ALL
NUMCMP,ALL
FINISH
/POST1
FINISH
/PREP7
BLC4,O9X,O9Y,W,d5
NUMCMP,ALL
AGLUE,ALL
NUMCMP,ALL
FINISH
！粘合
！划分网格分配材料属性
/PREP7
CM,_Y,AREA
ASEL, , , ,    1
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,    1, , 1,    0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , ,    2
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,    2, , 1,    0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , ,    3
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,    3, , 1,    0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , ,    4
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,    4, , 1,    0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
CM,_Y,AREA
ASEL, , , ,    5
CM,_Y1,AREA
CMSEL,S,_Y
!*
CMSEL,S,_Y1
AATT,    5, , 1,    0,
CMSEL,S,_Y
CMDELE,_Y
CMDELE,_Y1
!*
SMRT,6
SMRT,1
MSHAPE,1,2D
MSHKEY,0
!*
FLST,5,5,5,ORDE,2
FITEM,5,1
FITEM,5,-5
CM,_Y,AREA
ASEL, , , ,P51X
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
！划分网格分配材料属性
/SOL
FLST,2,10,4,ORDE,6
FITEM,2,2
FITEM,2,4
FITEM,2,28
FITEM,2,-33
FITEM,2,35
FITEM,2,-36
/GO
!*
SFL,P51X,HFLUX,0,
FLST,2,16,4,ORDE,2
FITEM,2,7
FITEM,2,-22
/GO
!*
SFL,P51X,CONV,Hwater, ,Twater,
FLST,2,2,4,ORDE,2
FITEM,2,1
FITEM,2,7
/GO
!*
SFL,P51X,CONV,Hair, ,Tair,
FLST,2,1,4,ORDE,1
FITEM,2,34
/GO
!*
SFL,P51X,CONV,Hgas, ,Tgas,
/STATIS,SOLU
TIME,1
AUTOTS,-1
DELTIM,5, , ,1
KBC,0
SOLVE
SAVE,stave1,db,D:\model\stave1\
FINISH
/POST1
PLNSOL,TEMP,,0,
FINISH

作者: brian_hsieh 时间: 2005-8-18 13:29
TKS !!

作者: htyg 时间: 2005-8-18 13:38
good!

作者: flytoe 时间: 2009-12-24 10:20
顶起
十分感谢

作者: zhengdl2001 时间: 2010-1-1 20:32
楼主!我第一个顶你!!!

作者: steel666 时间: 2010-2-24 14:03
非常顶起，谢谢楼主，继续发扬共享精神

欢迎光临 iCAx开思网 (https://www.icax.org/)