Detailed Description

Definition at line 81 of file MOM_set_diffusivity.F90.

Collaboration diagram for mom_set_diffusivity::set_diffusivity_cs:

Public variables and constants
logical	debug

logical	bulkmixedlayer

real	fluxri_max

logical	henyey_igw_background

logical	henyey_igw_background_new

logical	kd_tanh_lat_fn

real	kd_tanh_lat_scale

logical	bottomdraglaw

logical	bbl_mixing_as_max

logical	use_lotw_bbl_diffusivity

logical	lotw_bbl_use_omega

real	bbl_effic

real	cdrag

real	imax_decay

real	kd

real	kd_min

real	kd_max

real	kd_add

real	kv

real	kdml

real	hmix

logical	bryan_lewis_diffusivity

real	kd_bryan_lewis_deep

real	kd_bryan_lewis_surface

real	bryan_lewis_depth_cent

real	bryan_lewis_width_trans

real	n0_2omega

real	n2_floor_iomega2

type(diag_ctrl), pointer	diag

real	int_tide_decay_scale

real	mu_itides

real	gamma_itides

real	gamma_lee

real	decay_scale_factor_lee

real	min_zbot_itides

logical	int_tide_dissipation

logical	lowmode_itidal_dissipation

integer	int_tide_profile

real	nu_polzin

real	nbotref_polzin

real	polzin_decay_scale_factor

real	polzin_decay_scale_max_factor

real	polzin_min_decay_scale

logical	lee_wave_dissipation

integer	lee_wave_profile

logical	limit_dissipation

real	dissip_min

real	dissip_n0

real	dissip_n1

real	dissip_n2

real	dissip_kd_min

real	tke_itide_max

real	omega

real	utide

real	kappa_itides

real	kappa_h2_factor

logical	ml_radiation

real	ml_rad_kd_max

real	ml_rad_efold_coeff

real	ml_rad_coeff

logical	ml_rad_tke_decay

real	ustar_min

real	tke_decay

real	mstar

logical	ml_use_omega

real	ml_omega_frac

logical	user_change_diff

logical	usekappashear

logical	usecvmix

logical	double_diffusion

logical	simple_tke_to_kd

real	max_rrho_salt_fingers

real	max_salt_diff_salt_fingers

real	kv_molecular

real, dimension(:,:), pointer	tke_niku => NULL()

real, dimension(:,:), pointer	tke_itidal => NULL()

real, dimension(:,:), pointer	nb => NULL()

real, dimension(:,:), pointer	mask_itidal => NULL()

real, dimension(:,:), pointer	h2 => NULL()

real, dimension(:,:), pointer	tideamp => NULL()

character(len=200)	inputdir

type(user_change_diff_cs), pointer	user_change_diff_csp => NULL()

type(diag_to_z_cs), pointer	diag_to_z_csp => NULL()

type(kappa_shear_cs), pointer	kappashear_csp => NULL()

type(cvmix_shear_cs), pointer	cvmix_shear_csp => NULL()

type(int_tide_cs), pointer	int_tide_csp => NULL()

integer	id_tke_itidal = -1

integer	id_tke_leewave = -1

integer	id_maxtke = -1

integer	id_tke_to_kd = -1

integer	id_kd_itidal = -1

integer	id_kd_niku = -1

integer	id_kd_lowmode = -1

integer	id_kd_user = -1

integer	id_kd_layer = -1

integer	id_kd_bbl = -1

integer	id_kd_bbl_z = -1

integer	id_kd_itidal_z = -1

integer	id_kd_niku_z = -1

integer	id_kd_lowmode_z = -1

integer	id_kd_user_z = -1

integer	id_kd_work = -1

integer	id_kd_itidal_work = -1

integer	id_kd_niku_work = -1

integer	id_kd_lowmode_work = -1

integer	id_fl_itidal = -1

integer	id_fl_lowmode = -1

integer	id_polzin_decay_scale = -1

integer	id_polzin_decay_scale_scaled = -1

integer	id_nb = -1

integer	id_n2 = -1

integer	id_n2_z = -1

integer	id_n2_bot = -1

integer	id_n2_meanz = -1

