- 积分
- 0
- 注册时间
- 2010-3-22
- 仿真币
-
- 最后登录
- 1970-1-1
|
file:///D:/Program%20Files/Tencent/QQ/Users/33220707/Image/4QKCRW@ZUN_4YS5Y095%T(I.jpg
求助 这个是我的焊接温度场 可是为什么温度长不对称?而且 热源中心不在Z轴上?
这个是我加载热源的程序
*dim,flux2,table,max_z,max_x,max_time,z,x,time
*do,k,1,max_time,1
*do,i,1,max_z,1
flux2(i,0,k)=(i-1)*lsize
*enddo
*do,j,1,max_x,1
flux2(0,j,k)=(j-1)*lsize
*enddo
*do,i,1,max_z,1
*do,j,1,max_x,1
zcenter=v*(k-1)*tinc-0.06
xcenter=0
distance=sqrt(((i-1)*lsize-zcenter)**2+((j-1)*lsize-xcenter)**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 |
|