谁给解释下abaqus sigini子程序啊

zs01

哪位大神给解释下面子程序啊
 SUBROUTINE SIGINI(SIGMA,COORDS,NTENS,NCRDS,NOEL,NPT,LAYER,
     1 KSPT,LREBAR,REBARN)
C
      INCLUDE 'ABA_PARAM.INC'
C
      DIMENSION SIGMA(NTENS),COORDS(NCRDS)
      CHARACTER*80 REBARN

      IF(COORDS(1).LE.-80) THEN
      write(*,*)"error"
        ELSEIF(COORDS(1).LE.0.35)THEN
      SIGMA(2)=0.023*(COORDS(2)-(35.788+0.1819*COORDS(1)))
      SIGMA(1)=SIGMA(2)*0.37
      SIGMA(3)=0.27*(SIGMA(1)+SIGMA(2))
        ELSEIF(COORDS(1).LE.38.6)THEN
      SIGMA(2)=0.023*(COORDS(2)-(35.731+0.3469*COORDS(1)))
      SIGMA(1)=SIGMA(2)*0.37
      SIGMA(3)=0.27*(SIGMA(1)+SIGMA(2))
        ELSEIF(COORDS(1).LE.80)THEN
      SIGMA(2)=0.023*(COORDS(2)-(46.575+0.0659*COORDS(1)))
      SIGMA(1)=SIGMA(2)*0.37
      SIGMA(3)=0.27*(SIGMA(1)+SIGMA(2))
      ENDIF

      RETURN
      END

zs01

哪位大神给解释下啊

corehearty

参考帮助文档
http://www.maths.cam.ac.uk/compu ... oks/sub/default.htm

zs01

corehearty 发表于 2015-6-6 09:25
参考帮助文档
http://www.maths.cam.ac.uk/computing/software/abaqus_docs/docs/v6.12/books/sub/default. ...

感觉帮助里说的不太明白啊 这个例子里这三个应力分量是怎么算的啊 大神! 跪求！！！

corehearty

zs01 发表于 2015-6-7 21:55
感觉帮助里说的不太明白啊 这个例子里这三个应力分量是怎么算的啊 大神! 跪求！！！ ...

应力是你给的，这个你自己看，帮助写的很好的，好好看一看

摇摆风雨

gan jie chu bu tai

o123456789

corehearty 发表于 2015-6-6 09:25
参考帮助文档
http://www.maths.cam.ac.uk/computing/software/abaqus_docs/docs/v6.12/books/sub/default. ...

Page not found