![]() |
A Modular Arbitrary-Order Ocean-Atmosphere Model -- Stochastic implementation
|
The model parameters module. More...
Functions/Subroutines | |
subroutine, private | init_nml |
Read the basic parameters and mode selection from the namelist. More... | |
subroutine | init_params |
Parameters initialisation routine. More... | |
Variables | |
real(kind=8) | n |
\(n = 2 L_y / L_x\) - Aspect ratio More... | |
real(kind=8) | phi0 |
Latitude in radian. More... | |
real(kind=8) | rra |
Earth radius. More... | |
real(kind=8) | sig0 |
\(\sigma_0\) - Non-dimensional static stability of the atmosphere. More... | |
real(kind=8) | k |
Bottom atmospheric friction coefficient. More... | |
real(kind=8) | kp |
\(k'\) - Internal atmospheric friction coefficient. More... | |
real(kind=8) | r |
Frictional coefficient at the bottom of the ocean. More... | |
real(kind=8) | d |
Merchanical coupling parameter between the ocean and the atmosphere. More... | |
real(kind=8) | f0 |
\(f_0\) - Coriolis parameter More... | |
real(kind=8) | gp |
\(g'\)Reduced gravity More... | |
real(kind=8) | h |
Depth of the active water layer of the ocean. More... | |
real(kind=8) | phi0_npi |
Latitude exprimed in fraction of pi. More... | |
real(kind=8) | lambda |
\(\lambda\) - Sensible + turbulent heat exchange between the ocean and the atmosphere. More... | |
real(kind=8) | co |
\(C_a\) - Constant short-wave radiation of the ocean. More... | |
real(kind=8) | go |
\(\gamma_o\) - Specific heat capacity of the ocean. More... | |
real(kind=8) | ca |
\(C_a\) - Constant short-wave radiation of the atmosphere. More... | |
real(kind=8) | to0 |
\(T_o^0\) - Stationary solution for the 0-th order ocean temperature. More... | |
real(kind=8) | ta0 |
\(T_a^0\) - Stationary solution for the 0-th order atmospheric temperature. More... | |
real(kind=8) | epsa |
\(\epsilon_a\) - Emissivity coefficient for the grey-body atmosphere. More... | |
real(kind=8) | ga |
\(\gamma_a\) - Specific heat capacity of the atmosphere. More... | |
real(kind=8) | rr |
\(R\) - Gas constant of dry air More... | |
real(kind=8) | scale |
\(L_y = L \, \pi\) - The characteristic space scale. More... | |
real(kind=8) | pi |
\(\pi\) More... | |
real(kind=8) | lr |
\(L_R\) - Rossby deformation radius More... | |
real(kind=8) | g |
\(\gamma\) More... | |
real(kind=8) | rp |
\(r'\) - Frictional coefficient at the bottom of the ocean. More... | |
real(kind=8) | dp |
\(d'\) - Non-dimensional mechanical coupling parameter between the ocean and the atmosphere. More... | |
real(kind=8) | kd |
\(k_d\) - Non-dimensional bottom atmospheric friction coefficient. More... | |
real(kind=8) | kdp |
\(k'_d\) - Non-dimensional internal atmospheric friction coefficient. More... | |
real(kind=8) | cpo |
\(C'_a\) - Non-dimensional constant short-wave radiation of the ocean. More... | |
real(kind=8) | lpo |
\(\lambda'_o\) - Non-dimensional sensible + turbulent heat exchange from ocean to atmosphere. More... | |
real(kind=8) | cpa |
\(C'_a\) - Non-dimensional constant short-wave radiation of the atmosphere. More... | |
real(kind=8) | lpa |
\(\lambda'_a\) - Non-dimensional sensible + turbulent heat exchange from atmosphere to ocean. More... | |
real(kind=8) | sbpo |
\(\sigma'_{B,o}\) - Long wave radiation lost by ocean to atmosphere & space. More... | |
real(kind=8) | sbpa |
\(\sigma'_{B,a}\) - Long wave radiation from atmosphere absorbed by ocean. More... | |
real(kind=8) | lsbpo |
\(S'_{B,o}\) - Long wave radiation from ocean absorbed by atmosphere. More... | |
real(kind=8) | lsbpa |
\(S'_{B,a}\) - Long wave radiation lost by atmosphere to space & ocean. More... | |
real(kind=8) | l |
\(L\) - Domain length scale More... | |
real(kind=8) | sc |
Ratio of surface to atmosphere temperature. More... | |
real(kind=8) | sb |
Stefan–Boltzmann constant. More... | |
real(kind=8) | betp |
\(\beta'\) - Non-dimensional beta parameter More... | |
real(kind=8) | nua =0.D0 |
Dissipation in the atmosphere. More... | |
real(kind=8) | nuo =0.D0 |
Dissipation in the ocean. More... | |
real(kind=8) | nuap |
Non-dimensional dissipation in the atmosphere. More... | |
real(kind=8) | nuop |
Non-dimensional dissipation in the ocean. More... | |
real(kind=8) | t_trans |
Transient time period. More... | |
real(kind=8) | t_run |
Effective intergration time (length of the generated trajectory) More... | |
real(kind=8) | dt |
Integration time step. More... | |
real(kind=8) | tw |
Write all variables every tw time units. More... | |
logical | writeout |
Write to file boolean. More... | |
integer | nboc |
Number of atmospheric blocks. More... | |
integer | nbatm |
Number of oceanic blocks. More... | |
integer | natm =0 |
Number of atmospheric basis functions. More... | |
integer | noc =0 |
Number of oceanic basis functions. More... | |
integer | ndim |
Number of variables (dimension of the model) More... | |
integer, dimension(:,:), allocatable | oms |
Ocean mode selection array. More... | |
integer, dimension(:,:), allocatable | ams |
Atmospheric mode selection array. More... | |
The model parameters module.
|
private |
Read the basic parameters and mode selection from the namelist.
Definition at line 97 of file params.f90.
subroutine params::init_params | ( | ) |
integer, dimension(:,:), allocatable params::ams |
Atmospheric mode selection array.
Definition at line 87 of file params.f90.
real(kind=8) params::betp |
\(\beta'\) - Non-dimensional beta parameter
Definition at line 67 of file params.f90.
real(kind=8) params::ca |
\(C_a\) - Constant short-wave radiation of the atmosphere.
Definition at line 40 of file params.f90.
real(kind=8) params::co |
\(C_a\) - Constant short-wave radiation of the ocean.
Definition at line 38 of file params.f90.
real(kind=8) params::cpa |
\(C'_a\) - Non-dimensional constant short-wave radiation of the atmosphere.
Definition at line 58 of file params.f90.
real(kind=8) params::cpo |
\(C'_a\) - Non-dimensional constant short-wave radiation of the ocean.
Definition at line 56 of file params.f90.
real(kind=8) params::d |
Merchanical coupling parameter between the ocean and the atmosphere.
Definition at line 31 of file params.f90.
real(kind=8) params::dp |
\(d'\) - Non-dimensional mechanical coupling parameter between the ocean and the atmosphere.
Definition at line 52 of file params.f90.
real(kind=8) params::dt |
Integration time step.
Definition at line 77 of file params.f90.
real(kind=8) params::epsa |
\(\epsilon_a\) - Emissivity coefficient for the grey-body atmosphere.
Definition at line 43 of file params.f90.
real(kind=8) params::f0 |
\(f_0\) - Coriolis parameter
Definition at line 32 of file params.f90.
real(kind=8) params::g |
real(kind=8) params::ga |
\(\gamma_a\) - Specific heat capacity of the atmosphere.
Definition at line 44 of file params.f90.
real(kind=8) params::go |
\(\gamma_o\) - Specific heat capacity of the ocean.
Definition at line 39 of file params.f90.
real(kind=8) params::gp |
\(g'\)Reduced gravity
Definition at line 33 of file params.f90.
real(kind=8) params::h |
Depth of the active water layer of the ocean.
Definition at line 34 of file params.f90.
real(kind=8) params::k |
Bottom atmospheric friction coefficient.
Definition at line 28 of file params.f90.
real(kind=8) params::kd |
\(k_d\) - Non-dimensional bottom atmospheric friction coefficient.
Definition at line 53 of file params.f90.
real(kind=8) params::kdp |
\(k'_d\) - Non-dimensional internal atmospheric friction coefficient.
Definition at line 54 of file params.f90.
real(kind=8) params::kp |
\(k'\) - Internal atmospheric friction coefficient.
Definition at line 29 of file params.f90.
real(kind=8) params::l |
\(L\) - Domain length scale
Definition at line 64 of file params.f90.
real(kind=8) params::lambda |
\(\lambda\) - Sensible + turbulent heat exchange between the ocean and the atmosphere.
Definition at line 37 of file params.f90.
real(kind=8) params::lpa |
\(\lambda'_a\) - Non-dimensional sensible + turbulent heat exchange from atmosphere to ocean.
Definition at line 59 of file params.f90.
real(kind=8) params::lpo |
\(\lambda'_o\) - Non-dimensional sensible + turbulent heat exchange from ocean to atmosphere.
Definition at line 57 of file params.f90.
real(kind=8) params::lr |
\(L_R\) - Rossby deformation radius
Definition at line 49 of file params.f90.
real(kind=8) params::lsbpa |
\(S'_{B,a}\) - Long wave radiation lost by atmosphere to space & ocean.
Definition at line 63 of file params.f90.
real(kind=8) params::lsbpo |
\(S'_{B,o}\) - Long wave radiation from ocean absorbed by atmosphere.
Definition at line 62 of file params.f90.
real(kind=8) params::n |
\(n = 2 L_y / L_x\) - Aspect ratio
Definition at line 24 of file params.f90.
integer params::natm =0 |
Number of atmospheric basis functions.
Definition at line 83 of file params.f90.
integer params::nbatm |
Number of oceanic blocks.
Definition at line 82 of file params.f90.
integer params::nboc |
Number of atmospheric blocks.
Definition at line 81 of file params.f90.
integer params::ndim |
integer params::noc =0 |
Number of oceanic basis functions.
Definition at line 84 of file params.f90.
real(kind=8) params::nua =0.D0 |
Dissipation in the atmosphere.
Definition at line 69 of file params.f90.
real(kind=8) params::nuap |
Non-dimensional dissipation in the atmosphere.
Definition at line 72 of file params.f90.
real(kind=8) params::nuo =0.D0 |
Dissipation in the ocean.
Definition at line 70 of file params.f90.
real(kind=8) params::nuop |
Non-dimensional dissipation in the ocean.
Definition at line 73 of file params.f90.
integer, dimension(:,:), allocatable params::oms |
Ocean mode selection array.
Definition at line 86 of file params.f90.
real(kind=8) params::phi0 |
Latitude in radian.
Definition at line 25 of file params.f90.
real(kind=8) params::phi0_npi |
Latitude exprimed in fraction of pi.
Definition at line 35 of file params.f90.
real(kind=8) params::pi |
real(kind=8) params::r |
Frictional coefficient at the bottom of the ocean.
Definition at line 30 of file params.f90.
real(kind=8) params::rp |
\(r'\) - Frictional coefficient at the bottom of the ocean.
Definition at line 51 of file params.f90.
real(kind=8) params::rr |
\(R\) - Gas constant of dry air
Definition at line 45 of file params.f90.
real(kind=8) params::rra |
real(kind=8) params::sb |
Stefan–Boltzmann constant.
Definition at line 66 of file params.f90.
real(kind=8) params::sbpa |
\(\sigma'_{B,a}\) - Long wave radiation from atmosphere absorbed by ocean.
Definition at line 61 of file params.f90.
real(kind=8) params::sbpo |
\(\sigma'_{B,o}\) - Long wave radiation lost by ocean to atmosphere & space.
Definition at line 60 of file params.f90.
real(kind=8) params::sc |
Ratio of surface to atmosphere temperature.
Definition at line 65 of file params.f90.
real(kind=8) params::scale |
\(L_y = L \, \pi\) - The characteristic space scale.
Definition at line 47 of file params.f90.
real(kind=8) params::sig0 |
\(\sigma_0\) - Non-dimensional static stability of the atmosphere.
Definition at line 27 of file params.f90.
real(kind=8) params::t_run |
Effective intergration time (length of the generated trajectory)
Definition at line 76 of file params.f90.
real(kind=8) params::t_trans |
Transient time period.
Definition at line 75 of file params.f90.
real(kind=8) params::ta0 |
\(T_a^0\) - Stationary solution for the 0-th order atmospheric temperature.
Definition at line 42 of file params.f90.
real(kind=8) params::to0 |
\(T_o^0\) - Stationary solution for the 0-th order ocean temperature.
Definition at line 41 of file params.f90.
real(kind=8) params::tw |
Write all variables every tw time units.
Definition at line 78 of file params.f90.
logical params::writeout |
Write to file boolean.
Definition at line 79 of file params.f90.