SABER
tools_sp Module Reference

Spectral transforms. More...

Functions/Subroutines

subroutine, public splat (IDRT, JMAX, SLAT, WLAT)
 Compute latitude functions. More...
 
subroutine lubksb (A, N, NP, INDX, B)
 Solves a system of linear equations, follows call to LUDCMP. More...
 
subroutine ludcmp (A, N, NP, INDX, D)
 Replaces an NxN matrix A with the LU decomposition. More...
 

Variables

real(kind=kind_real), parameter zero = 0.0_kind_real
 
real(kind=kind_real), parameter one = 1.0_kind_real
 
real(kind=kind_real), parameter two = 2.0_kind_real
 
real(kind=kind_real), parameter ten = 10.0_kind_real
 
real(kind=kind_real), parameter half = 0.5_kind_real
 
real(kind=kind_real), parameter quarter = 0.25_kind_real
 

Detailed Description

Spectral transforms.

Function/Subroutine Documentation

◆ lubksb()

subroutine tools_sp::lubksb ( real(kind=kind_real), dimension(np,np), intent(in)  A,
integer, intent(in)  N,
integer, intent(in)  NP,
integer, dimension(n), intent(in)  INDX,
real(kind=kind_real), dimension(n), intent(inout)  B 
)
private

Solves a system of linear equations, follows call to LUDCMP.

Parameters
[in]np?
[in]n?
[in]a?
[in,out]b?
[in]indx?

Definition at line 202 of file tools_sp.F90.

Here is the caller graph for this function:

◆ ludcmp()

subroutine tools_sp::ludcmp ( real(kind=kind_real), dimension(np,np), intent(inout)  A,
integer, intent(in)  N,
integer, intent(in)  NP,
integer, dimension(n), intent(out)  INDX,
real(kind=kind_real), intent(out), optional  D 
)
private

Replaces an NxN matrix A with the LU decomposition.

Parameters
[in]n?
[in]np?
[in,out]a?
[out]indx?
[out]d?

Definition at line 247 of file tools_sp.F90.

Here is the caller graph for this function:

◆ splat()

subroutine, public tools_sp::splat ( integer, intent(in)  IDRT,
integer, intent(in)  JMAX,
real(kind=kind_real), dimension(jmax), intent(out)  SLAT,
real(kind=kind_real), dimension(jmax), intent(out)  WLAT 
)

Compute latitude functions.

Parameters
[in]idrtGrid identifier
[in]jmaxNumber of latitudes
[out]slatSines of latitude
[out]wlatGaussian weights-

Definition at line 32 of file tools_sp.F90.

Here is the call graph for this function:
Here is the caller graph for this function:

Variable Documentation

◆ half

real(kind=kind_real), parameter tools_sp::half = 0.5_kind_real
private

Definition at line 21 of file tools_sp.F90.

◆ one

real(kind=kind_real), parameter tools_sp::one = 1.0_kind_real
private

Definition at line 18 of file tools_sp.F90.

◆ quarter

real(kind=kind_real), parameter tools_sp::quarter = 0.25_kind_real
private

Definition at line 22 of file tools_sp.F90.

◆ ten

real(kind=kind_real), parameter tools_sp::ten = 10.0_kind_real
private

Definition at line 20 of file tools_sp.F90.

◆ two

real(kind=kind_real), parameter tools_sp::two = 2.0_kind_real
private

Definition at line 19 of file tools_sp.F90.

◆ zero

real(kind=kind_real), parameter tools_sp::zero = 0.0_kind_real
private

Definition at line 17 of file tools_sp.F90.