Ansys作业相变分析报告.docx
《Ansys作业相变分析报告.docx》由会员分享,可在线阅读,更多相关《Ansys作业相变分析报告.docx(18页珍藏版)》请在冰豆网上搜索。
![Ansys作业相变分析报告.docx](https://file1.bdocx.com/fileroot1/2023-1/7/005e0d26-0a9d-4faf-9f61-8de2a829f7e0/005e0d26-0a9d-4faf-9f61-8de2a829f7e01.gif)
Ansys作业相变分析报告
Ansys作业——相变分析
步骤:
(1)定义单元类型选择ThermalSolid和Quad4node5单元,单元属性选择Axisymmetric;定义材料属性:
设置水的密度、导热率以及焓参数。
水的焓参数变化曲线
(2)创建几何模型,划分有限元网格
(3)施加初始温度,施加对流载荷
(4)设置求解选项,显示沿半径方向的温度分布
(5)显示温度场分布云图
(6)显示冰和水的区域
10分钟后冰水分解示意图
步骤:
(1)定义单元类型,选择ThermalSolid、Quad4node55和Brick20node90单元.
定义材料属性:
导热系数、密度以及焓变参数等。
(2)创建几何模型,划分有限元网格
(3)施加温度载荷
(4)设置求解选项,然后求解,显示60分钟后的温度分布云图
(5)计算冰完全融化的时间
第7827秒后温度场分布等值线云图
从图中可以看出,7827秒后的最低温度为-0.001732℃,接下来我们用相同的方法查看第7828秒的温度分布等值线云图。
从图中可以看出,7828秒后的最低温度为0.0025℃,表明冰莹完全融化。
所以在第7828秒冰完全融化为水。
(6)绘制A点温度随时间变化曲线
A点温度随时间变化曲线
(7)绘制B点温度随时间变化曲线
B点温度随时间变化曲线
(1)定义单元类型,选择ThermalSolid、Quad4node55单元;
定义材料属性:
导热系数、砂模密度、砂模比热以及温度、焓变参数。
(2)创建几何模型
(3)划分网格
(4)施加温度载荷
(5)求解查看结果
读入最后一步的分析结果,查看600秒后铸件和砂模的温度等值线云图
600秒后铸件和砂模的温度等值线云图
600秒后砂模的温度等值线云图
命令流文件:
finish
/clear
/filname,thermal
/title,haha
/prep7
et,1,55
mp,kxx,1,0.35
mp,dens,1,1520
mp,c,1,816
MPTEMP,,,,,,,,
MPTEMP,1,25
MPTEMP,2,1533
MPTEMP,3,1595
MPTEMP,4,1670
MPDATA,KXX,2,,28.8
MPDATA,KXX,2,,31.2
MPDATA,KXX,2,,24.5
MPDATA,KXX,2,,24.5
MPTEMP,,,,,,,,
MPTEMP,1,25
MPTEMP,2,1533
MPTEMP,3,1595
MPTEMP,4,1670
MPDATA,ENTH,2,,7.8886e-31
MPDATA,ENTH,2,,7.5e9
MPDATA,ENTH,2,,9.6e9
MPDATA,ENTH,2,,1.1e10
k,1,0.01,0.01
k,2,0.01,0.04
k,3,0.02,0.04
k,4,0.02,0.03
k,5,0.08,0.03
k,6,0.08,0.04
k,7,0.09,0.04
k,8,0.09,0.01
k,9,0.08,0.01
k,10,0.08,0.02
k,11,0.02,0.02
k,12,0.02,0.01
*DO,I,1,11,1
L,i,i+1
*ENDDO
L,1,12
AL,all
rectng,0,0.1,0,0.05
aovlap,all
/pnum,area,1
aplot
NUMCMP,AREA
esize,0.002
mat,2
amesh,1
mat,1
amesh,2
/pnum,area,0
/REPLOT
finish
save
/solu
antype,4
TRNOPT,FULL
LUMPM,0
TIME,0.01
AUTOTS,-1
DELTIM,0.01,,,1
KBC,0
TSRES,ERASE
TIMINT,0
TINTP,0.005,,,-1,0.5,-1,
asel,s,,,1
nsla,s,1
d,all,temp,1670
allsel
asel,s,,,2
nsla,s,1
d,all,temp,25
allsel
lsel,s,,,13
lsel,a,,,14
lsel,a,,,15
lsel,a,,,16
nsll,s,1
sfl,all,conv,65,,100
allsel
solve
/SOL
LUMPM,0
TIME,600
DELTIM,3,3,10
KBC,0.0
OUTRES,ERASE
OUTRES,ALL,ALL
TIMINT,1
ddele,all,temp
solve
/POST1
SET,LAST
PLNSOL,TEMP,,0
finish