mom_dynamics_unsplit::mom_dyn_unsplit_cs integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_uh id_uh = -1 Diagnostic IDs. integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_vh id_vh = -1 Diagnostic IDs. integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_pfu id_pfu = -1 Diagnostic IDs. integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_pfv id_pfv = -1 Diagnostic IDs. integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_cau id_cau = -1 Diagnostic IDs. integer integer mom_dynamics_unsplit::mom_dyn_unsplit_cs::id_cav id_cav = -1 Diagnostic IDs. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::cau cau CAu = f*v - u.grad(u) [L T-2 ~> m s-2]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::pfu pfu PFu = -dM/dx [L T-2 ~> m s-2]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::diffu diffu Zonal acceleration due to convergence of the along-isopycnal stress tensor [L T-2 ~> m s-2]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::cav cav CAv = -f*u - u.grad(v) [L T-2 ~> m s-2]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::pfv pfv PFv = -dM/dy [L T-2 ~> m s-2]. real, dimension(:, :, :), allocatable real, dimension( : , : , : ), allocatable mom_dynamics_unsplit::mom_dyn_unsplit_cs::diffv diffv Meridional acceleration due to convergence of the along-isopycnal stress tensor [L T-2 ~> m s-2]. real, dimension(:,:), pointer real, dimension(:,:), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::taux_bot taux_bot => NULL() frictional x-bottom stress from the ocean to the seafloor [R L Z T-2 ~> Pa] real, dimension(:,:), pointer real, dimension(:,:), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::tauy_bot tauy_bot => NULL() frictional y-bottom stress from the ocean to the seafloor [R L Z T-2 ~> Pa] logical logical mom_dynamics_unsplit::mom_dyn_unsplit_cs::use_correct_dt_visc use_correct_dt_visc If true, use the correct timestep in the viscous terms applied in the first predictor step with the unsplit time stepping scheme, and in the calculation of the turbulent mixed layer properties for viscosity. The default should be true, but it is false. logical logical mom_dynamics_unsplit::mom_dyn_unsplit_cs::debug debug If true, write verbose checksums for debugging purposes. logical logical mom_dynamics_unsplit::mom_dyn_unsplit_cs::module_is_initialized module_is_initialized = .false. Record whether this mouled has been initialzed. type(diag_ctrl), pointer type(diag_ctrl), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::diag diag => NULL() A structure that is used to regulate the timing of diagnostic output. type(accel_diag_ptrs), pointer type(accel_diag_ptrs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::adp adp => NULL() A structure pointing to the accelerations in the momentum equations, which can later be used to calculate derived diagnostics like energy budgets. type(cont_diag_ptrs), pointer type(cont_diag_ptrs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::cdp cdp => NULL() A structure with pointers to various terms in the continuity equations, which can later be used to calculate derived diagnostics like energy budgets. type(hor_visc_cs), pointer type(hor_visc_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::hor_visc_csp hor_visc_csp => NULL() A pointer to the horizontal viscosity control structure. type(continuity_cs), pointer type(continuity_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::continuity_csp continuity_csp => NULL() A pointer to the continuity control structure. type(coriolisadv_cs), pointer type(coriolisadv_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::coriolisadv_csp coriolisadv_csp => NULL() A pointer to the CoriolisAdv control structure. type(pressureforce_cs), pointer type(pressureforce_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::pressureforce_csp pressureforce_csp => NULL() A pointer to the PressureForce control structure. type(vertvisc_cs), pointer type(vertvisc_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::vertvisc_csp vertvisc_csp => NULL() A pointer to the vertvisc control structure. type(set_visc_cs), pointer type(set_visc_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::set_visc_csp set_visc_csp => NULL() A pointer to the set_visc control structure. type(tidal_forcing_cs), pointer type(tidal_forcing_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::tides_csp tides_csp => NULL() A pointer to the tidal forcing control structure. type(ale_cs), pointer type(ale_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::ale_csp ale_csp => NULL() A pointer to the ALE control structure. type(ocean_obc_type), pointer type(ocean_obc_type), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::obc obc => NULL() A pointer to an open boundary. type(update_obc_cs), pointer type(update_obc_cs), pointer mom_dynamics_unsplit::mom_dyn_unsplit_cs::update_obc_csp update_obc_csp => NULL() A pointer to the update_OBC control structure. MOM_dynamics_unsplit module control structure. type(update_obc_cs), pointer real type(continuity_cs), pointer cont_diag_ptrs logical type(ale_cs), pointer type(coriolisadv_cs), pointer type(set_visc_cs), pointer ocean_obc_type diag_ctrl type(hor_visc_cs), pointer integer type(pressureforce_cs), pointer type(tidal_forcing_cs), pointer type(vertvisc_cs), pointer accel_diag_ptrs mom_dynamics_unsplit::mom_dyn_unsplit_cs ale_csp use_correct_dt_visc debug module_is_initialized obc set_visc_csp vertvisc_csp cdp hor_visc_csp continuity_csp update_obc_csp coriolisadv_csp diag tides_csp pressureforce_csp id_vh id_cau id_uh id_cav id_pfu id_pfv cau cav pfu pfv diffu diffv taux_bot tauy_bot adp mom_dynamics_unsplit::mom_dyn_unsplit_csadp mom_dynamics_unsplit::mom_dyn_unsplit_csale_csp mom_dynamics_unsplit::mom_dyn_unsplit_cscau mom_dynamics_unsplit::mom_dyn_unsplit_cscav mom_dynamics_unsplit::mom_dyn_unsplit_cscdp mom_dynamics_unsplit::mom_dyn_unsplit_cscontinuity_csp mom_dynamics_unsplit::mom_dyn_unsplit_cscoriolisadv_csp mom_dynamics_unsplit::mom_dyn_unsplit_csdebug mom_dynamics_unsplit::mom_dyn_unsplit_csdiag mom_dynamics_unsplit::mom_dyn_unsplit_csdiffu mom_dynamics_unsplit::mom_dyn_unsplit_csdiffv mom_dynamics_unsplit::mom_dyn_unsplit_cshor_visc_csp mom_dynamics_unsplit::mom_dyn_unsplit_csid_cau mom_dynamics_unsplit::mom_dyn_unsplit_csid_cav mom_dynamics_unsplit::mom_dyn_unsplit_csid_pfu mom_dynamics_unsplit::mom_dyn_unsplit_csid_pfv mom_dynamics_unsplit::mom_dyn_unsplit_csid_uh mom_dynamics_unsplit::mom_dyn_unsplit_csid_vh mom_dynamics_unsplit::mom_dyn_unsplit_csmodule_is_initialized mom_dynamics_unsplit::mom_dyn_unsplit_csobc mom_dynamics_unsplit::mom_dyn_unsplit_cspfu mom_dynamics_unsplit::mom_dyn_unsplit_cspfv mom_dynamics_unsplit::mom_dyn_unsplit_cspressureforce_csp mom_dynamics_unsplit::mom_dyn_unsplit_csset_visc_csp mom_dynamics_unsplit::mom_dyn_unsplit_cstaux_bot mom_dynamics_unsplit::mom_dyn_unsplit_cstauy_bot mom_dynamics_unsplit::mom_dyn_unsplit_cstides_csp mom_dynamics_unsplit::mom_dyn_unsplit_csupdate_obc_csp mom_dynamics_unsplit::mom_dyn_unsplit_csuse_correct_dt_visc mom_dynamics_unsplit::mom_dyn_unsplit_csvertvisc_csp