24小时热门版块排行榜    

查看: 701  |  回复: 3
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

wdwangcool

金虫 (小有名气)

[求助] 高斯出现对称热源,求助 已有1人参与

兄弟姐妹们看一下这两幅图,我做的是高斯热源移动,但是为什么会在相对的两个面出现对称的热源呢?我只想要一个面有热源。请问该怎么做呢?
下面是命令流
finish
/clear
/filname,weldtem
/title,welding tempserature field simluation
/unit,si
/prep7
et,1,solid70
keyopt,1,2,1
et,2,surf152
r,2
keyopt,2,4,1
keyopt,2,5,0
keyopt,2,8,3
mptemp,1,0,400,600,800,1000,1500
mpdata,kxx,1,1,18.9,28.35,31.08,32.76,31.5,28.2
mpdata,c,1,1,580,756,840,882,756,797
mpdata,hf,1,1,9.66,59.43,84.32,109.2,180.6,359
mpdata,dens,1,1,7800,7550,7550,7550,7550,7550
pi=3.1415926
I=160
u=23
efficient=0.78
r=0.0045
Qm=3*i*u*efficient/(pi*r*2)
kk=0.85
Qmax=Qm*kk
ly=0.12
lx=0.4
lz=0.12
lsize=0.01
v=0.00185
tm=lx/v
tinc=lsize/v
max_time=1+tm/tinc
max_x=1+lx/lsize
max_y=1+ly/lsize
/view,1,1,1
block,0,lx,0,ly,0,lz
save
esize,lsize
mshkey,1
vatt,1,1,1
vmesh,all
type,2
asel,s,,,2
!asel,u,,,3
amesh,all
/pnum,line,off
/pnum,defa
eplot
finish

*dim,flux2,table,max_x,max_y,max_time,x,y,time
*do,k,1,max_time,1
*do,i,1,max_x,1
flux2(i,0,k)=(i-1)*lsize
*enddo
*do,j,1,max_y,1
flux2(0,j,k)=(j-1)*lsize
*enddo
*do,i,1,max_x,1
*do,j,1,max_y,1
xcenter=v*(k-1)*tinc
ycenter=0.03
distance=sqrt(((i-1)*lsize-xcenter)**2+((j-1)*lsize-ycenter)**2)
*if,distance,le,r,then
flux2(i,j,k)=Qmax*exp(-3*kk*distance**2/(r**2))
*else
flux2(i,j,k)=0
*endif
*enddo
*enddo
flux2(0,0,k)=(k-1)*tinc
*enddo
/solu
antype,trans
tunif,15
kbc,1
timint,on
autots,off
asel,s,area,,,2
nsla,s,all
sf,all,conv,-1
allsel
*do,t,1e-6,tm,tinc
time,t
autots,0
deltim,,,,1
kbc,0
outres,all,all
tsres,erase

sf,all,hflux,%flux2%
solve
*enddo
finish

高斯出现对称热源,求助
1.png


高斯出现对称热源,求助-1
2.png
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

shgao20

专家顾问 (职业作家)

【答案】应助回帖

感谢参与,应助指数 +1
试试看:在施加热源的部分,除了由 xcenter 和 ycenter 计算 distance 的判断外,增加一个对于单元的 z 向中心位置的判断。
3楼2015-07-30 08:15:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 4 个回答

wdwangcool

金虫 (小有名气)

同学们帮帮忙给些提示也好啊
2楼2015-07-28 13:34:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wdwangcool

金虫 (小有名气)

引用回帖:
3楼: Originally posted by shgao20 at 2015-07-30 08:15:15
试试看:在施加热源的部分,除了由 xcenter 和 ycenter 计算 distance 的判断外,增加一个对于单元的 z 向中心位置的判断。

问题找到了 是因为多了一个壳单元,但是多了壳单元就会出现这种情况吗?
4楼2015-08-16 12:20:55
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 3/150 2026-02-08 03:05 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 5lbyq5wrhb 2026-02-07 3/150 2026-02-08 02:52 by vs90ilomwc
[论文投稿] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 3rkserf6qr 2026-02-07 4/200 2026-02-08 02:45 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +3 3rkserf6qr 2026-02-07 3/150 2026-02-08 02:32 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 5/250 2026-02-08 02:27 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +5 2h7du0nuhk 2026-02-07 5/250 2026-02-08 02:25 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 5/250 2026-02-08 02:12 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 6/300 2026-02-08 02:07 by vs90ilomwc
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 6/300 2026-02-08 02:05 by vs90ilomwc
[找工作] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 6/300 2026-02-08 01:46 by vs90ilomwc
[公派出国] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 01:45 by vs90ilomwc
[考博] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 01:32 by vs90ilomwc
[教师之家] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 01:26 by vs90ilomwc
[硕博家园] 售SCI一区文章,我:8 O5 51O 54,科目齐全 +4 2h7du0nuhk 2026-02-07 7/350 2026-02-08 01:12 by vs90ilomwc
[基金申请] 同年申请2项不同项目,第1个项目里不写第2个项目的信息,可以吗 +4 hitsdu 2026-02-06 4/200 2026-02-07 13:07 by jurkat.1640
[基金申请] 有时候真觉得大城市人没有县城人甚至个体户幸福 +9 苏东坡二世 2026-02-04 10/500 2026-02-07 12:37 by 小毛球
[公派出国] CSC & MSCA 博洛尼亚大学能源材料课题组博士/博士后招生|MSCA经费充足、排名优 +4 雨念 2026-02-01 6/300 2026-02-06 23:32 by MelissaPon
[基金申请] 面上项目申报 +3 Tide man 2026-02-01 3/150 2026-02-05 22:56 by god_tian
[硕博家园] 博士延得我,科研能力直往上蹿 +7 偏振片 2026-02-02 7/350 2026-02-04 17:36 by 陈氏帝国
[教师之家] 遇见不省心的家人很难过 +18 otani 2026-02-03 22/1100 2026-02-04 11:06 by tangmnt
信息提示
请填处理意见