integer	id_kt_extra = -1

integer	id_ks_extra = -1

integer	id_kt_extra_z = -1

integer	id_ks_extra_z = -1

Variables and constants

◆ bbl_effic

real mom_set_diffusivity::set_diffusivity_cs::bbl_effic

Definition at line 137 of file MOM_set_diffusivity.F90.

137 real :: bbl_effic ! efficiency with which the energy extracted

◆ bbl_mixing_as_max

logical mom_set_diffusivity::set_diffusivity_cs::bbl_mixing_as_max

Definition at line 131 of file MOM_set_diffusivity.F90.

131 logical :: bbl_mixing_as_max ! If true, take the maximum of the diffusivity

◆ bottomdraglaw

logical mom_set_diffusivity::set_diffusivity_cs::bottomdraglaw

Definition at line 129 of file MOM_set_diffusivity.F90.

129 logical :: bottomdraglaw ! If true, the bottom stress is calculated with a

◆ bryan_lewis_depth_cent

real mom_set_diffusivity::set_diffusivity_cs::bryan_lewis_depth_cent

Definition at line 159 of file MOM_set_diffusivity.F90.

159 real :: bryan_lewis_depth_cent ! center of transition depth in Bryan-Lewis (meter)

◆ bryan_lewis_diffusivity

logical mom_set_diffusivity::set_diffusivity_cs::bryan_lewis_diffusivity

Definition at line 155 of file MOM_set_diffusivity.F90.

155 logical :: bryan_lewis_diffusivity ! If true, background vertical diffusivity

◆ bryan_lewis_width_trans

real mom_set_diffusivity::set_diffusivity_cs::bryan_lewis_width_trans

Definition at line 160 of file MOM_set_diffusivity.F90.

160 real :: bryan_lewis_width_trans ! width of transition for Bryan-Lewis (meter)

◆ bulkmixedlayer

logical mom_set_diffusivity::set_diffusivity_cs::bulkmixedlayer

Definition at line 84 of file MOM_set_diffusivity.F90.

84 logical :: bulkmixedlayer ! If true, a refined bulk mixed layer is used with

◆ cdrag

real mom_set_diffusivity::set_diffusivity_cs::cdrag

Definition at line 139 of file MOM_set_diffusivity.F90.

139 real :: cdrag ! quadratic drag coefficient (nondim)

◆ cvmix_shear_csp

type(cvmix_shear_cs), pointer mom_set_diffusivity::set_diffusivity_cs::cvmix_shear_csp => NULL()

Definition at line 287 of file MOM_set_diffusivity.F90.

287 type(cvmix_shear_cs), pointer :: cvmix_shear_csp => null()

◆ debug

logical mom_set_diffusivity::set_diffusivity_cs::debug

Definition at line 82 of file MOM_set_diffusivity.F90.

82 logical :: debug ! If true, write verbose checksums for debugging.

◆ decay_scale_factor_lee

real mom_set_diffusivity::set_diffusivity_cs::decay_scale_factor_lee

Definition at line 177 of file MOM_set_diffusivity.F90.

177 real :: decay_scale_factor_lee ! Scaling factor for the decay scale of lee

◆ diag

type(diag_ctrl), pointer mom_set_diffusivity::set_diffusivity_cs::diag

Definition at line 169 of file MOM_set_diffusivity.F90.

169 type(diag_ctrl), pointer :: diag ! structure to regulate diagn output timing

◆ diag_to_z_csp

type(diag_to_z_cs), pointer mom_set_diffusivity::set_diffusivity_cs::diag_to_z_csp => NULL()

Definition at line 285 of file MOM_set_diffusivity.F90.

285 type(diag_to_z_cs), pointer :: diag_to_z_csp => null()

◆ dissip_kd_min

real mom_set_diffusivity::set_diffusivity_cs::dissip_kd_min

Definition at line 219 of file MOM_set_diffusivity.F90.

219 real :: dissip_kd_min ! Minimum Kd (m2/s) with dissipatio Rho0*Kd_min*N^2

◆ dissip_min

real mom_set_diffusivity::set_diffusivity_cs::dissip_min

Definition at line 215 of file MOM_set_diffusivity.F90.

