pengchangfei 发表于 2012-9-19 21:08:01

abaqus焊接热源模拟用高斯热源，高斯热源怎么定义多道焊啊？

一道焊过后需要从新定义起点，然后进行第二道焊，高斯热源能定义热源起点么？

pengchangfei 发表于 2012-9-20 10:00:01

snrquk 发表于 2012-9-19 22:12 static/image/common/back.gif
可以的，只要调整热源的坐标位置就可以了

      SUBROUTINE DFLUX(FLUX,SOL,KSTEP,JINC,TIME,NOEL,NPT,COORDS,JLTYP,
   1               TEMP,PRESS,SNAME)
      INCLUDE 'ABA_PARAM.INC'
DIMENSION COORDS(3),flux(2),time(2)
      CHARACTER*80 SNAME

        pi=3.1416
        u=13.5
        di=200.0
c        v=0.25
        eff=0.7
        flux(1)=0.0

        x=COORDS(1)
        y=COORDS(2)



        rb=50**2
       
C   JLTYP＝1，表示为体热源
       
C        if (KSTEP. eq. one) then
C   FLUX(1)=heat*shape-1100000
      if(KSTEP.eq.1) then
      p=3000*eff*u*di/(pi*rb)
      r=(x-16)**2+y**2
      flux(1)=p*exp(-3*r/rb)
      endif
部分程序，这个程序里面的热定义在（0,0,0）点吗？怎么调整热源的坐标位置啊？我是新手，多多指教
多道焊可以通过子程序再嵌套子程序，从新调整热源起点坐标弄。这不过我不知道在高斯热源里面怎么调整热源起点坐标

snrquk 发表于 2012-9-19 22:12:44

可以的，只要调整热源的坐标位置就可以了

roveman 发表于 2012-9-20 05:52:47

简单的办法是新开一个step (如果你的热源位置定义的是step时间的函数的话)

muyou2046 发表于 2012-10-29 21:51:38

多谢交流分享:)

zhuobin 发表于 2013-11-14 16:47:10

x=COORDS(1)
y=COORDS(2)
你的z呢？另外这是当前的坐标，而焊接起始坐标默认是000，但是你也以设置：x0=0
y0=0
z0=厚度但是单位一定要统一

f090201102 发表于 2015-11-30 20:58:08

初来乍到，受教了

f090201102 发表于 2016-7-30 15:34:03

受教了~~

zyj960225 发表于 2018-10-29 16:20:40

看一看学习一下

mrlawrence 发表于 2018-11-29 10:15:48

楼上说的很不错
页: [1]
查看完整版本: abaqus焊接热源模拟用高斯热源，高斯热源怎么定义多道焊啊？