bound_type Function

private pure function bound_type(this)

Default implementation of the methods getting the boundary types for a glacier. It returns an array which indicates free boundaries.

Arguments

Type IntentOptional AttributesName
class(glacier_boundary), intent(in) :: this

Return Value integer, dimension(:),allocatable


Contents

Source Code


Source Code

  pure function bound_type(this)
    !* Author: Chris MacMackin
    !  Date: January 2017
    !
    ! Default implementation of the methods getting the boundary types
    ! for a glacier.  It returns an array which indicates free
    ! boundaries.
    !
    class(glacier_boundary), intent(in) :: this
    integer, dimension(:), allocatable  :: bound_type
    bound_type = [free_boundary, free_boundary]
  end function bound_type