inprod_analytic.f90 File Reference

A Modular Arbitrary-Order Ocean-Atmosphere Model -- Stochastic implementation

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