215 real :: dissip_min ! Minimum dissipation (W/m3)

◆ dissip_n0

real mom_set_diffusivity::set_diffusivity_cs::dissip_n0

Definition at line 216 of file MOM_set_diffusivity.F90.

216 real :: dissip_n0 ! Coefficient a in minimum dissipation = a+b*N (W/m3)

◆ dissip_n1

real mom_set_diffusivity::set_diffusivity_cs::dissip_n1

Definition at line 217 of file MOM_set_diffusivity.F90.

217 real :: dissip_n1 ! Coefficient b in minimum dissipation = a+b*N (J/m3)

◆ dissip_n2

real mom_set_diffusivity::set_diffusivity_cs::dissip_n2

Definition at line 218 of file MOM_set_diffusivity.F90.

218 real :: dissip_n2 ! Coefficient c in minimum dissipation = c*N2 (W m-3 s2)

◆ double_diffusion

logical mom_set_diffusivity::set_diffusivity_cs::double_diffusion

Definition at line 269 of file MOM_set_diffusivity.F90.

269 logical :: double_diffusion ! If true, enable double-diffusive mixing.

◆ fluxri_max

real mom_set_diffusivity::set_diffusivity_cs::fluxri_max

Definition at line 87 of file MOM_set_diffusivity.F90.

87 real :: fluxri_max ! The flux Richardson number where the stratification is

◆ gamma_itides

real mom_set_diffusivity::set_diffusivity_cs::gamma_itides

Definition at line 174 of file MOM_set_diffusivity.F90.

174 real :: gamma_itides ! fraction of local dissipation (nondimensional)

◆ gamma_lee

real mom_set_diffusivity::set_diffusivity_cs::gamma_lee

Definition at line 175 of file MOM_set_diffusivity.F90.

175 real :: gamma_lee ! fraction of local dissipation for lee waves

◆ h2

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::h2 => NULL()

Definition at line 280 of file MOM_set_diffusivity.F90.

280 real, pointer, dimension(:,:) :: h2 => null()

◆ henyey_igw_background

logical mom_set_diffusivity::set_diffusivity_cs::henyey_igw_background

Definition at line 91 of file MOM_set_diffusivity.F90.

91 logical :: henyey_igw_background ! If true, use a simplified variant of the

◆ henyey_igw_background_new

logical mom_set_diffusivity::set_diffusivity_cs::henyey_igw_background_new

Definition at line 98 of file MOM_set_diffusivity.F90.

98 logical :: henyey_igw_background_new ! same as Henyey_IGW_background

◆ hmix

real mom_set_diffusivity::set_diffusivity_cs::hmix

Definition at line 152 of file MOM_set_diffusivity.F90.

152 real :: hmix ! mixed layer thickness (meter) when

◆ id_fl_itidal

integer mom_set_diffusivity::set_diffusivity_cs::id_fl_itidal = -1

Definition at line 311 of file MOM_set_diffusivity.F90.

311 integer :: id_fl_itidal = -1

◆ id_fl_lowmode

integer mom_set_diffusivity::set_diffusivity_cs::id_fl_lowmode = -1

Definition at line 312 of file MOM_set_diffusivity.F90.

312 integer :: id_fl_lowmode = -1

◆ id_kd_bbl

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_bbl = -1

Definition at line 300 of file MOM_set_diffusivity.F90.

300 integer :: id_kd_bbl = -1

◆ id_kd_bbl_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_bbl_z = -1

Definition at line 301 of file MOM_set_diffusivity.F90.

301 integer :: id_kd_bbl_z = -1

◆ id_kd_itidal

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_itidal = -1

Definition at line 295 of file MOM_set_diffusivity.F90.

295 integer :: id_kd_itidal = -1

◆ id_kd_itidal_work

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_itidal_work = -1

Definition at line 307 of file MOM_set_diffusivity.F90.

307 integer :: id_kd_itidal_work = -1

◆ id_kd_itidal_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_itidal_z = -1

Definition at line 302 of file MOM_set_diffusivity.F90.

302 integer :: id_kd_itidal_z = -1

◆ id_kd_layer

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_layer = -1

