A Modular Arbitrary-Order Ocean-Atmosphere Model -- Stochastic implementation
Data Types | Modules | Functions/Subroutines | Variables
inprod_analytic.f90 File Reference

Go to the source code of this file.

Data Types

type  inprod_analytic::atm_wavenum
 Atmospheric bloc specification type. More...
 
type  inprod_analytic::ocean_wavenum
 Oceanic bloc specification type. More...
 
type  inprod_analytic::atm_tensors
 Type holding the atmospheric inner products tensors. More...
 
type  inprod_analytic::ocean_tensors
 Type holding the oceanic inner products tensors. More...
 

Modules

module  inprod_analytic
 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.
 

Functions/Subroutines

real(kind=8) function inprod_analytic::b1 (Pi, Pj, Pk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::b2 (Pi, Pj, Pk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::delta (r)
 Integer Dirac delta function. More...
 
real(kind=8) function inprod_analytic::flambda (r)
 "Odd or even" function More...
 
real(kind=8) function inprod_analytic::s1 (Pj, Pk, Mj, Hk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::s2 (Pj, Pk, Mj, Hk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::s3 (Pj, Pk, Hj, Hk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::s4 (Pj, Pk, Hj, Hk)
 Cehelsky & Tung Helper functions. More...
 
real(kind=8) function inprod_analytic::calculate_a (i, j)
 Eigenvalues of the Laplacian (atmospheric) More...
 
real(kind=8) function inprod_analytic::calculate_b (i, j, k)
 Streamfunction advection terms (atmospheric) More...
 
real(kind=8) function inprod_analytic::calculate_c_atm (i, j)
 Beta term for the atmosphere. More...
 
real(kind=8) function inprod_analytic::calculate_d (i, j)
 Forcing of the ocean on the atmosphere. More...
 
real(kind=8) function inprod_analytic::calculate_g (i, j, k)
 Temperature advection terms (atmospheric) More...
 
real(kind=8) function inprod_analytic::calculate_s (i, j)
 Forcing (thermal) of the ocean on the atmosphere. More...
 
real(kind=8) function inprod_analytic::calculate_k (i, j)
 Forcing of the atmosphere on the ocean. More...
 
real(kind=8) function inprod_analytic::calculate_m (i, j)
 Forcing of the ocean fields on the ocean. More...
 
real(kind=8) function inprod_analytic::calculate_n (i, j)
 Beta term for the ocean. More...
 
real(kind=8) function inprod_analytic::calculate_o (i, j, k)
 Temperature advection term (passive scalar) More...
 
real(kind=8) function inprod_analytic::calculate_c_oc (i, j, k)
 Streamfunction advection terms (oceanic) More...
 
real(kind=8) function inprod_analytic::calculate_w (i, j)
 Short-wave radiative forcing of the ocean. More...
 
subroutine, public inprod_analytic::init_inprod
 Initialisation of the inner product. More...
 

Variables

type(atm_wavenum), dimension(:), allocatable, public inprod_analytic::awavenum
 Atmospheric blocs specification. More...
 
type(ocean_wavenum), dimension(:), allocatable, public inprod_analytic::owavenum
 Oceanic blocs specification. More...
 
type(atm_tensors), public inprod_analytic::atmos
 Atmospheric tensors. More...
 
type(ocean_tensors), public inprod_analytic::ocean
 Oceanic tensors. More...