下面是二维分析时的命令流,三维的求解设置与二维的相同。后面的压缩包可供下载。
fini
/clear
keyw,pr_therm,1
/prep7
et,1,plane55
mp,dens,1,1630
mp,kxx,1,0.52
mp,c,1,110
mptemp,1,25,1533,1595,1670
mpdata,kxx,2,1,28.8,31.2,24.5,24.5
mpdata,enth,2,1,0,7.5e9,9.6e9,1.1e10
rectng,0,0.1,0,0.05
rectng,-0.02,0.12,-0.02,0.07
/pnum,area,1
/replot
aovlap,1,2
numcmp,area
numcmp,line
/title,geometric model
esize,0.005
mat,2
amesh,1
aplot,all
mat,1
amesh,2
/title,elements in model
eplot
fini
/solu
antype,trans
timint,off
time,0.01
deltim,0.01
aplot
asel,s,,,1
nsla,s,1
d,all,temp,1670
alls
asel,s,,,2
nsla,s,1
d,all,temp,25
alls
lplot,all
/pnum,line,1
lsel,s,,,5,8
nsll,s,1
sf,all,conv,65,25
alls
solve
timint,on
time,600
autots,-1
deltim,3,3,10,1
kbc,0
ddele,all,temp
outres,all,all
solve
fini
/post1
set,last
/plopts,info,on
/title,temperature contours in casting and mould
plnsol,temp
/title,temperature contours in mould
esel,s,mat,,1
nsle,s,1
alls
fini
/post26
/plopts,info,off
/axlab,x,time,(sec)
/axlab,y,temperature
/gthk,axis,3
/gthk,curve,3
/color,curve,mred,1
nsel,s,loc,x,0.05
nsel,r,loc,y,0.025
*get,qa2,node,,num,max
nsel,s,loc,x,0.05
nsel,r,loc,y,0.05
*get,qa3,node,,num,max
nsel,s,loc,x,0
nsel,r,loc,y,0.05
*get,qa4,node,,num,max
nsel,s,loc,x,0.05,
nsel,r,loc,y,0.07
*get,qa5,node,,num,max
nsel,s,loc,x,-0.02
nsel,r,loc,y,0.07
*get,qa6,node,,num,max
nsol,2,qa2,temp
nsol,3,qa3,temp
nsol,4,qa4,temp
nsol,5,qa5,temp
nsol,6,qa6,temp
/title,curve decribed the relation between temperature and time at point a
plvar,2
/title,curve decribed the relation betwenn temperature and time at point b
plvar,3
/title,curve decribed the relation between temperature and time at point c
plvar,4
/title,curve decribed the relation between temperature and time at point d
plvar,5
/title,curve decribed the relation between temperature and time at point e
plvar,6
fini
/exit |