Definition at line 299 of file MOM_set_diffusivity.F90.

299 integer :: id_kd_layer = -1

◆ id_kd_lowmode

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_lowmode = -1

Definition at line 297 of file MOM_set_diffusivity.F90.

297 integer :: id_kd_lowmode = -1

◆ id_kd_lowmode_work

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_lowmode_work = -1

Definition at line 309 of file MOM_set_diffusivity.F90.

309 integer :: id_kd_lowmode_work= -1

◆ id_kd_lowmode_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_lowmode_z = -1

Definition at line 304 of file MOM_set_diffusivity.F90.

304 integer :: id_kd_lowmode_z = -1

◆ id_kd_niku

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_niku = -1

Definition at line 296 of file MOM_set_diffusivity.F90.

296 integer :: id_kd_niku = -1

◆ id_kd_niku_work

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_niku_work = -1

Definition at line 308 of file MOM_set_diffusivity.F90.

308 integer :: id_kd_niku_work = -1

◆ id_kd_niku_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_niku_z = -1

Definition at line 303 of file MOM_set_diffusivity.F90.

303 integer :: id_kd_niku_z = -1

◆ id_kd_user

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_user = -1

Definition at line 298 of file MOM_set_diffusivity.F90.

298 integer :: id_kd_user = -1

◆ id_kd_user_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_user_z = -1

Definition at line 305 of file MOM_set_diffusivity.F90.

305 integer :: id_kd_user_z = -1

◆ id_kd_work

integer mom_set_diffusivity::set_diffusivity_cs::id_kd_work = -1

Definition at line 306 of file MOM_set_diffusivity.F90.

306 integer :: id_kd_work = -1

◆ id_ks_extra

integer mom_set_diffusivity::set_diffusivity_cs::id_ks_extra = -1

Definition at line 323 of file MOM_set_diffusivity.F90.

323 integer :: id_ks_extra = -1

◆ id_ks_extra_z

integer mom_set_diffusivity::set_diffusivity_cs::id_ks_extra_z = -1

Definition at line 325 of file MOM_set_diffusivity.F90.

325 integer :: id_ks_extra_z = -1

◆ id_kt_extra

integer mom_set_diffusivity::set_diffusivity_cs::id_kt_extra = -1

Definition at line 322 of file MOM_set_diffusivity.F90.

322 integer :: id_kt_extra = -1

◆ id_kt_extra_z

integer mom_set_diffusivity::set_diffusivity_cs::id_kt_extra_z = -1

Definition at line 324 of file MOM_set_diffusivity.F90.

324 integer :: id_kt_extra_z = -1

◆ id_maxtke

integer mom_set_diffusivity::set_diffusivity_cs::id_maxtke = -1

Definition at line 292 of file MOM_set_diffusivity.F90.

292 integer :: id_maxtke = -1

◆ id_n2

integer mom_set_diffusivity::set_diffusivity_cs::id_n2 = -1

Definition at line 317 of file MOM_set_diffusivity.F90.

317 integer :: id_n2 = -1

◆ id_n2_bot

integer mom_set_diffusivity::set_diffusivity_cs::id_n2_bot = -1

Definition at line 319 of file MOM_set_diffusivity.F90.

319 integer :: id_n2_bot = -1

◆ id_n2_meanz

integer mom_set_diffusivity::set_diffusivity_cs::id_n2_meanz = -1

Definition at line 320 of file MOM_set_diffusivity.F90.

320 integer :: id_n2_meanz = -1

◆ id_n2_z

integer mom_set_diffusivity::set_diffusivity_cs::id_n2_z = -1

Definition at line 318 of file MOM_set_diffusivity.F90.

318 integer :: id_n2_z = -1

◆ id_nb

integer mom_set_diffusivity::set_diffusivity_cs::id_nb = -1

Definition at line 316 of file MOM_set_diffusivity.F90.

316 integer :: id_nb = -1

◆ id_polzin_decay_scale

integer mom_set_diffusivity::set_diffusivity_cs::id_polzin_decay_scale = -1

Definition at line 313 of file MOM_set_diffusivity.F90.

313 integer :: id_polzin_decay_scale = -1

◆ id_polzin_decay_scale_scaled

integer mom_set_diffusivity::set_diffusivity_cs::id_polzin_decay_scale_scaled = -1

Definition at line 314 of file MOM_set_diffusivity.F90.

314 integer :: id_polzin_decay_scale_scaled = -1

◆ id_tke_itidal

integer mom_set_diffusivity::set_diffusivity_cs::id_tke_itidal = -1

Definition at line 290 of file MOM_set_diffusivity.F90.

290 integer :: id_tke_itidal = -1

◆ id_tke_leewave

integer mom_set_diffusivity::set_diffusivity_cs::id_tke_leewave = -1

Definition at line 291 of file MOM_set_diffusivity.F90.

291 integer :: id_tke_leewave = -1

◆ id_tke_to_kd

integer mom_set_diffusivity::set_diffusivity_cs::id_tke_to_kd = -1

Definition at line 293 of file MOM_set_diffusivity.F90.

293 integer :: id_tke_to_kd = -1

◆ imax_decay

real mom_set_diffusivity::set_diffusivity_cs::imax_decay

Definition at line 140 of file MOM_set_diffusivity.F90.

140 real :: imax_decay ! inverse of a maximum decay scale for

◆ inputdir

character(len=200) mom_set_diffusivity::set_diffusivity_cs::inputdir

Definition at line 283 of file MOM_set_diffusivity.F90.

283 character(len=200) :: inputdir

◆ int_tide_csp

type(int_tide_cs), pointer mom_set_diffusivity::set_diffusivity_cs::int_tide_csp => NULL()

Definition at line 288 of file MOM_set_diffusivity.F90.

288 type(int_tide_cs), pointer :: int_tide_csp => null()

◆ int_tide_decay_scale

real mom_set_diffusivity::set_diffusivity_cs::int_tide_decay_scale

Definition at line 171 of file MOM_set_diffusivity.F90.

171 real :: int_tide_decay_scale ! decay scale for internal wave TKE (meter)

◆ int_tide_dissipation

logical mom_set_diffusivity::set_diffusivity_cs::int_tide_dissipation

Definition at line 180 of file MOM_set_diffusivity.F90.

180 logical :: int_tide_dissipation ! Internal tide conversion (from barotropic) with

◆ int_tide_profile

integer mom_set_diffusivity::set_diffusivity_cs::int_tide_profile

Definition at line 186 of file MOM_set_diffusivity.F90.

186 integer :: int_tide_profile ! A coded integer indicating the vertical profile

◆ kappa_h2_factor

real mom_set_diffusivity::set_diffusivity_cs::kappa_h2_factor

Definition at line 227 of file MOM_set_diffusivity.F90.

227 real :: kappa_h2_factor ! factor for the product of wavenumber * rms sgs height

◆ kappa_itides

real mom_set_diffusivity::set_diffusivity_cs::kappa_itides

Definition at line 226 of file MOM_set_diffusivity.F90.

226 real :: kappa_itides ! topographic wavenumber and non-dimensional scaling

◆ kappashear_csp

type(kappa_shear_cs), pointer mom_set_diffusivity::set_diffusivity_cs::kappashear_csp => NULL()

Definition at line 286 of file MOM_set_diffusivity.F90.

286 type(kappa_shear_cs), pointer :: kappashear_csp => null()

◆ kd

real mom_set_diffusivity::set_diffusivity_cs::kd

Definition at line 143 of file MOM_set_diffusivity.F90.

143 real :: kd ! interior diapycnal diffusivity (m2/s)

◆ kd_add

real mom_set_diffusivity::set_diffusivity_cs::kd_add

Definition at line 147 of file MOM_set_diffusivity.F90.

147 real :: kd_add ! uniform diffusivity added everywhere without

◆ kd_bryan_lewis_deep

real mom_set_diffusivity::set_diffusivity_cs::kd_bryan_lewis_deep

Definition at line 157 of file MOM_set_diffusivity.F90.

157 real :: kd_bryan_lewis_deep ! abyssal value of Bryan-Lewis profile (m2/s)

◆ kd_bryan_lewis_surface

real mom_set_diffusivity::set_diffusivity_cs::kd_bryan_lewis_surface

