ocean_wave_speed_config_t Derived Type

type, public :: ocean_wave_speed_config_t

&ocean_wavespeed_nml: first-baroclinic wave speed + deformation radius. Diagnostic, default off — feeds GM/Redi/MEKE resolution scaling.


Inherited by

type~~ocean_wave_speed_config_t~~InheritedByGraph type~ocean_wave_speed_config_t ocean_wave_speed_config_t type~ocean_config_t ocean_config_t type~ocean_config_t->type~ocean_wave_speed_config_t wavespeed type~config_t config_t type~config_t->type~ocean_config_t ocean type~ocean_handle_t ocean_handle_t type~ocean_handle_t->type~config_t cfg

Components

Type Visibility Attributes Name Initial
logical, public :: enable = .false.

Master switch. Default off — bit-identity preserved.
real(kind=wp), public :: mono_n2 = -1.0_wp

DEFERRED: N^2-monotonising depth. < 0 = off.
integer, public :: n_wavespeed = 1

Recompute cadence (every N steps); slow diagnostic.
logical, public :: use_ebt = .false.

DEFERRED: equivalent-barotropic / pressure-Neumann variant.

Source Code

   type :: ocean_wave_speed_config_t
      !! `&ocean_wavespeed_nml`: first-baroclinic wave speed + deformation
      !! radius.  Diagnostic, default off — feeds GM/Redi/MEKE resolution scaling.
      logical :: enable = .false.
         !! Master switch.  Default off — bit-identity preserved.
      real(wp) :: mono_n2 = -1.0_wp
         !! DEFERRED: N^2-monotonising depth.  `< 0` = off.
      logical :: use_ebt = .false.
         !! DEFERRED: equivalent-barotropic / pressure-Neumann variant.
      integer :: n_wavespeed = 1
         !! Recompute cadence (every N steps); slow diagnostic.
   end type ocean_wave_speed_config_t