dallaston2015_upper_bound Function

  1. dallaston2015_glacier.F90
  2. dallaston2015_glacier_boundary_mod
  3. dallaston2015_upper_bound

private pure function dallaston2015_upper_bound(this) result(bound_array)

Indicates that one layer of cells at the upper boundary in the first dimension should be omitted for thickness. This is appropriate for Dirichlet boundary conditions.

Arguments

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

Return Value integer, dimension(2)


Contents

Source Code

dallaston2015_upper_bound

Source Code

  pure function dallaston2015_upper_bound(this) result(bound_array)
    !* Author: Chris MacMackin
    !  Date: November 2016
    !
    ! Indicates that one layer of cells at the upper boundary in the
    ! first dimension should be omitted for thickness. This is
    ! appropriate for Dirichlet boundary conditions.
    !
    class(dallaston2015_glacier_boundary), intent(in) :: this
    integer, dimension(2) :: bound_array
    bound_array = [1,0]
  end function dallaston2015_upper_bound