Definition at line 158 of file MOM_set_diffusivity.F90.

158 real :: kd_bryan_lewis_surface ! surface value of Bryan-Lewis profile (m2/s)

◆ kd_max

real mom_set_diffusivity::set_diffusivity_cs::kd_max

Definition at line 145 of file MOM_set_diffusivity.F90.

145 real :: kd_max ! maximum increment for diapycnal diffusivity (m2/s)

◆ kd_min

real mom_set_diffusivity::set_diffusivity_cs::kd_min

Definition at line 144 of file MOM_set_diffusivity.F90.

144 real :: kd_min ! minimum diapycnal diffusivity (m2/s)

◆ kd_tanh_lat_fn

logical mom_set_diffusivity::set_diffusivity_cs::kd_tanh_lat_fn

Definition at line 121 of file MOM_set_diffusivity.F90.

121 logical :: kd_tanh_lat_fn ! If true, use the tanh dependence of Kd_sfc on

◆ kd_tanh_lat_scale

real mom_set_diffusivity::set_diffusivity_cs::kd_tanh_lat_scale

Definition at line 125 of file MOM_set_diffusivity.F90.

125 real :: kd_tanh_lat_scale ! A nondimensional scaling for the range of

◆ kdml

real mom_set_diffusivity::set_diffusivity_cs::kdml

Definition at line 150 of file MOM_set_diffusivity.F90.

150 real :: kdml ! mixed layer diapycnal diffusivity (m2/s)

◆ kv

real mom_set_diffusivity::set_diffusivity_cs::kv

Definition at line 149 of file MOM_set_diffusivity.F90.

149 real :: kv ! interior vertical viscosity (m2/s)

◆ kv_molecular

real mom_set_diffusivity::set_diffusivity_cs::kv_molecular

Definition at line 274 of file MOM_set_diffusivity.F90.

274 real :: kv_molecular ! molecular visc for double diff convect (m2/s)

◆ lee_wave_dissipation

logical mom_set_diffusivity::set_diffusivity_cs::lee_wave_dissipation

Definition at line 204 of file MOM_set_diffusivity.F90.

204 logical :: lee_wave_dissipation ! Enable lee-wave driven mixing, following

◆ lee_wave_profile

integer mom_set_diffusivity::set_diffusivity_cs::lee_wave_profile

Definition at line 209 of file MOM_set_diffusivity.F90.

209 integer :: lee_wave_profile ! A coded integer indicating the vertical profile

◆ limit_dissipation

logical mom_set_diffusivity::set_diffusivity_cs::limit_dissipation

Definition at line 213 of file MOM_set_diffusivity.F90.

213 logical :: limit_dissipation ! If enabled, dissipation is limited to be larger

◆ lotw_bbl_use_omega

logical mom_set_diffusivity::set_diffusivity_cs::lotw_bbl_use_omega

Definition at line 136 of file MOM_set_diffusivity.F90.

136 logical :: lotw_bbl_use_omega ! If true, use simpler/less precise, BBL diffusivity.

◆ lowmode_itidal_dissipation

logical mom_set_diffusivity::set_diffusivity_cs::lowmode_itidal_dissipation

Definition at line 183 of file MOM_set_diffusivity.F90.

183 logical :: lowmode_itidal_dissipation ! Internal tide conversion (from low modes) with

◆ mask_itidal

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::mask_itidal => NULL()

Definition at line 279 of file MOM_set_diffusivity.F90.

279 real, pointer, dimension(:,:) :: mask_itidal => null()

◆ max_rrho_salt_fingers

real mom_set_diffusivity::set_diffusivity_cs::max_rrho_salt_fingers

Definition at line 272 of file MOM_set_diffusivity.F90.

272 real :: max_rrho_salt_fingers ! max density ratio for salt fingering

◆ max_salt_diff_salt_fingers

real mom_set_diffusivity::set_diffusivity_cs::max_salt_diff_salt_fingers

Definition at line 273 of file MOM_set_diffusivity.F90.

273 real :: max_salt_diff_salt_fingers ! max salt diffusivity for salt fingers (m2/s)

◆ min_zbot_itides

