MOM6
Public variables and constants | List of all members
mom_internal_tides::int_tide_cs Type Reference

Detailed Description

Definition at line 81 of file MOM_internal_tides.F90.

Collaboration diagram for mom_internal_tides::int_tide_cs:
[legend]

Public variables and constants

logical do_int_tides
 
integer nfreq = 0
 
integer nmode = 1
 
integer nangle = 24
 
integer energized_angle = -1
 
logical corner_adv
 
logical upwind_1st
 
logical simple_2nd
 
logical vol_cfl
 
logical use_ppmang
 
real, dimension(:,:), allocatable refl_angle
 
real nullangle = -999.9
 
real, dimension(:,:), allocatable refl_pref
 
logical, dimension(:,:), allocatable refl_pref_logical
 
logical, dimension(:,:), allocatable refl_dbl
 
real, dimension(:,:,:,:), allocatable cp
 
real, dimension(:,:,:,:,:), allocatable tke_leak_loss
 
real, dimension(:,:,:,:,:), allocatable tke_quad_loss
 
real, dimension(:,:,:,:,:), allocatable tke_froude_loss
 
real, dimension(:,:), allocatable tke_itidal_loss_fixed
 
real, dimension(:,:,:,:,:), allocatable tke_itidal_loss
 
real, dimension(:,:), allocatable tot_leak_loss
 
real, dimension(:,:), allocatable tot_quad_loss
 
real, dimension(:,:), allocatable tot_itidal_loss
 
real, dimension(:,:), allocatable tot_froude_loss
 
real, dimension(:,:), allocatable tot_allprocesses_loss
 
real q_itides
 
real en_sum
 
type(time_type), pointer time
 
character(len=200) inputdir
 
real decay_rate
 
real cdrag
 
logical apply_background_drag
 
logical apply_bottom_drag
 
logical apply_wave_drag
 
logical apply_froude_drag
 
real, dimension(:,:,:,:,:), pointer en
 
real, dimension(:,:,:), pointer en_restart
 
real, dimension(:), allocatable frequency
 
real int_tide_source_x
 
real int_tide_source_y
 
type(diag_ctrl), pointer diag
 
type(wave_structure_cs), pointer wave_structure_csp => NULL()
 
integer id_itide_drag = -1
 
integer id_refl_pref = -1
 
integer id_refl_ang = -1
 
integer id_land_mask = -1
 
integer id_dx_cv = -1
 
integer id_dy_cu = -1
 
integer id_tke_itidal_input = -1
 
integer id_tot_en = -1
 
integer id_tot_leak_loss = -1
 
integer id_tot_quad_loss = -1
 
integer id_tot_itidal_loss = -1
 
integer id_tot_froude_loss = -1
 
integer id_tot_allprocesses_loss = -1
 
integer, dimension(:,:), allocatable id_en_mode
 
integer, dimension(:,:), allocatable id_itidal_loss_mode
 
integer, dimension(:,:), allocatable id_allprocesses_loss_mode
 
integer, dimension(:,:), allocatable id_ub_mode
 
integer, dimension(:,:), allocatable id_cp_mode
 
integer, dimension(:,:), allocatable id_en_ang_mode
 
integer, dimension(:,:), allocatable id_itidal_loss_ang_mode
 

Variables and constants

◆ apply_background_drag

logical mom_internal_tides::int_tide_cs::apply_background_drag

Definition at line 139 of file MOM_internal_tides.F90.

139  logical :: apply_background_drag

◆ apply_bottom_drag

logical mom_internal_tides::int_tide_cs::apply_bottom_drag

Definition at line 141 of file MOM_internal_tides.F90.

141  logical :: apply_bottom_drag

◆ apply_froude_drag

logical mom_internal_tides::int_tide_cs::apply_froude_drag

Definition at line 146 of file MOM_internal_tides.F90.

146  logical :: apply_froude_drag

◆ apply_wave_drag

logical mom_internal_tides::int_tide_cs::apply_wave_drag

Definition at line 143 of file MOM_internal_tides.F90.

143  logical :: apply_wave_drag

◆ cdrag

real mom_internal_tides::int_tide_cs::cdrag

