焊接热源转圈问题（附图）

起个什么名字嘛

123都转过来了。后面热源就内偏移了，热源还是在转，还有就是初始双椭球热源怎么长这个样子呀，求大神调戏
        x=COORDS(1)
        y=COORDS(2)
        z=COORDS(3)
C     
        x0=0.04
        y0=0
        z0=0.04
        r=0.04
C    坐标变换
        x1=(x-x0)*COS(d/r)+y*SIN(d/r)
        y1=y*COS(d/r)-(x-x0)*SIN(d/r)
        z1=z
C    坐标变换后的转动
        tt=TIME(2)-INT(TIME(2))
        x2=0
        y2=v*tt
        z2=z0
C     a,b,c为椭球的半轴
        a=0.0025
        b=0.0015
        c=0.002
        PI=3.1415
C
        heat=6*sqrt(3.0)*Q/(a*b*c*PI*sqrt(PI))
        shape=exp(-3*(y1-y2)**2/a**2-3*(z1-z2)**2/b**2-3*(x1-x2)**2/c**2)
C     JLTYP＝1，表示为体热源
        JLTYP=1
        IF (KSTEP. eq. one) THEN
        FLUX(1)=heat*shape
      ENDIF
      RETURN
      END

diaoerlangdang

楼主你q多少啊？交流一下呗，小弟也在学，我的是353677531

起个什么名字嘛

723791872.。

openlabpub

我的初始热源也是这个样子

起个什么名字嘛

723791872一起交流啊

RSSQ

1241355965，请大神赐教，一起探讨

LYFX

楼主，能不能发一份资料啊14012688832qq.com

1099

请问kstep是啥呀？有人能解释一下不？

aqustut

谢谢分享，必顶一下，支持

aqustut

谢谢分享共同进步

aqustut

支持支持