mom_tidal_forcing::tidal_forcing_cs logical logical mom_tidal_forcing::tidal_forcing_cs::use_sal_scalar use_sal_scalar If true, use the scalar approximation when calculating self-attraction and loading. logical logical mom_tidal_forcing::tidal_forcing_cs::tidal_sal_from_file tidal_sal_from_file If true, Read the tidal self-attraction and loading from input files, specified by TIDAL_INPUT_FILE. logical logical mom_tidal_forcing::tidal_forcing_cs::use_prev_tides use_prev_tides If true, use the SAL from the previous iteration of the tides to facilitate convergence. logical logical mom_tidal_forcing::tidal_forcing_cs::use_eq_phase use_eq_phase If true, tidal forcing is phase-shifted to match equilibrium tide. Set to false if providing tidal phases that have already been shifted by the astronomical/equilibrium argument. real real mom_tidal_forcing::tidal_forcing_cs::sal_scalar sal_scalar The constant of proportionality between sea surface height (really it should be bottom pressure) anomalies and bottom geopotential anomalies. integer integer mom_tidal_forcing::tidal_forcing_cs::nc nc The number of tidal constituents in use. real, dimension(max_constituents) real, dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::freq freq The frequency of a tidal constituent [s-1]. real, dimension(max_constituents) real, dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::phase0 phase0 The phase of a tidal constituent at time 0, in radians. real, dimension(max_constituents) real, dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::amp amp The amplitude of a tidal constituent at time 0 [m]. real, dimension(max_constituents) real, dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::love_no love_no The Love number of a tidal constituent at time 0 [nondim]. integer, dimension(max_constituents) integer, dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::struct struct An encoded spatial structure for each constituent. character(len=16), dimension(max_constituents) character (len=16), dimension(max_constituents) mom_tidal_forcing::tidal_forcing_cs::const_name const_name The name of each constituent. type(time_type) type(time_type) mom_tidal_forcing::tidal_forcing_cs::time_ref time_ref Reference time (t = 0) used to calculate tidal forcing. type(astro_longitudes) type(astro_longitudes) mom_tidal_forcing::tidal_forcing_cs::tidal_longitudes tidal_longitudes Astronomical longitudes used to calculate tidal phases at t = 0. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::sin_struct sin_struct => NULL() The sine and cosine based structures that can. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::cos_struct cos_struct => NULL() be associated with the astronomical forcing. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::cosphasesal cosphasesal => NULL() The cosine and sine of the phase of the. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::sinphasesal sinphasesal => NULL() self-attraction and loading amphidromes. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::ampsal ampsal => NULL() The amplitude of the SAL [m]. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::cosphase_prev cosphase_prev => NULL() The cosine and sine of the phase of the. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::sinphase_prev sinphase_prev => NULL() amphidromes in the previous tidal solutions. real, dimension(:,:,:), pointer real, dimension(:,:,:), pointer mom_tidal_forcing::tidal_forcing_cs::amp_prev amp_prev => NULL() The amplitude of the previous tidal solution [m]. The control structure for the MOM_tidal_forcing module. real mom_tidal_forcing::astro_longitudes h n p s logical time_type mom_tidal_forcing::tidal_forcing_cs const_name tidal_sal_from_file use_prev_tides use_sal_scalar use_eq_phase time_ref tidal_longitudes struct nc sinphase_prev cos_struct sin_struct cosphasesal freq phase0 ampsal cosphase_prev amp_prev sinphasesal ... integer character(len=16) mom_tidal_forcing::tidal_forcing_csamp mom_tidal_forcing::tidal_forcing_csamp_prev mom_tidal_forcing::tidal_forcing_csampsal mom_tidal_forcing::tidal_forcing_csconst_name mom_tidal_forcing::tidal_forcing_cscos_struct mom_tidal_forcing::tidal_forcing_cscosphase_prev mom_tidal_forcing::tidal_forcing_cscosphasesal mom_tidal_forcing::tidal_forcing_csfreq mom_tidal_forcing::tidal_forcing_cslove_no mom_tidal_forcing::tidal_forcing_csnc mom_tidal_forcing::tidal_forcing_csphase0 mom_tidal_forcing::tidal_forcing_cssal_scalar mom_tidal_forcing::tidal_forcing_cssin_struct mom_tidal_forcing::tidal_forcing_cssinphase_prev mom_tidal_forcing::tidal_forcing_cssinphasesal mom_tidal_forcing::tidal_forcing_csstruct mom_tidal_forcing::tidal_forcing_cstidal_longitudes mom_tidal_forcing::tidal_forcing_cstidal_sal_from_file mom_tidal_forcing::tidal_forcing_cstime_ref mom_tidal_forcing::tidal_forcing_csuse_eq_phase mom_tidal_forcing::tidal_forcing_csuse_prev_tides mom_tidal_forcing::tidal_forcing_csuse_sal_scalar