Definition at line 138 of file MOM_internal_tides.F90.

138  real :: cdrag ! The bottom drag coefficient for MEKE (non-dim).

◆ corner_adv

logical mom_internal_tides::int_tide_cs::corner_adv

Definition at line 87 of file MOM_internal_tides.F90.

87  logical :: corner_adv ! If true, use a corner advection rather than PPM.

◆ cp

real, dimension(:,:,:,:), allocatable mom_internal_tides::int_tide_cs::cp

Definition at line 113 of file MOM_internal_tides.F90.

113  real, allocatable, dimension(:,:,:,:) :: cp

◆ decay_rate

real mom_internal_tides::int_tide_cs::decay_rate

Definition at line 136 of file MOM_internal_tides.F90.

136  real :: decay_rate ! A constant rate at which internal tide energy is

◆ diag

type(diag_ctrl), pointer mom_internal_tides::int_tide_cs::diag

Definition at line 164 of file MOM_internal_tides.F90.

164  type(diag_ctrl), pointer :: diag ! A structure that is used to regulate the

◆ do_int_tides

logical mom_internal_tides::int_tide_cs::do_int_tides

Definition at line 82 of file MOM_internal_tides.F90.

82  logical :: do_int_tides ! If true, use the internal tide code.

◆ en

real, dimension(:,:,:,:,:), pointer mom_internal_tides::int_tide_cs::en

Definition at line 148 of file MOM_internal_tides.F90.

148  real, dimension(:,:,:,:,:), pointer :: &
149  en ! The internal wave energy density as a function of

◆ en_restart

real, dimension(:,:,:), pointer mom_internal_tides::int_tide_cs::en_restart

Definition at line 151 of file MOM_internal_tides.F90.

151  real, dimension(:,:,:), pointer :: &
152  en_restart ! The internal wave energy density as a function of

◆ en_sum

real mom_internal_tides::int_tide_cs::en_sum

Definition at line 131 of file MOM_internal_tides.F90.

131  real :: en_sum ! global sum of energy for use in debugging

◆ energized_angle

integer mom_internal_tides::int_tide_cs::energized_angle = -1

Definition at line 86 of file MOM_internal_tides.F90.

86  integer :: energized_angle = -1

◆ frequency

real, dimension(:), allocatable mom_internal_tides::int_tide_cs::frequency

Definition at line 154 of file MOM_internal_tides.F90.

154  real, allocatable, dimension(:) :: &
155  frequency ! The frequency of each band.

◆ id_allprocesses_loss_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_allprocesses_loss_mode

Definition at line 181 of file MOM_internal_tides.F90.

◆ id_cp_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_cp_mode

Definition at line 181 of file MOM_internal_tides.F90.

◆ id_dx_cv

integer mom_internal_tides::int_tide_cs::id_dx_cv = -1

Definition at line 171 of file MOM_internal_tides.F90.

171  integer :: id_dx_cv = -1, id_dy_cu = -1

◆ id_dy_cu

integer mom_internal_tides::int_tide_cs::id_dy_cu = -1

Definition at line 171 of file MOM_internal_tides.F90.

◆ id_en_ang_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_en_ang_mode

Definition at line 188 of file MOM_internal_tides.F90.

188  integer, allocatable, dimension(:,:) :: &
189  id_en_ang_mode, &
190  id_itidal_loss_ang_mode

◆ id_en_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_en_mode

Definition at line 181 of file MOM_internal_tides.F90.

181  integer, allocatable, dimension(:,:) :: &
182  id_en_mode, &
183  id_itidal_loss_mode, &
184  id_allprocesses_loss_mode, &
185  id_ub_mode, &
186  id_cp_mode

◆ id_itidal_loss_ang_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_itidal_loss_ang_mode

Definition at line 188 of file MOM_internal_tides.F90.

◆ id_itidal_loss_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_itidal_loss_mode

Definition at line 181 of file MOM_internal_tides.F90.

◆ id_itide_drag

integer mom_internal_tides::int_tide_cs::id_itide_drag = -1

Definition at line 169 of file MOM_internal_tides.F90.

169  integer :: id_itide_drag = -1

