MOM6
MOM_CoriolisAdv.F90 File Reference
#include <MOM_memory.h>
#include "version_variable.h"
Include dependency graph for MOM_CoriolisAdv.F90:

Go to the source code of this file.

Data Types

type  mom_coriolisadv::coriolisadv_cs
 Control structure for mom_coriolisadv. More...
 

Modules

module  mom_coriolisadv
 Accelerations due to the Coriolis force and momentum advection.
 
integer, parameter mom_coriolisadv::sadourny75_energy = 1
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::arakawa_hsu90 = 2
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::robust_enstro = 3
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::sadourny75_enstro = 4
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::arakawa_lamb81 = 5
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::al_blend = 6
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::sadourny75_energy_string = "SADOURNY75_ENERGY"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::arakawa_hsu_string = "ARAKAWA_HSU90"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::robust_enstro_string = "ROBUST_ENSTRO"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::sadourny75_enstro_string = "SADOURNY75_ENSTRO"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::arakawa_lamb_string = "ARAKAWA_LAMB81"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::al_blend_string = "ARAKAWA_LAMB_BLEND"
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::ke_arakawa = 10
 Enumeration values for KE_Scheme. More...
 
integer, parameter mom_coriolisadv::ke_simple_gudonov = 11
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::ke_gudonov = 12
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::ke_arakawa_string = "KE_ARAKAWA"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::ke_simple_gudonov_string = "KE_SIMPLE_GUDONOV"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::ke_gudonov_string = "KE_GUDONOV"
 Enumeration values for Coriolis_Scheme. More...
 
integer, parameter mom_coriolisadv::pv_adv_centered = 21
 Enumeration values for PV_Adv_Scheme. More...
 
integer, parameter mom_coriolisadv::pv_adv_upwind1 = 22
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::pv_adv_centered_string = "PV_ADV_CENTERED"
 Enumeration values for Coriolis_Scheme. More...
 
character *(20), parameter mom_coriolisadv::pv_adv_upwind1_string = "PV_ADV_UPWIND1"
 Enumeration values for Coriolis_Scheme. More...
 
subroutine, public mom_coriolisadv::coradcalc (u, v, h, uh, vh, CAu, CAv, OBC, AD, G, GV, US, CS)
 Calculates the Coriolis and momentum advection contributions to the acceleration. More...
 
subroutine mom_coriolisadv::gradke (u, v, h, KE, KEx, KEy, k, OBC, G, US, CS)
 Calculates the acceleration due to the gradient of kinetic energy. More...
 
subroutine, public mom_coriolisadv::coriolisadv_init (Time, G, GV, US, param_file, diag, AD, CS)
 Initializes the control structure for coriolisadv_cs. More...
 
subroutine, public mom_coriolisadv::coriolisadv_end (CS)
 Destructor for coriolisadv_cs. More...