constructor Function

  1. dallaston2015_glacier.F90
  2. dallaston2015_glacier_boundary_mod
  3. constructor

private pure function constructor(thickness, velocity, chi) result(this)

Constructs a boundary condition object for an ice shelf based on the conditions used in Dallaston et al. (2015).

Arguments

Type IntentOptional AttributesName
real(kind=r8), intent(in) :: thickness

The ice thickness at the inflowing ice shelf boundary
real(kind=r8), intent(in) :: velocity

The longitudinal ice velocity at the inflowing ice shelf boundary
real(kind=r8), intent(in) :: chi

The dimensionless ratio $\chi \equiv \frac{\rho_igh_0x_x}{2\eta_0u_0}$

Return Value type(dallaston2015_glacier_boundary)


Called by

proc~~constructor~17~~CalledByGraph proc~constructor~17 constructor interface~dallaston2015_glacier_boundary dallaston2015_glacier_boundary interface~dallaston2015_glacier_boundary->proc~constructor~17

Contents

Source Code

constructor

Source Code

  pure function constructor(thickness, velocity, chi) result(this)
    !* Author: Chris MacMackin
    !  Date: November 2016
    !
    ! Constructs a boundary condition object for an ice shelf based on
    ! the conditions used in Dallaston et al. (2015).
    !
    real(r8), intent(in) :: thickness
      !! The ice thickness at the inflowing ice shelf boundary
    real(r8), intent(in) :: velocity
      !! The longitudinal ice velocity at the inflowing ice shelf boundary
    real(r8), intent(in) :: chi
      !! The dimensionless ratio
      !! $\chi \equiv \frac{\rho_igh_0x_x}{2\eta_0u_0}$
    type(dallaston2015_glacier_boundary) :: this
    this%thickness = thickness
    this%velocity = velocity
    this%chi = chi
  end function constructor