◆ id_land_mask

integer mom_internal_tides::int_tide_cs::id_land_mask = -1

Definition at line 170 of file MOM_internal_tides.F90.

◆ id_refl_ang

integer mom_internal_tides::int_tide_cs::id_refl_ang = -1

Definition at line 170 of file MOM_internal_tides.F90.

◆ id_refl_pref

integer mom_internal_tides::int_tide_cs::id_refl_pref = -1

Definition at line 170 of file MOM_internal_tides.F90.

170  integer :: id_refl_pref = -1, id_refl_ang = -1, id_land_mask = -1

◆ id_tke_itidal_input

integer mom_internal_tides::int_tide_cs::id_tke_itidal_input = -1

Definition at line 172 of file MOM_internal_tides.F90.

172  integer :: id_tke_itidal_input = -1

◆ id_tot_allprocesses_loss

integer mom_internal_tides::int_tide_cs::id_tot_allprocesses_loss = -1

Definition at line 174 of file MOM_internal_tides.F90.

◆ id_tot_en

integer mom_internal_tides::int_tide_cs::id_tot_en = -1

Definition at line 174 of file MOM_internal_tides.F90.

174  integer :: id_tot_en = -1, &
175  id_tot_leak_loss = -1, &
176  id_tot_quad_loss = -1, &
177  id_tot_itidal_loss = -1, &
178  id_tot_froude_loss = -1, &
179  id_tot_allprocesses_loss = -1

◆ id_tot_froude_loss

integer mom_internal_tides::int_tide_cs::id_tot_froude_loss = -1

Definition at line 174 of file MOM_internal_tides.F90.

◆ id_tot_itidal_loss

integer mom_internal_tides::int_tide_cs::id_tot_itidal_loss = -1

Definition at line 174 of file MOM_internal_tides.F90.

◆ id_tot_leak_loss

integer mom_internal_tides::int_tide_cs::id_tot_leak_loss = -1

Definition at line 174 of file MOM_internal_tides.F90.

◆ id_tot_quad_loss

integer mom_internal_tides::int_tide_cs::id_tot_quad_loss = -1

Definition at line 174 of file MOM_internal_tides.F90.

◆ id_ub_mode

integer, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::id_ub_mode

Definition at line 181 of file MOM_internal_tides.F90.

◆ inputdir

character(len=200) mom_internal_tides::int_tide_cs::inputdir

Definition at line 134 of file MOM_internal_tides.F90.

134  character(len=200) :: inputdir

◆ int_tide_source_x

real mom_internal_tides::int_tide_cs::int_tide_source_x

Definition at line 157 of file MOM_internal_tides.F90.

157  real :: int_tide_source_x ! delete later

◆ int_tide_source_y

real mom_internal_tides::int_tide_cs::int_tide_source_y

Definition at line 160 of file MOM_internal_tides.F90.

160  real :: int_tide_source_y ! delete later

◆ nangle

integer mom_internal_tides::int_tide_cs::nangle = 24

Definition at line 85 of file MOM_internal_tides.F90.

85  integer :: nangle = 24

◆ nfreq

integer mom_internal_tides::int_tide_cs::nfreq = 0

Definition at line 83 of file MOM_internal_tides.F90.

83  integer :: nfreq = 0

◆ nmode

integer mom_internal_tides::int_tide_cs::nmode = 1

Definition at line 84 of file MOM_internal_tides.F90.

84  integer :: nmode = 1

◆ nullangle

real mom_internal_tides::int_tide_cs::nullangle = -999.9

Definition at line 102 of file MOM_internal_tides.F90.

102  real :: nullangle = -999.9 ! placeholder value in cell with no reflection

◆ q_itides

real mom_internal_tides::int_tide_cs::q_itides

Definition at line 130 of file MOM_internal_tides.F90.

130  real :: q_itides ! fraction of local dissipation (nondimensional)

◆ refl_angle

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::refl_angle

Definition at line 99 of file MOM_internal_tides.F90.

99  real, allocatable, dimension(:,:) :: refl_angle

◆ refl_dbl

logical, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::refl_dbl

