Functions/Subroutines
subroutine, public	lonlatmod (lon, lat)

subroutine, public	sphere_dist (lon_i, lat_i, lon_f, lat_f, dist)

subroutine, public	reduce_arc (lon_i, lat_i, lon_f, lat_f, maxdist, dist)

subroutine, public	vector_product (v1, v2, vp)

subroutine, public	vector_triple_product (v1, v2, v3, p)

subroutine, public	add (value, cumul, num, wgt)

subroutine, public	divide (value, num)

subroutine, public	fit_diag (mpl, nc3, nl0r, nl0, l0rl0_to_l0, disth, distv, rh, rv, fit)

subroutine, public	fit_diag_dble (mpl, nc3, nl0r, nl0, l0rl0_to_l0, disth, distv, rh, rv, rv_rfac, rv_coef, fit)

real(kind_real) function, public	gc99 (mpl, distnorm)

subroutine, public	fit_lct (mpl, nc, nl0, dx, dy, dz, dmask, nscales, D, coef, fit)

subroutine, public	lct_d2h (mpl, D11, D22, D33, D12, H11, H22, H33, H12)

subroutine, public	check_cond (d1, d2, nod, valid)

real(kind_real) function	matern (mpl, M, x)

subroutine, public	cholesky (mpl, n, a, u)

subroutine, public	syminv (mpl, n, a, c)

Variables
real(kind_real), parameter, public	gc2gau = 0.28

real(kind_real), parameter, public	gau2gc = 3.57

real(kind_real), parameter, public	dmin = 1.0e-12_kind_real

real(kind_real), parameter	condmax = 1.0e2

integer, parameter, public	m = 0

Function/Subroutine Documentation

◆ add()

subroutine, public tools_func::add	(	real(kind_real), intent(in)	value,
		real(kind_real), intent(inout)	cumul,
		real(kind_real), intent(inout)	num,
		real(kind_real), intent(in), optional	wgt
	)

Definition at line 185 of file tools_func.F90.

Here is the caller graph for this function:

◆ check_cond()

subroutine, public tools_func::check_cond	(	real(kind_real), intent(in)	d1,
		real(kind_real), intent(in)	d2,
		real(kind_real), intent(in)	nod,
		logical, intent(out)	valid
	)

Definition at line 661 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ cholesky()

subroutine, public tools_func::cholesky	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	n,
		real(kind_real), dimension(n,n), intent(in)	a,
		real(kind_real), dimension(n,n), intent(out)	u
	)

Definition at line 745 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ divide()

subroutine, public tools_func::divide	(	real(kind_real), intent(inout)	value,
		real(kind_real), intent(in)	num
	)

Definition at line 214 of file tools_func.F90.

◆ fit_diag()

subroutine, public tools_func::fit_diag	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	nc3,
		integer, intent(in)	nl0r,
		integer, intent(in)	nl0,
		integer, dimension(nl0r,nl0), intent(in)	l0rl0_to_l0,
		real(kind_real), dimension(nc3), intent(in)	disth,
		real(kind_real), dimension(nl0,nl0), intent(in)	distv,
		real(kind_real), dimension(nl0), intent(in)	rh,
		real(kind_real), dimension(nl0), intent(in)	rv,
		real(kind_real), dimension(nc3,nl0r,nl0), intent(out)	fit
	)

Definition at line 235 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fit_diag_dble()

subroutine, public tools_func::fit_diag_dble	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	nc3,
		integer, intent(in)	nl0r,
		integer, intent(in)	nl0,
		integer, dimension(nl0r,nl0), intent(in)	l0rl0_to_l0,
		real(kind_real), dimension(nc3), intent(in)	disth,
		real(kind_real), dimension(nl0,nl0), intent(in)	distv,
		real(kind_real), dimension(nl0), intent(in)	rh,
		real(kind_real), dimension(nl0), intent(in)	rv,
		real(kind_real), dimension(nl0), intent(in)	rv_rfac,
		real(kind_real), dimension(nl0), intent(in)	rv_coef,
		real(kind_real), dimension(nc3,nl0r,nl0), intent(out)	fit
	)

Definition at line 369 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ fit_lct()

subroutine, public tools_func::fit_lct	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	nc,
		integer, intent(in)	nl0,
		real(kind_real), dimension(nc,nl0), intent(in)	dx,
		real(kind_real), dimension(nc,nl0), intent(in)	dy,
		real(kind_real), dimension(nc,nl0), intent(in)	dz,
		logical, dimension(nc,nl0), intent(in)	dmask,
		integer, intent(in)	nscales,
		real(kind_real), dimension(4,nscales), intent(in)	D,
		real(kind_real), dimension(nscales), intent(in)	coef,
		real(kind_real), dimension(nc,nl0), intent(out)	fit
	)

Definition at line 548 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ gc99()

real(kind_real) function, public tools_func::gc99	(	type(mpl_type), intent(in)	mpl,
		real(kind_real), intent(in)	distnorm
	)

Definition at line 518 of file tools_func.F90.

Here is the caller graph for this function:

◆ lct_d2h()

subroutine, public tools_func::lct_d2h	(	type(mpl_type), intent(in)	mpl,
		real(kind_real), intent(in)	D11,
		real(kind_real), intent(in)	D22,
		real(kind_real), intent(in)	D33,
		real(kind_real), intent(in)	D12,
		real(kind_real), intent(out)	H11,
		real(kind_real), intent(out)	H22,
		real(kind_real), intent(out)	H33,
		real(kind_real), intent(out)	H12
	)

Definition at line 620 of file tools_func.F90.

Here is the caller graph for this function:

◆ lonlatmod()

subroutine, public tools_func::lonlatmod	(	real(kind_real), intent(inout)	lon,
		real(kind_real), intent(inout)	lat
	)

Definition at line 37 of file tools_func.F90.

Here is the caller graph for this function:

◆ matern()

real(kind_real) function tools_func::matern	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	M,
		real(kind_real), intent(in)	x
	)

private

Definition at line 702 of file tools_func.F90.

Here is the caller graph for this function:

◆ reduce_arc()

subroutine, public tools_func::reduce_arc	(	real(kind_real), intent(in)	lon_i,
		real(kind_real), intent(in)	lat_i,
		real(kind_real), intent(inout)	lon_f,
		real(kind_real), intent(inout)	lat_f,
		real(kind_real), intent(in)	maxdist,
		real(kind_real), intent(out)	dist
	)

Definition at line 94 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ sphere_dist()

subroutine, public tools_func::sphere_dist	(	real(kind_real), intent(in)	lon_i,
		real(kind_real), intent(in)	lat_i,
		real(kind_real), intent(in)	lon_f,
		real(kind_real), intent(in)	lat_f,
		real(kind_real), intent(out)	dist
	)

Definition at line 67 of file tools_func.F90.

Here is the caller graph for this function:

◆ syminv()

subroutine, public tools_func::syminv	(	type(mpl_type), intent(in)	mpl,
		integer, intent(in)	n,
		real(kind_real), dimension(n,n), intent(in)	a,
		real(kind_real), dimension(n,n), intent(out)	c
	)

Definition at line 793 of file tools_func.F90.

Here is the call graph for this function:

Here is the caller graph for this function:

◆ vector_product()

subroutine, public tools_func::vector_product	(	real(kind_real), dimension(3), intent(in)	v1,
		real(kind_real), dimension(3), intent(in)	v2,
		real(kind_real), dimension(3), intent(out)	vp
	)

Definition at line 131 of file tools_func.F90.

Here is the caller graph for this function:

◆ vector_triple_product()

subroutine, public tools_func::vector_triple_product	(	real(kind_real), dimension(3), intent(in)	v1,
		real(kind_real), dimension(3), intent(in)	v2,
		real(kind_real), dimension(3), intent(in)	v3,
		real(kind_real), intent(out)	p
	)

Definition at line 158 of file tools_func.F90.

Here is the caller graph for this function:

Variable Documentation

◆ condmax

real(kind_real), parameter tools_func::condmax = 1.0e2

Definition at line 22 of file tools_func.F90.

◆ dmin

real(kind_real), parameter, public tools_func::dmin = 1.0e-12_kind_real

Definition at line 21 of file tools_func.F90.

◆ gau2gc

real(kind_real), parameter, public tools_func::gau2gc = 3.57

Definition at line 20 of file tools_func.F90.

◆ gc2gau

real(kind_real), parameter, public tools_func::gc2gau = 0.28

Definition at line 19 of file tools_func.F90.

◆ m

integer, parameter, public tools_func::m = 0

Definition at line 23 of file tools_func.F90.

Functions/Subroutines

Variables

Function/Subroutine Documentation

◆ add()

◆ check_cond()

◆ cholesky()

◆ divide()

◆ fit_diag()

◆ fit_diag_dble()

◆ fit_lct()

◆ gc99()

◆ lct_d2h()

◆ lonlatmod()

◆ matern()

◆ reduce_arc()

◆ sphere_dist()

◆ syminv()

◆ vector_product()

◆ vector_triple_product()

Variable Documentation

◆ condmax

◆ dmin

◆ gau2gc

◆ gc2gau

◆ m