![]() |
A Modular Arbitrary-Order Ocean-Atmosphere Model -- Stochastic implementation
|
Inner products between the truncated set of basis functions for the ocean and atmosphere streamfunction fields. These are partly calculated using the analytical expressions from Cehelsky, P., & Tung, K. K. : Theories of multiple equilibria and weather regimes-A critical reexamination. Part II: Baroclinic two-layer models. Journal of the atmospheric sciences, 44(21), 3282-3303, 1987. More...
Data Types | |
type | atm_tensors |
Type holding the atmospheric inner products tensors. More... | |
type | atm_wavenum |
Atmospheric bloc specification type. More... | |
type | ocean_tensors |
Type holding the oceanic inner products tensors. More... | |
type | ocean_wavenum |
Oceanic bloc specification type. More... | |
Functions/Subroutines | |
real(kind=8) function | b1 (Pi, Pj, Pk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | b2 (Pi, Pj, Pk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | delta (r) |
Integer Dirac delta function. More... | |
real(kind=8) function | flambda (r) |
"Odd or even" function More... | |
real(kind=8) function | s1 (Pj, Pk, Mj, Hk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | s2 (Pj, Pk, Mj, Hk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | s3 (Pj, Pk, Hj, Hk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | s4 (Pj, Pk, Hj, Hk) |
Cehelsky & Tung Helper functions. More... | |
real(kind=8) function | calculate_a (i, j) |
Eigenvalues of the Laplacian (atmospheric) More... | |
real(kind=8) function | calculate_b (i, j, k) |
Streamfunction advection terms (atmospheric) More... | |
real(kind=8) function | calculate_c_atm (i, j) |
Beta term for the atmosphere. More... | |
real(kind=8) function | calculate_d (i, j) |
Forcing of the ocean on the atmosphere. More... | |
real(kind=8) function | calculate_g (i, j, k) |
Temperature advection terms (atmospheric) More... | |
real(kind=8) function | calculate_s (i, j) |
Forcing (thermal) of the ocean on the atmosphere. More... | |
real(kind=8) function | calculate_k (i, j) |
Forcing of the atmosphere on the ocean. More... | |
real(kind=8) function | calculate_m (i, j) |
Forcing of the ocean fields on the ocean. More... | |
real(kind=8) function | calculate_n (i, j) |
Beta term for the ocean. More... | |
real(kind=8) function | calculate_o (i, j, k) |
Temperature advection term (passive scalar) More... | |
real(kind=8) function | calculate_c_oc (i, j, k) |
Streamfunction advection terms (oceanic) More... | |
real(kind=8) function | calculate_w (i, j) |
Short-wave radiative forcing of the ocean. More... | |
subroutine, public | init_inprod |
Initialisation of the inner product. More... | |
Variables | |
type(atm_wavenum), dimension(:), allocatable, public | awavenum |
Atmospheric blocs specification. More... | |
type(ocean_wavenum), dimension(:), allocatable, public | owavenum |
Oceanic blocs specification. More... | |
type(atm_tensors), public | atmos |
Atmospheric tensors. More... | |
type(ocean_tensors), public | ocean |
Oceanic tensors. More... | |
Inner products between the truncated set of basis functions for the ocean and atmosphere streamfunction fields. These are partly calculated using the analytical expressions from Cehelsky, P., & Tung, K. K. : Theories of multiple equilibria and weather regimes-A critical reexamination. Part II: Baroclinic two-layer models. Journal of the atmospheric sciences, 44(21), 3282-3303, 1987.
|
private |
Cehelsky & Tung Helper functions.
Definition at line 100 of file inprod_analytic.f90.
|
private |
Cehelsky & Tung Helper functions.
Definition at line 106 of file inprod_analytic.f90.
|
private |
Eigenvalues of the Laplacian (atmospheric)
\( a_{i,j} = (F_i, \nabla^2 F_j)\) .
Definition at line 164 of file inprod_analytic.f90.
|
private |
Streamfunction advection terms (atmospheric)
\( b_{i,j,k} = (F_i, J(F_j, \nabla^2 F_k))\) .
Definition at line 178 of file inprod_analytic.f90.
|
private |
Beta term for the atmosphere.
\( c_{i,j} = (F_i, \partial_x F_j)\) .
Definition at line 188 of file inprod_analytic.f90.
|
private |
Streamfunction advection terms (oceanic)
\( C_{i,j,k} = (\eta_i, J(\eta_j,\nabla^2 \eta_k))\) .
Definition at line 412 of file inprod_analytic.f90.
|
private |
Forcing of the ocean on the atmosphere.
\( d_{i,j} = (F_i, \nabla^2 \eta_j)\) .
Definition at line 208 of file inprod_analytic.f90.
|
private |
Temperature advection terms (atmospheric)
\( g_{i,j,k} = (F_i, J(F_j, F_k))\) .
Definition at line 218 of file inprod_analytic.f90.
|
private |
Forcing of the atmosphere on the ocean.
\( K_{i,j} = (\eta_i, \nabla^2 F_j)\) .
Definition at line 336 of file inprod_analytic.f90.
|
private |
Forcing of the ocean fields on the ocean.
\( M_{i,j} = (eta_i, \nabla^2 \eta_j)\) .
Definition at line 345 of file inprod_analytic.f90.
|
private |
Beta term for the ocean.
\( N_{i,j} = (\eta_i, \partial_x \eta_j) \).
Definition at line 359 of file inprod_analytic.f90.
|
private |
Temperature advection term (passive scalar)
\( O_{i,j,k} = (\eta_i, J(\eta_j, \eta_k))\) .
Definition at line 377 of file inprod_analytic.f90.
|
private |
Forcing (thermal) of the ocean on the atmosphere.
\( s_{i,j} = (F_i, \eta_j)\) .
Definition at line 303 of file inprod_analytic.f90.
|
private |
Short-wave radiative forcing of the ocean.
\( W_{i,j} = (\eta_i, F_j)\) .
Definition at line 422 of file inprod_analytic.f90.
|
private |
Integer Dirac delta function.
Definition at line 112 of file inprod_analytic.f90.
|
private |
"Odd or even" function
Definition at line 122 of file inprod_analytic.f90.
subroutine, public inprod_analytic::init_inprod | ( | ) |
|
private |
Cehelsky & Tung Helper functions.
Definition at line 132 of file inprod_analytic.f90.
|
private |
Cehelsky & Tung Helper functions.
Definition at line 138 of file inprod_analytic.f90.
|
private |
Cehelsky & Tung Helper functions.
Definition at line 144 of file inprod_analytic.f90.
|
private |
Cehelsky & Tung Helper functions.
Definition at line 150 of file inprod_analytic.f90.
type(atm_tensors), public inprod_analytic::atmos |
Atmospheric tensors.
Definition at line 78 of file inprod_analytic.f90.
type(atm_wavenum), dimension(:), allocatable, public inprod_analytic::awavenum |
Atmospheric blocs specification.
Definition at line 73 of file inprod_analytic.f90.
type(ocean_tensors), public inprod_analytic::ocean |
Oceanic tensors.
Definition at line 80 of file inprod_analytic.f90.
type(ocean_wavenum), dimension(:), allocatable, public inprod_analytic::owavenum |
Oceanic blocs specification.
Definition at line 75 of file inprod_analytic.f90.