mom_wave_speed::wave_speed_cs logical logical mom_wave_speed::wave_speed_cs::use_ebt_mode use_ebt_mode = .false. If true, calculate the equivalent barotropic wave speed instead of the first baroclinic wave speed. This parameter controls the default behavior of wave_speed() which can be overridden by optional arguments. logical logical mom_wave_speed::wave_speed_cs::better_cg1_est better_cg1_est = .false. If true, use an improved estimate of the first mode internal wave speed. real real mom_wave_speed::wave_speed_cs::mono_n2_column_fraction mono_n2_column_fraction = 0. The lower fraction of water column over which N2 is limited as monotonic for the purposes of calculating the equivalent barotropic wave speed. This parameter controls the default behavior of wave_speed() which can be overridden by optional arguments. real real mom_wave_speed::wave_speed_cs::mono_n2_depth mono_n2_depth = -1. The depth below which N2 is limited as monotonic for the purposes of calculating the equivalent barotropic wave speed [Z ~> m]. This parameter controls the default behavior of wave_speed() which can be overridden by optional arguments. real real mom_wave_speed::wave_speed_cs::min_speed2 min_speed2 = 0. The minimum mode 1 internal wave speed squared [L2 T-2 ~> m2 s-2]. real real mom_wave_speed::wave_speed_cs::wave_speed_tol wave_speed_tol = 0.001 The fractional tolerance with which to solve for the wave speeds [nondim]. type(remapping_cs) type(remapping_cs) mom_wave_speed::wave_speed_cs::remapping_cs remapping_cs Used for vertical remapping when calculating equivalent barotropic mode structure. logical logical mom_wave_speed::wave_speed_cs::remap_answers_2018 remap_answers_2018 = .true. If true, use the order of arithmetic and expressions that recover the remapping answers from 2018. If false, use more robust forms of the same remapping expressions. type(diag_ctrl), pointer type(diag_ctrl), pointer mom_wave_speed::wave_speed_cs::diag diag Diagnostics control structure. Control structure for MOM_wave_speed. mom_remapping::remapping_cs answers_2018 boundary_extrapolation check_reconstruction check_remapping force_bounds_in_subcell degree remapping_scheme real mom_eos::eos_type compressible eos_quadrature drho_ds drho_dt dtfr_dp dtfr_ds kg_m3_to_r l_t_to_m_s m_to_z r_to_kg_m3 rho_t0_s0 rl2_t2_to_pa ... form_of_eos form_of_tfreeze coord_sigma::sigma_cs coordinateresolution min_thickness nk mom_diag_mediator::diagcs_dsamp axesb1 axesbi axesbl axescu1 axescui axescul axescv1 axescvi axescvl axest1 ... mask2dbu mask2dcu mask2dcv mask2dt mask3dbi mask3dbl mask3dcui mask3dcul mask3dcvi mask3dcvl ... iec ied ieg iegb isc isd isg isgb jec jed ... coord_zlike::zlike_cs coordinateresolution min_thickness nk mom_grid::ocean_grid_type bathymetry_at_vel nonblocking_updates symmetric us domain domain_aux block hi hid2 x_axis_units y_axis_units areabu areacu areacv areat areat_global bathyt coriolisbu cos_rot dblock_u dblock_v ... first_direction idg_offset iec iecb ied iedb ieg iegb isc iscb ... mom_diag_mediator::diag_dsamp mask2d mask3d mom_diag_mediator::diag_grids_type h mom_regridding::regridding_cs sigma_cs integrate_downward_for_e remap_answers_2018 set_maximum_depths target_density_set slight_cs interp_cs adapt_cs rho_cs hycom_cs zlike_cs nk regridding_scheme compressibility_fraction coord_scale coordinateresolution depth_of_time_filter_deep depth_of_time_filter_shallow max_depth_index_scale max_interface_depths max_layer_thickness min_thickness old_grid_weight ... logical character(64) regrid_interp::interp_cs_type answers_2018 boundary_extrapolation interpolation_scheme character(len=40) character(len=8) character(len=9) domain2d time_type mom_domains::mom_domain_type maskmap nonblocking_updates symmetric thin_halo_updates mpp_domain mpp_domain_d2 io_layout layout niglobal nihalo njglobal njhalo x_flags y_flags mom_diag_mediator::diag_grid_storage diag_grids h_state num_diag_coords coord_hycom::hycom_cs interp_cs coordinateresolution max_interface_depths max_layer_thickness target_density nk character(len=15) mom_wave_speed::wave_speed_cs better_cg1_est remap_answers_2018 use_ebt_mode diag min_speed2 mono_n2_column_fraction mono_n2_depth wave_speed_tol remapping_cs coord_slight::slight_cs fix_haloclines interp_cs compressibility_fraction dz_ml_min halocline_filter_length halocline_strat_tol max_interface_depths max_layer_thickness min_thickness nlay_ml_offset ref_pressure rho_ml_avg_depth ... nk nz_fixed_surface coord_rho::rho_cs integrate_downward_for_e interp_cs min_thickness ref_pressure target_density nk character(len=10) mom_verticalgrid::verticalgrid_type boussinesq zaxislongname zaxisunits angstrom_h angstrom_m angstrom_z g_earth g_prime h_subroundoff h_to_kg_m2 h_to_m h_to_mks h_to_pa ... direction ke nk_rho_varies nkml integer mom_diag_mediator::diag_type in_use v_extensive next debug_str axes conversion_factor downsample_diag_id fms_diag_id fms_xyave_diag_id xyz_method coord_adapt::adapt_cs adaptdomin adaptalpha adaptbuoycoeff adaptdrho0 adapttimeratio adaptzoom adaptzoomcoeff coordinateresolution nk mom_diag_mediator::axes_grp is_h_point is_interface is_layer is_native is_q_point is_u_point is_v_point needs_interpolating needs_remapping diag_cs v_cell_method x_cell_method y_cell_method xyave_axes mask2d mask3d downsample_level handles id_area id_volume nz rank vertical_coordinate_number id dsamp character(len=16) mom_hor_index::hor_index_type symmetric idg_offset iec iecb ied iedb ieg iegb isc iscb isd ... mom_unit_scaling::unit_scale_type j_kg_to_q j_kg_to_q_restart kg_m2s_to_rz_t kg_m3_to_r kg_m3_to_r_restart l_t2_to_m_s2 l_t_to_m_s l_to_m l_to_z m2_s_to_z2_t ... mom_diag_remap::diag_remap_ctrl regrid_cs diag_coord_name answers_2018 configured initialized used vertical_coord_name diag_module_suffix h h_extensive interface_axes_id layer_axes_id nz vertical_coord remap_cs mom_diag_mediator::diag_ctrl ave_enabled diag_as_chksum diag_grid_overridden grid_space_axes time_end diag_grid_temp diags gv g dsamp us diag_remap_cs eqn_of_state axesb1 axesbi axesbl axescu1 axescui axescul axescv1 axescvi axescvl axesnull ... h h_begin mask2dbu mask2dcu mask2dcv mask2dt mask3dbi mask3dbl mask3dcui mask3dcul ... available_diag_doc_unit chksum_iounit ie ied is isd je jed js jsd ... mom_wave_speed::wave_speed_csbetter_cg1_est mom_wave_speed::wave_speed_csdiag mom_wave_speed::wave_speed_csmin_speed2 mom_wave_speed::wave_speed_csmono_n2_column_fraction mom_wave_speed::wave_speed_csmono_n2_depth mom_wave_speed::wave_speed_csremap_answers_2018 mom_wave_speed::wave_speed_csremapping_cs mom_wave_speed::wave_speed_csuse_ebt_mode mom_wave_speed::wave_speed_cswave_speed_tol