焊接子程序问题

nostalgia

大家好，最近刚刚接触焊接，写了个最简单的子程序DFLUX如下：
SUBROUTINE DFLUX(FLUX,SOL,KSTEP,KINC,TIME,NOEL,NPT,COORDS,
     1 JLTYP,TEMP,PRESS,SNAME)
C
      INCLUDE 'ABA_PARA.INC'
C
      DIMENSION FLUX(2), TIME(2), COORDS(3)
      CHARACTER*80 SNAME
      FLUX(1)=100.
      RETURN
      END
在编译的时候一直出现“Problem during compilation - C:\Abaqus\buttweld.for” 的错误信息，并无其它提示，希望各位大侠们能给点意见，多谢啦～

liuhuan19890404

你直接定义了一个固定的热流为100，不需要写子程序吧？好像直接在载荷里面施加具体数值就行了啊。。你直接施加试一试。。子程序看不出问题，不知道是不是模型其他地方有问题。

flyaway08

查看一下.dat文件，这个文件中记录了具体编译过程出错的位置。