MEF90DefMechElasticEnergy Subroutine

  • Blaise Bourdin (2012-14, bourdin@lsu.edu) Blaise Bourdin (2022-26, bourdin@mcmaster.ca) Alexis Marboeuf (2022, marboeua@mcmaster.ca)
  • 292 statements
  • Source File

public subroutine MEF90DefMechElasticEnergy(MEF90DefMechCtx, energy, ierr)

MEF90DefMechElasticEnergy:

Arguments

Type IntentOptional Attributes Name
type(MEF90DefMech_Type), intent(in) :: MEF90DefMechCtx
real(kind=C_DOUBLE), dimension(:), pointer :: energy
integer(kind=C_INT32_T), intent(inout) :: ierr