Get

Get is generic function which returns the value from UserFunction.

@GetMethods

Interface (Get scalar value)

INTERFACE
  MODULE RECURSIVE SUBROUTINE GetScalarValue(obj, val, args)
    CLASS(UserFunction_), INTENT(INOUT) :: obj
    REAL(DFP), INTENT(INOUT) :: val
    REAL(DFP), OPTIONAL, INTENT(IN) :: args(:)
  END SUBROUTINE GetScalarValue
END INTERFACE

Interface (Get vector value)

INTERFACE
  MODULE RECURSIVE SUBROUTINE GetVectorValue(obj, val, args)
    CLASS(UserFunction_), INTENT(INOUT) :: obj
    REAL(DFP), ALLOCATABLE, INTENT(INOUT) :: val(:)
    REAL(DFP), OPTIONAL, INTENT(IN) :: args(:)
  END SUBROUTINE GetVectorValue
END INTERFACE

Interface (Get matrix value)

INTERFACE
  MODULE RECURSIVE SUBROUTINE GetMatrixValue(obj, val, args)
    CLASS(UserFunction_), INTENT(INOUT) :: obj
    REAL(DFP), ALLOCATABLE, INTENT(INOUT) :: val(:, :)
    REAL(DFP), OPTIONAL, INTENT(IN) :: args(:)
  END SUBROUTINE GetMatrixValue
END INTERFACE