mom_int_tide_input::int_tide_input_cs integer integer mom_int_tide_input::int_tide_input_cs::id_tke_itidal id_tke_itidal = -1 Diagnostic IDs. integer integer mom_int_tide_input::int_tide_input_cs::id_nb id_nb = -1 Diagnostic IDs. integer integer mom_int_tide_input::int_tide_input_cs::id_n2_bot id_n2_bot = -1 Diagnostic IDs. logical logical mom_int_tide_input::int_tide_input_cs::debug debug If true, write verbose checksums for debugging. type(diag_ctrl), pointer type(diag_ctrl), pointer mom_int_tide_input::int_tide_input_cs::diag diag => NULL() A structure that is used to regulate the timing of diagnostic output. real real mom_int_tide_input::int_tide_input_cs::tke_itide_max tke_itide_max Maximum Internal tide conversion available to mix above the BBL [R Z3 T-3 ~> W m-2]. real real mom_int_tide_input::int_tide_input_cs::kappa_fill kappa_fill Vertical diffusivity used to interpolate sensible values of T & S into thin layers [Z2 T-1 ~> m2 s-1]. real, dimension(:,:), allocatable real, dimension(:,:), allocatable mom_int_tide_input::int_tide_input_cs::tke_itidal_coef tke_itidal_coef The time-invariant field that enters the TKE_itidal input calculation [R Z3 T-2 ~> J m-2]. character(len=200) character(len=200) mom_int_tide_input::int_tide_input_cs::inputdir inputdir The directory for input files. logical logical mom_int_tide_input::int_tide_input_cs::int_tide_source_test int_tide_source_test If true, apply an arbitrary generation site for internal tide testing (BDM) type(time_type) type(time_type) mom_int_tide_input::int_tide_input_cs::time_max_source time_max_source A time for use in testing internal tides. real real mom_int_tide_input::int_tide_input_cs::int_tide_source_x int_tide_source_x X Location of generation site for internal tide for testing (BDM) real real mom_int_tide_input::int_tide_input_cs::int_tide_source_y int_tide_source_y Y Location of generation site for internal tide for testing (BDM) This control structure holds parameters that regulate internal tide energy inputs. real logical time_type diag_ctrl integer character(len=200) mom_int_tide_input::int_tide_input_cs int_tide_source_test debug time_max_source inputdir diag id_nb id_tke_itidal id_n2_bot kappa_fill int_tide_source_x tke_itidal_coef int_tide_source_y tke_itide_max mom_int_tide_input::int_tide_input_csdebug mom_int_tide_input::int_tide_input_csdiag mom_int_tide_input::int_tide_input_csid_n2_bot mom_int_tide_input::int_tide_input_csid_nb mom_int_tide_input::int_tide_input_csid_tke_itidal mom_int_tide_input::int_tide_input_csinputdir mom_int_tide_input::int_tide_input_csint_tide_source_test mom_int_tide_input::int_tide_input_csint_tide_source_x mom_int_tide_input::int_tide_input_csint_tide_source_y mom_int_tide_input::int_tide_input_cskappa_fill mom_int_tide_input::int_tide_input_cstime_max_source mom_int_tide_input::int_tide_input_cstke_itidal_coef mom_int_tide_input::int_tide_input_cstke_itide_max