高斯热源移动程序

zraforgood

以下是我看到的关于高斯热源移动的程序代码，我也是刚学习焊接模拟的，希望能够跟大家一起交流。

*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,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.02
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

守护蓝天

能分享全部的吗？

陶茂科2009

请问下楼主，第一次移动到板端，然后冷却一段时间，又从这边移动回去的命令流怎么写啊？期待你的点拨

zraforgood

我刚学，这个我不怎么清楚，个人觉得可以加一个if语句，分别对冷却时间和移动距离进行限定。 3# 陶茂科2009

zraforgood

如果你需要的话，我可以给你一些例子。 2# 守护蓝天

shuiku

楼主，我需要一些例子，能不能给我一些[email=?530605714@qq.com]?530605714@qq.com[/email].谢谢！