get_viscosity Abstract Interface

  1. viscosity.F90
  2. viscosity_mod
  3. get_viscosity

abstract interface
private function get_viscosity(this, velocity, temperature, time) result(property)

Arguments

Type IntentOptional AttributesName
class(abstract_viscosity), intent(in) :: this
class(vector_field), intent(in) :: velocity

The velocity field of the ice for which the velocity is being calculated
real(kind=r8), intent(in) :: temperature

The temperature of the ice for which viscosity is being calculated.
real(kind=r8), intent(in), optional :: time

The time at which the viscosity is being calculated. If not present then assumed to be same as previous value passed.

Return Value class(scalar_field), pointer

The value of the viscosity