transverse_coefficients_mod

Provides functions to calculate the coefficients for the horizontally-integrated [asymmetric_plume] from the basal slope of the ice shelf. This module just provides the interface. The implmentation is automatically generated by the Python script XXXXXXXX based on various parameter choices, approximating the coefficients using interpolation.

Uses

- iso_fortran_env
- factual_mod
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses.

Interfaces

interface

public function alpha_du(b_x)

Interpolates the value of $\alpha_{DU} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_U(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_du2(b_x)

Interpolates the value of $\alpha_{DU^2} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_U(y)^2dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_d2(b_x)

Interpolates the value of $\alpha_{D^2} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)^2dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_dv(b_x)

Interpolates the value of $\alpha_{DV} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_V(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_duv(b_x)

Interpolates the value of $\alpha_{DUV} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_U(y)f_V(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_uvecu(b_x)

Interpolates the value of $\alpha_{|\vec{U}|U} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_{|\vec{U}|}(y)f_U(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_uvecv(b_x)

Interpolates the value of $\alpha_{|\vec{U}|V} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_{|\vec{U}|}(y)f_V(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_dus(b_x)

Interpolates the value of $\alpha_{DUS} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_U(y)f_S(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_dut(b_x)

Interpolates the value of $\alpha_{DUT} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_U(y)f_T(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_uvect(b_x)

Interpolates the value of $\alpha_{|\vec{U}|T} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_{|\vec{U}|}(y)f_{T}(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_ds(b_x)

Interpolates the value of $\alpha_{DS} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_S(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_dt(b_x)

Interpolates the value of $\alpha_{DT} = \frac{1}{\Delta y}\int^{y_2}_{y_1}f_D(y)f_T(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_ds_t(b_x)

Interpolates the value of $\tilde{\alpha}_{DS} = \frac{1}{\Delta y\alpha_{D^2}}\int^{y_2}_{y_1}f_D(y)^2f_S(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value real

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function alpha_dt_t(b_x)

Interpolates the value of $\tilde{\alpha}_{DT} = \frac{1}{\Delta y\alpha_{D^2}}\int^{y_2}_{y_1}f_D(y)^2f_T(y)dy$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_d(b_x)

Interpolates the value of $f_D(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_u(b_x)

Interpolates the value of $f_U(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_v(b_x)

Interpolates the value of $f_V(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_s(b_x)

Interpolates the value of $f_S(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_t(b_x)

Interpolates the value of $f_T(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_u_p(b_x)

Interpolates the value of $f'_U(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_v_p(b_x)

Interpolates the value of $f'_V(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_s_p(b_x)

Interpolates the value of $f'_S(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

public function f_t_p(b_x)

Interpolates the value of $f'_T(y_2)$ for the given shelf slope.

Arguments

Type Intent Optional Attributes Name

class(scalar_field), intent(in) :: b_x

Return Value class(scalar_field), pointer

Type	Intent	Optional	Attributes		Name
class(scalar_field),	intent(in)			::	b_x

interface

private subroutine splev(t, n, c, k, x, y, m, e, ier)

Subroutine splev evaluates in a number of points x(i),i=1,2,...,m a spline s(x) of degree k, given in its b-spline representation.

Arguments

Type	Intent	Attributes		Name
real(kind=r8),	intent(in),	dimension(*)	::	t	Array, length n, which contains the position of the knots.
integer,	intent(in)		::	n	Integer, giving the total number of knots of s(x).
real(kind=r8),	intent(in),	dimension(*)	::	c	Array, length n, which contains the b-spline coefficients.
integer,	intent(in)		::	k	Integer, giving the degree of s(x).
real(kind=r8),	intent(in),	dimension(*)	::	x	Array, length m, which contains the points where s(x) must be evaluated.
real(kind=r8),	intent(out),	dimension(*)	::	y	Array, length m, giving the value of s(x) at the different points.
integer,	intent(in)		::	m	Integer, giving the number of points where s(x) must be evaluated.
integer,	intent(in)		::	e	integer, if 0 the spline is extrapolated from the end spans for points not in the support, if 1 the spline evaluates to zero for those points, if 2 ier is set to 1 and the subroutine returns, and if 3 the spline evaluates to the value of the nearest boundary point.
integer,	intent(out)		::	ier	Error flag: ier = 0: normal return ier = 1: argument out of bounds and e == 2 ier =10: invalid input data (see restrictions)

transverse_coefficients_mod Module

Contents

Interfaces

Uses

Contents

Interfaces

Interfaces

interface

public function alpha_du(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_du2(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_d2(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_dv(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_duv(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_uvecu(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_uvecv(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_dus(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_dut(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_uvect(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_ds(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_dt(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function alpha_ds_t(b_x)

Arguments

Return Value real

interface

public function alpha_dt_t(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function f_d(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function f_u(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function f_v(b_x)

Arguments

Return Value class(scalar_field), pointer

interface

public function f_s(b_x)

Arguments

Return Value class(scalar_field), pointer

interface