Definition at line 109 of file MOM_internal_tides.F90.

109  logical, allocatable, dimension(:,:) :: refl_dbl

◆ refl_pref

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::refl_pref

Definition at line 103 of file MOM_internal_tides.F90.

103  real, allocatable, dimension(:,:) :: refl_pref

◆ refl_pref_logical

logical, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::refl_pref_logical

Definition at line 106 of file MOM_internal_tides.F90.

106  logical, allocatable, dimension(:,:) :: refl_pref_logical

◆ simple_2nd

logical mom_internal_tides::int_tide_cs::simple_2nd

Definition at line 89 of file MOM_internal_tides.F90.

89  logical :: simple_2nd ! If true, use a simple second order (arithmetic

◆ time

type(time_type), pointer mom_internal_tides::int_tide_cs::time

Definition at line 132 of file MOM_internal_tides.F90.

132  type(time_type),pointer :: time

◆ tke_froude_loss

real, dimension(:,:,:,:,:), allocatable mom_internal_tides::int_tide_cs::tke_froude_loss

Definition at line 119 of file MOM_internal_tides.F90.

119  real, allocatable, dimension(:,:,:,:,:) :: tke_froude_loss

◆ tke_itidal_loss

real, dimension(:,:,:,:,:), allocatable mom_internal_tides::int_tide_cs::tke_itidal_loss

Definition at line 125 of file MOM_internal_tides.F90.

125  real, allocatable, dimension(:,:,:,:,:) :: tke_itidal_loss

◆ tke_itidal_loss_fixed

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tke_itidal_loss_fixed

Definition at line 121 of file MOM_internal_tides.F90.

121  real, allocatable, dimension(:,:) :: tke_itidal_loss_fixed

◆ tke_leak_loss

real, dimension(:,:,:,:,:), allocatable mom_internal_tides::int_tide_cs::tke_leak_loss

Definition at line 115 of file MOM_internal_tides.F90.

115  real, allocatable, dimension(:,:,:,:,:) :: tke_leak_loss

◆ tke_quad_loss

real, dimension(:,:,:,:,:), allocatable mom_internal_tides::int_tide_cs::tke_quad_loss

Definition at line 117 of file MOM_internal_tides.F90.

117  real, allocatable, dimension(:,:,:,:,:) :: tke_quad_loss

◆ tot_allprocesses_loss

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tot_allprocesses_loss

Definition at line 127 of file MOM_internal_tides.F90.

◆ tot_froude_loss

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tot_froude_loss

Definition at line 127 of file MOM_internal_tides.F90.

◆ tot_itidal_loss

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tot_itidal_loss

Definition at line 127 of file MOM_internal_tides.F90.

◆ tot_leak_loss

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tot_leak_loss

Definition at line 127 of file MOM_internal_tides.F90.

127  real, allocatable, dimension(:,:) :: tot_leak_loss, tot_quad_loss, &
128  tot_itidal_loss, tot_froude_loss, tot_allprocesses_loss

◆ tot_quad_loss

real, dimension(:,:), allocatable mom_internal_tides::int_tide_cs::tot_quad_loss

Definition at line 127 of file MOM_internal_tides.F90.

◆ upwind_1st

logical mom_internal_tides::int_tide_cs::upwind_1st

Definition at line 88 of file MOM_internal_tides.F90.

88  logical :: upwind_1st ! If true, use a first-order upwind scheme.

◆ use_ppmang

logical mom_internal_tides::int_tide_cs::use_ppmang

Definition at line 96 of file MOM_internal_tides.F90.

96  logical :: use_ppmang ! If true, use PPM for advection of energy in

◆ vol_cfl

logical mom_internal_tides::int_tide_cs::vol_cfl

Definition at line 92 of file MOM_internal_tides.F90.

92  logical :: vol_cfl ! If true, use the ratio of the open face lengths

◆ wave_structure_csp

type(wave_structure_cs), pointer mom_internal_tides::int_tide_cs::wave_structure_csp => NULL()

Definition at line 166 of file MOM_internal_tides.F90.

166  type(wave_structure_cs), pointer :: wave_structure_csp => null()
The documentation for this type was generated from the following file: