起个什么名字嘛 发表于 2016-7-31 10:21:15

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

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 发表于 2016-10-12 18:56:59

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

起个什么名字嘛 发表于 2016-10-15 10:39:53

723791872.。

openlabpub 发表于 2017-3-10 04:31:57

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

起个什么名字嘛 发表于 2017-7-20 10:48:48

723791872一起交流啊

RSSQ 发表于 2017-8-22 09:14:42

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

LYFX 发表于 2017-10-13 15:50:24

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

1099 发表于 2019-10-23 10:41:00

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

aqustut 发表于 2019-11-19 17:40:15

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

aqustut 发表于 2019-11-28 16:34:50


谢谢分享共同进步

aqustut 发表于 2019-12-12 16:14:26

支持支持
页: [1]
查看完整版本: 焊接热源转圈问题（附图）