real mom_set_diffusivity::set_diffusivity_cs::min_zbot_itides

Definition at line 179 of file MOM_set_diffusivity.F90.

179 real :: min_zbot_itides ! minimum depth for internal tide conversion (meter)

◆ ml_omega_frac

real mom_set_diffusivity::set_diffusivity_cs::ml_omega_frac

Definition at line 259 of file MOM_set_diffusivity.F90.

259 real :: ml_omega_frac ! When setting the decay scale for turbulence, use

◆ ml_rad_coeff

real mom_set_diffusivity::set_diffusivity_cs::ml_rad_coeff

Definition at line 244 of file MOM_set_diffusivity.F90.

244 real :: ml_rad_coeff ! coefficient, which scales MSTAR*USTAR^3 to

◆ ml_rad_efold_coeff

real mom_set_diffusivity::set_diffusivity_cs::ml_rad_efold_coeff

Definition at line 243 of file MOM_set_diffusivity.F90.

243 real :: ml_rad_efold_coeff ! non-dim coefficient to scale penetration depth

◆ ml_rad_kd_max

real mom_set_diffusivity::set_diffusivity_cs::ml_rad_kd_max

Definition at line 241 of file MOM_set_diffusivity.F90.

241 real :: ml_rad_kd_max ! Maximum diapycnal diffusivity due to turbulence

◆ ml_rad_tke_decay

logical mom_set_diffusivity::set_diffusivity_cs::ml_rad_tke_decay

Definition at line 247 of file MOM_set_diffusivity.F90.

247 logical :: ml_rad_tke_decay ! If true, apply same exponential decay

◆ ml_radiation

logical mom_set_diffusivity::set_diffusivity_cs::ml_radiation

Definition at line 228 of file MOM_set_diffusivity.F90.

228 logical :: ml_radiation ! allow a fraction of TKE available from wind work

◆ ml_use_omega

logical mom_set_diffusivity::set_diffusivity_cs::ml_use_omega

Definition at line 256 of file MOM_set_diffusivity.F90.

256 logical :: ml_use_omega ! If true, use absolute rotation rate instead

◆ mstar

real mom_set_diffusivity::set_diffusivity_cs::mstar

Definition at line 254 of file MOM_set_diffusivity.F90.

254 real :: mstar ! ratio of friction velocity cubed to

◆ mu_itides

real mom_set_diffusivity::set_diffusivity_cs::mu_itides

Definition at line 172 of file MOM_set_diffusivity.F90.

172 real :: mu_itides ! efficiency for conversion of dissipation

◆ n0_2omega

real mom_set_diffusivity::set_diffusivity_cs::n0_2omega

Definition at line 162 of file MOM_set_diffusivity.F90.

162 real :: n0_2omega ! ratio of the typical Buoyancy frequency to

◆ n2_floor_iomega2

real mom_set_diffusivity::set_diffusivity_cs::n2_floor_iomega2

Definition at line 165 of file MOM_set_diffusivity.F90.

165 real :: n2_floor_iomega2 ! floor applied to N2(k) scaled by Omega^2

◆ nb

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::nb => NULL()

Definition at line 278 of file MOM_set_diffusivity.F90.

278 real, pointer, dimension(:,:) :: nb => null()

◆ nbotref_polzin

real mom_set_diffusivity::set_diffusivity_cs::nbotref_polzin

Definition at line 192 of file MOM_set_diffusivity.F90.

192 real :: nbotref_polzin ! Reference value for the buoyancy frequency at the

◆ nu_polzin

real mom_set_diffusivity::set_diffusivity_cs::nu_polzin

Definition at line 190 of file MOM_set_diffusivity.F90.

190 real :: nu_polzin ! The non-dimensional constant used in Polzin form of

◆ omega

real mom_set_diffusivity::set_diffusivity_cs::omega

Definition at line 223 of file MOM_set_diffusivity.F90.

223 real :: omega ! Earth's rotation frequency (s-1)

◆ polzin_decay_scale_factor

real mom_set_diffusivity::set_diffusivity_cs::polzin_decay_scale_factor

Definition at line 195 of file MOM_set_diffusivity.F90.

