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 |