User Model to Define a Material’s Hyperelastic Response

Overview

uhyper is a material model for hyperelastic materials.

Interface

 subroutine uhyper(i1b, i2b, jac, u, du, d2u, d3u, temp, noel, cmname, &
      incmpflag, nstatev, statev, nfieldv, fieldv, fieldvinc, &
      nprops, props)
   implicit none
   integer, parameter :: dp=selected_real_kind(14)
   real(kind=dp), parameter :: zero=0._dp, one=1._dp, two=2._dp, three=3._dp
   character*8, intent(in) :: cmname
   integer, intent(in) :: nprops, noel, nstatev, incmpflag, nfieldv
   real(kind=dp), intent(in) :: i1b, i2b, jac, props(nprops), temp
   real(kind=dp), intent(inout) :: u(2), du(3), d2u(6), d3u(6), statev(nstatev)
   real(kind=dp), intent(inout) :: fieldv(nfieldv), fieldvinc(nfieldv)

   ! User coding

end subroutine uhyper