mom_lateral_mixing_coeffs::varmix_cs integer integer mom_lateral_mixing_coeffs::varmix_cs::id_sn_u id_sn_u =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_sn_v id_sn_v =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_l2u id_l2u =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_l2v id_l2v =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_res_fn id_res_fn = -1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_n2_u id_n2_u =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_n2_v id_n2_v =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_s2_u id_s2_u =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_s2_v id_s2_v =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_rd_dx id_rd_dx =-1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_kh_u_qg id_kh_u_qg = -1 Diagnostic identifier. integer integer mom_lateral_mixing_coeffs::varmix_cs::id_kh_v_qg id_kh_v_qg = -1 Diagnostic identifier. type(diag_ctrl), pointer type(diag_ctrl), pointer mom_lateral_mixing_coeffs::varmix_cs::diag diag A structure that is used to regulate the timing of diagnostic output. logical logical mom_lateral_mixing_coeffs::varmix_cs::use_variable_mixing use_variable_mixing If true, use the variable mixing. logical logical mom_lateral_mixing_coeffs::varmix_cs::resoln_scaled_kh resoln_scaled_kh If true, scale away the Laplacian viscosity when the deformation radius is well resolved. logical logical mom_lateral_mixing_coeffs::varmix_cs::resoln_scaled_khth resoln_scaled_khth If true, scale away the thickness diffusivity when the deformation radius is well resolved. logical logical mom_lateral_mixing_coeffs::varmix_cs::depth_scaled_khth depth_scaled_khth If true, KHTH is scaled away when the depth is shallower than a reference depth. logical logical mom_lateral_mixing_coeffs::varmix_cs::resoln_scaled_khtr resoln_scaled_khtr If true, scale away the tracer diffusivity when the deformation radius is well resolved. logical logical mom_lateral_mixing_coeffs::varmix_cs::interpolate_res_fn interpolate_res_fn If true, interpolate the resolution function to the velocity points from the thickness points; otherwise interpolate the wave speed and calculate the resolution function independently at each point. logical logical mom_lateral_mixing_coeffs::varmix_cs::use_stored_slopes use_stored_slopes If true, stores isopycnal slopes in this structure. logical logical mom_lateral_mixing_coeffs::varmix_cs::resoln_use_ebt resoln_use_ebt If true, uses the equivalent barotropic wave speed instead of first baroclinic wave for calculating the resolution fn. logical logical mom_lateral_mixing_coeffs::varmix_cs::khth_use_ebt_struct khth_use_ebt_struct If true, uses the equivalent barotropic structure as the vertical structure of thickness diffusivity. logical logical mom_lateral_mixing_coeffs::varmix_cs::calculate_cg1 calculate_cg1 If true, calls wave_speed() to calculate the first baroclinic wave speed and populate CScg1. This parameter is set depending on other parameters. logical logical mom_lateral_mixing_coeffs::varmix_cs::calculate_rd_dx calculate_rd_dx If true, calculates Rd/dx and populate CSRd_dx_h. This parameter is set depending on other parameters. logical logical mom_lateral_mixing_coeffs::varmix_cs::calculate_res_fns calculate_res_fns If true, calculate all the resolution factors. This parameter is set depending on other parameters. logical logical mom_lateral_mixing_coeffs::varmix_cs::calculate_depth_fns calculate_depth_fns If true, calculate all the depth factors. This parameter is set depending on other parameters. logical logical mom_lateral_mixing_coeffs::varmix_cs::calculate_eady_growth_rate calculate_eady_growth_rate If true, calculate all the Eady growth rate. This parameter is set depending on other parameters. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::sn_u sn_u => NULL() S*N at u-points [T-1 ~> s-1]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::sn_v sn_v => NULL() S*N at v-points [T-1 ~> s-1]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::l2u l2u => NULL() Length scale^2 at u-points [L2 ~> m2]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::l2v l2v => NULL() Length scale^2 at v-points [L2 ~> m2]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::cg1 cg1 => NULL() The first baroclinic gravity wave speed [L T-1 ~> m s-1]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::res_fn_h res_fn_h => NULL() Non-dimensional function of the ratio the first baroclinic. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::res_fn_q res_fn_q => NULL() Non-dimensional function of the ratio the first baroclinic. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::res_fn_u res_fn_u => NULL() Non-dimensional function of the ratio the first baroclinic. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::res_fn_v res_fn_v => NULL() Non-dimensional function of the ratio the first baroclinic. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::depth_fn_u depth_fn_u => NULL() Non-dimensional function of the ratio of the depth to. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::depth_fn_v depth_fn_v => NULL() Non-dimensional function of the ratio of the depth to. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::beta_dx2_h beta_dx2_h => NULL() The magnitude of the gradient of the Coriolis parameter. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::beta_dx2_q beta_dx2_q => NULL() The magnitude of the gradient of the Coriolis parameter. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::beta_dx2_u beta_dx2_u => NULL() The magnitude of the gradient of the Coriolis parameter. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::beta_dx2_v beta_dx2_v => NULL() The magnitude of the gradient of the Coriolis parameter. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::f2_dx2_h f2_dx2_h => NULL() The Coriolis parameter squared times the grid. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::f2_dx2_q f2_dx2_q => NULL() The Coriolis parameter squared times the grid. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::f2_dx2_u f2_dx2_u => NULL() The Coriolis parameter squared times the grid. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::f2_dx2_v f2_dx2_v => NULL() The Coriolis parameter squared times the grid. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::rd_dx_h rd_dx_h => NULL() Deformation radius over grid spacing [nondim]. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::slope_x slope_x => NULL() Zonal isopycnal slope [nondim]. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::slope_y slope_y => NULL() Meridional isopycnal slope [nondim]. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_lateral_mixing_coeffs::varmix_cs::ebt_struct ebt_struct => NULL() Vertical structure function to scale diffusivities with [nondim]. real, dimension(:, :), allocatable real, dimension( : , : ), allocatable mom_lateral_mixing_coeffs::varmix_cs::laplac3_const_u laplac3_const_u Laplacian metric-dependent constants [L3 ~> m3]. real, dimension(:, :), allocatable real, dimension( : , : ), allocatable mom_lateral_mixing_coeffs::varmix_cs::laplac3_const_v laplac3_const_v Laplacian metric-dependent constants [L3 ~> m3]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_lateral_mixing_coeffs::varmix_cs::kh_u_qg kh_u_qg QG Leith GM coefficient at u-points [L2 T-1 ~> m2 s-1]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_lateral_mixing_coeffs::varmix_cs::kh_v_qg kh_v_qg QG Leith GM coefficient at v-points [L2 T-1 ~> m2 s-1]. logical logical mom_lateral_mixing_coeffs::varmix_cs::use_visbeck use_visbeck Use Visbeck formulation for thickness diffusivity. integer integer mom_lateral_mixing_coeffs::varmix_cs::varmix_ktop varmix_ktop Top layer to start downward integrals. real real mom_lateral_mixing_coeffs::varmix_cs::visbeck_l_scale visbeck_l_scale Fixed length scale in Visbeck formula. real real mom_lateral_mixing_coeffs::varmix_cs::res_coef_khth res_coef_khth A non-dimensional number that determines the function of resolution, used for thickness and tracer mixing, as: F = 1 / (1 + (Res_coef_khth*Ld/dx)^Res_fn_power) real real mom_lateral_mixing_coeffs::varmix_cs::res_coef_visc res_coef_visc A non-dimensional number that determines the function of resolution, used for lateral viscosity, as: F = 1 / (1 + (Res_coef_visc*Ld/dx)^Res_fn_power) real real mom_lateral_mixing_coeffs::varmix_cs::depth_scaled_khth_h0 depth_scaled_khth_h0 The depth above which KHTH is linearly scaled away [Z ~> m]. real real mom_lateral_mixing_coeffs::varmix_cs::depth_scaled_khth_exp depth_scaled_khth_exp The exponent used in the depth dependent scaling function for KHTH [nondim]. real real mom_lateral_mixing_coeffs::varmix_cs::kappa_smooth kappa_smooth A diffusivity for smoothing T/S in vanished layers [Z2 T-1 ~> m2 s-1]. integer integer mom_lateral_mixing_coeffs::varmix_cs::res_fn_power_khth res_fn_power_khth The power of dx/Ld in the KhTh resolution function. Any positive integer power may be used, but even powers and especially 2 are coded to be more efficient. integer integer mom_lateral_mixing_coeffs::varmix_cs::res_fn_power_visc res_fn_power_visc The power of dx/Ld in the Kh resolution function. Any positive integer power may be used, but even powers and especially 2 are coded to be more efficient. real real mom_lateral_mixing_coeffs::varmix_cs::visbeck_s_max visbeck_s_max Upper bound on slope used in Eady growth rate [nondim]. logical logical mom_lateral_mixing_coeffs::varmix_cs::use_qg_leith_gm use_qg_leith_gm If true, uses the QG Leith viscosity as the GM coefficient. logical logical mom_lateral_mixing_coeffs::varmix_cs::use_beta_in_qg_leith use_beta_in_qg_leith If true, includes the beta term in the QG Leith GM coefficient. type(wave_speed_cs), pointer type(wave_speed_cs), pointer mom_lateral_mixing_coeffs::varmix_cs::wave_speed_csp wave_speed_csp => NULL() Wave speed control structure. type(group_pass_type) type(group_pass_type) mom_lateral_mixing_coeffs::varmix_cs::pass_cg1 pass_cg1 For group halo pass. logical logical mom_lateral_mixing_coeffs::varmix_cs::debug debug If true, write out checksums of data for debugging. Variable mixing coefficients. real logical type(wave_speed_cs), pointer diag_ctrl integer group_pass_type mom_lateral_mixing_coeffs::varmix_cs depth_scaled_khth calculate_cg1 use_stored_slopes calculate_eady_growth_rate use_visbeck calculate_rd_dx khth_use_ebt_struct resoln_scaled_khtr use_qg_leith_gm calculate_depth_fns ... wave_speed_csp pass_cg1 diag id_kh_v_qg id_s2_u id_s2_v id_n2_u res_fn_power_khth id_n2_v id_l2u id_l2v varmix_ktop id_rd_dx ... beta_dx2_u beta_dx2_h sn_u f2_dx2_h beta_dx2_v sn_v res_coef_visc visbeck_l_scale depth_scaled_khth_h0 res_fn_q ... mom_lateral_mixing_coeffs::varmix_csbeta_dx2_h mom_lateral_mixing_coeffs::varmix_csbeta_dx2_q mom_lateral_mixing_coeffs::varmix_csbeta_dx2_u mom_lateral_mixing_coeffs::varmix_csbeta_dx2_v mom_lateral_mixing_coeffs::varmix_cscalculate_cg1 mom_lateral_mixing_coeffs::varmix_cscalculate_depth_fns mom_lateral_mixing_coeffs::varmix_cscalculate_eady_growth_rate mom_lateral_mixing_coeffs::varmix_cscalculate_rd_dx mom_lateral_mixing_coeffs::varmix_cscalculate_res_fns mom_lateral_mixing_coeffs::varmix_cscg1 mom_lateral_mixing_coeffs::varmix_csdebug mom_lateral_mixing_coeffs::varmix_csdepth_fn_u mom_lateral_mixing_coeffs::varmix_csdepth_fn_v mom_lateral_mixing_coeffs::varmix_csdepth_scaled_khth mom_lateral_mixing_coeffs::varmix_csdepth_scaled_khth_exp mom_lateral_mixing_coeffs::varmix_csdepth_scaled_khth_h0 mom_lateral_mixing_coeffs::varmix_csdiag mom_lateral_mixing_coeffs::varmix_csebt_struct mom_lateral_mixing_coeffs::varmix_csf2_dx2_h mom_lateral_mixing_coeffs::varmix_csf2_dx2_q mom_lateral_mixing_coeffs::varmix_csf2_dx2_u mom_lateral_mixing_coeffs::varmix_csf2_dx2_v mom_lateral_mixing_coeffs::varmix_csid_kh_u_qg mom_lateral_mixing_coeffs::varmix_csid_kh_v_qg mom_lateral_mixing_coeffs::varmix_csid_l2u mom_lateral_mixing_coeffs::varmix_csid_l2v mom_lateral_mixing_coeffs::varmix_csid_n2_u mom_lateral_mixing_coeffs::varmix_csid_n2_v mom_lateral_mixing_coeffs::varmix_csid_rd_dx mom_lateral_mixing_coeffs::varmix_csid_res_fn mom_lateral_mixing_coeffs::varmix_csid_s2_u mom_lateral_mixing_coeffs::varmix_csid_s2_v mom_lateral_mixing_coeffs::varmix_csid_sn_u mom_lateral_mixing_coeffs::varmix_csid_sn_v mom_lateral_mixing_coeffs::varmix_csinterpolate_res_fn mom_lateral_mixing_coeffs::varmix_cskappa_smooth mom_lateral_mixing_coeffs::varmix_cskh_u_qg mom_lateral_mixing_coeffs::varmix_cskh_v_qg mom_lateral_mixing_coeffs::varmix_cskhth_use_ebt_struct mom_lateral_mixing_coeffs::varmix_csl2u mom_lateral_mixing_coeffs::varmix_csl2v mom_lateral_mixing_coeffs::varmix_cslaplac3_const_u mom_lateral_mixing_coeffs::varmix_cslaplac3_const_v mom_lateral_mixing_coeffs::varmix_cspass_cg1 mom_lateral_mixing_coeffs::varmix_csrd_dx_h mom_lateral_mixing_coeffs::varmix_csres_coef_khth mom_lateral_mixing_coeffs::varmix_csres_coef_visc mom_lateral_mixing_coeffs::varmix_csres_fn_h mom_lateral_mixing_coeffs::varmix_csres_fn_power_khth mom_lateral_mixing_coeffs::varmix_csres_fn_power_visc mom_lateral_mixing_coeffs::varmix_csres_fn_q mom_lateral_mixing_coeffs::varmix_csres_fn_u mom_lateral_mixing_coeffs::varmix_csres_fn_v mom_lateral_mixing_coeffs::varmix_csresoln_scaled_kh mom_lateral_mixing_coeffs::varmix_csresoln_scaled_khth mom_lateral_mixing_coeffs::varmix_csresoln_scaled_khtr mom_lateral_mixing_coeffs::varmix_csresoln_use_ebt mom_lateral_mixing_coeffs::varmix_csslope_x mom_lateral_mixing_coeffs::varmix_csslope_y mom_lateral_mixing_coeffs::varmix_cssn_u mom_lateral_mixing_coeffs::varmix_cssn_v mom_lateral_mixing_coeffs::varmix_csuse_beta_in_qg_leith mom_lateral_mixing_coeffs::varmix_csuse_qg_leith_gm mom_lateral_mixing_coeffs::varmix_csuse_stored_slopes mom_lateral_mixing_coeffs::varmix_csuse_variable_mixing mom_lateral_mixing_coeffs::varmix_csuse_visbeck mom_lateral_mixing_coeffs::varmix_csvarmix_ktop mom_lateral_mixing_coeffs::varmix_csvisbeck_l_scale mom_lateral_mixing_coeffs::varmix_csvisbeck_s_max mom_lateral_mixing_coeffs::varmix_cswave_speed_csp