Spectral transforms.
More...
|
| 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...
|
| |
|
| 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 |
| |
◆ 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.
◆ 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.
◆ 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] | idrt | Grid identifier |
| [in] | jmax | Number of latitudes |
| [out] | slat | Sines of latitude |
| [out] | wlat | Gaussian weights- |
Definition at line 32 of file tools_sp.F90.
◆ half
| real(kind=kind_real), parameter tools_sp::half = 0.5_kind_real |
|
private |
◆ one
| real(kind=kind_real), parameter tools_sp::one = 1.0_kind_real |
|
private |
◆ quarter
| real(kind=kind_real), parameter tools_sp::quarter = 0.25_kind_real |
|
private |
◆ ten
| real(kind=kind_real), parameter tools_sp::ten = 10.0_kind_real |
|
private |
◆ two
| real(kind=kind_real), parameter tools_sp::two = 2.0_kind_real |
|
private |
◆ zero
| real(kind=kind_real), parameter tools_sp::zero = 0.0_kind_real |
|
private |