195 real :: polzin_decay_scale_factor ! Scaling factor for the decay length scale

◆ polzin_decay_scale_max_factor

real mom_set_diffusivity::set_diffusivity_cs::polzin_decay_scale_max_factor

Definition at line 198 of file MOM_set_diffusivity.F90.

198 real :: polzin_decay_scale_max_factor ! The decay length scale of tidal

◆ polzin_min_decay_scale

real mom_set_diffusivity::set_diffusivity_cs::polzin_min_decay_scale

Definition at line 202 of file MOM_set_diffusivity.F90.

202 real :: polzin_min_decay_scale ! minimum decay scale of the tidal dissipation

◆ simple_tke_to_kd

logical mom_set_diffusivity::set_diffusivity_cs::simple_tke_to_kd

Definition at line 270 of file MOM_set_diffusivity.F90.

270 logical :: simple_tke_to_kd ! If true, uses a simple estimate of Kd/TKE that

◆ tideamp

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::tideamp => NULL()

Definition at line 281 of file MOM_set_diffusivity.F90.

281 real, pointer, dimension(:,:) :: tideamp => null() ! RMS tidal amplitude (m/s)

◆ tke_decay

real mom_set_diffusivity::set_diffusivity_cs::tke_decay

Definition at line 253 of file MOM_set_diffusivity.F90.

253 real :: tke_decay ! ratio of natural Ekman depth to TKE decay scale (nondim)

◆ tke_itidal

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::tke_itidal => NULL()

Definition at line 277 of file MOM_set_diffusivity.F90.

277 real, pointer, dimension(:,:) :: tke_itidal => null()

◆ tke_itide_max

real mom_set_diffusivity::set_diffusivity_cs::tke_itide_max

Definition at line 221 of file MOM_set_diffusivity.F90.

221 real :: tke_itide_max ! maximum internal tide conversion (W m-2)

◆ tke_niku

real, dimension(:,:), pointer mom_set_diffusivity::set_diffusivity_cs::tke_niku => NULL()

Definition at line 276 of file MOM_set_diffusivity.F90.

276 real, pointer, dimension(:,:) :: tke_niku => null()

◆ use_lotw_bbl_diffusivity

logical mom_set_diffusivity::set_diffusivity_cs::use_lotw_bbl_diffusivity

Definition at line 135 of file MOM_set_diffusivity.F90.

135 logical :: use_lotw_bbl_diffusivity ! If true, use simpler/less precise, BBL diffusivity.

◆ usecvmix

logical mom_set_diffusivity::set_diffusivity_cs::usecvmix

Definition at line 266 of file MOM_set_diffusivity.F90.

266 logical :: usecvmix ! If true, use one of the CVMix modules to find

◆ usekappashear

logical mom_set_diffusivity::set_diffusivity_cs::usekappashear

Definition at line 263 of file MOM_set_diffusivity.F90.

263 logical :: usekappashear ! If true, use the kappa_shear module to find the

◆ user_change_diff

logical mom_set_diffusivity::set_diffusivity_cs::user_change_diff

Definition at line 262 of file MOM_set_diffusivity.F90.

262 logical :: user_change_diff ! If true, call user-defined code to change diffusivity.

◆ user_change_diff_csp

type(user_change_diff_cs), pointer mom_set_diffusivity::set_diffusivity_cs::user_change_diff_csp => NULL()

Definition at line 284 of file MOM_set_diffusivity.F90.

284 type(user_change_diff_cs), pointer :: user_change_diff_csp => null()

◆ ustar_min

real mom_set_diffusivity::set_diffusivity_cs::ustar_min

Definition at line 250 of file MOM_set_diffusivity.F90.

250 real :: ustar_min ! A minimum value of ustar to avoid numerical

◆ utide

real mom_set_diffusivity::set_diffusivity_cs::utide

Definition at line 224 of file MOM_set_diffusivity.F90.

224 real :: utide ! constant tidal amplitude (m s-1) used if

The documentation for this type was generated from the following file:

/home/adcroft/GitHub/workspace/Gaea-stats-MOM6-examples/MOM6-examples/src/MOM6/src/parameterizations/vertical/MOM_set_diffusivity.F90