GetName

Return the name of reference element.

The returned name is an integer code.

Interface

܀ Interface

INTERFACE
  MODULE PURE FUNCTION refelem_GetName(obj) RESULT(ans)
    CLASS(RefLine_), INTENT(IN) :: obj
    INTEGER(I4B) :: ans
  END FUNCTION refelem_GetName
END INTERFACE

️܀ See example

PROGRAM main
  USE easifemBase
  USE easifemClasses
  IMPLICIT NONE
  TYPE( RefLine_ ) :: obj
  REAL( DFP ) :: avar, xij( 1, 2 )
  CALL obj%Initiate(nsd=1, baseInterpol="Lagrange", baseContinuity="H1")
  CALL OK(obj%GetName() .EQ. Line2, "GetName:")
END PROGRAM main

↢