sigisomatfic.for

Go to the documentation of this file.

      SUBROUTINE sigisomatfic(SFIC,PKFIC,F,DET,NDI)
C>    ISOTROPIC MATRIX:  ISOCHORIC CAUCHY STRESS 
      IMPLICIT NONE
      include 'PARAM_UMAT.INC'
C
      INTEGER NDI
      DOUBLE PRECISION SFIC(ndi,ndi),F(ndi,ndi),
     1                 pkfic(ndi,ndi)
      DOUBLE PRECISION DET
C
      CALL push2(sfic,pkfic,f,det,ndi)
C
      RETURN
      END SUBROUTINE sigisomatfic