\hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs}{}\section{mom\+\_\+tidal\+\_\+forcing\+::tidal\+\_\+forcing\+\_\+cs Type Reference}
\label{structmom__tidal__forcing_1_1tidal__forcing__cs}\index{mom\_tidal\_forcing::tidal\_forcing\_cs@{mom\_tidal\_forcing::tidal\_forcing\_cs}}


\subsection{Detailed Description}
The control structure for the M\+O\+M\+\_\+tidal\+\_\+forcing module. 

Definition at line 36 of file M\+O\+M\+\_\+tidal\+\_\+forcing.\+F90.



Collaboration diagram for mom\+\_\+tidal\+\_\+forcing\+::tidal\+\_\+forcing\+\_\+cs\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{structmom__tidal__forcing_1_1tidal__forcing__cs__coll__graph}
\end{center}
\end{figure}
\subsection*{Public variables and constants}
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ad8f6d728181d356a5f9af8e46898a925}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ad8f6d728181d356a5f9af8e46898a925}} 
logical \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ad8f6d728181d356a5f9af8e46898a925}{use\+\_\+sal\+\_\+scalar}}
\begin{DoxyCompactList}\small\item\em If true, use the scalar approximation when calculating self-\/attraction and loading. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a0c067e412b64f7ce3d604192007be56e}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a0c067e412b64f7ce3d604192007be56e}} 
logical \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a0c067e412b64f7ce3d604192007be56e}{tidal\+\_\+sal\+\_\+from\+\_\+file}}
\begin{DoxyCompactList}\small\item\em If true, Read the tidal self-\/attraction and loading from input files, specified by T\+I\+D\+A\+L\+\_\+\+I\+N\+P\+U\+T\+\_\+\+F\+I\+LE. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ab80fde2588dee266d71832e716fb1c47}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ab80fde2588dee266d71832e716fb1c47}} 
logical \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ab80fde2588dee266d71832e716fb1c47}{use\+\_\+prev\+\_\+tides}}
\begin{DoxyCompactList}\small\item\em If true, use the S\+AL from the previous iteration of the tides to facilitate convergence. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a8f12ece02d07e813f1a4f3f77ec8b848}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a8f12ece02d07e813f1a4f3f77ec8b848}} 
logical \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a8f12ece02d07e813f1a4f3f77ec8b848}{use\+\_\+eq\+\_\+phase}}
\begin{DoxyCompactList}\small\item\em 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. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ad838af6bf4cb211057abf5493ec6a134}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ad838af6bf4cb211057abf5493ec6a134}} 
real \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ad838af6bf4cb211057abf5493ec6a134}{sal\+\_\+scalar}}
\begin{DoxyCompactList}\small\item\em The constant of proportionality between sea surface height (really it should be bottom pressure) anomalies and bottom geopotential anomalies. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a411c6106811957849cb80efb010e221d}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a411c6106811957849cb80efb010e221d}} 
integer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a411c6106811957849cb80efb010e221d}{nc}}
\begin{DoxyCompactList}\small\item\em The number of tidal constituents in use. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a34d079f7f3ed19bd78c1989ce3da3e37}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a34d079f7f3ed19bd78c1989ce3da3e37}} 
real, dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a34d079f7f3ed19bd78c1989ce3da3e37}{freq}}
\begin{DoxyCompactList}\small\item\em The frequency of a tidal constituent \mbox{[}s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a7d5bfcdd5a972c78d7d6482f42182e7a}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a7d5bfcdd5a972c78d7d6482f42182e7a}} 
real, dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a7d5bfcdd5a972c78d7d6482f42182e7a}{phase0}}
\begin{DoxyCompactList}\small\item\em The phase of a tidal constituent at time 0, in radians. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_afdba0111d0aa698ef21a0cad72dabea8}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_afdba0111d0aa698ef21a0cad72dabea8}} 
real, dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_afdba0111d0aa698ef21a0cad72dabea8}{amp}}
\begin{DoxyCompactList}\small\item\em The amplitude of a tidal constituent at time 0 \mbox{[}m\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a1a66c4deb0e172afdb7f7e2d7265b008}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a1a66c4deb0e172afdb7f7e2d7265b008}} 
real, dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a1a66c4deb0e172afdb7f7e2d7265b008}{love\+\_\+no}}
\begin{DoxyCompactList}\small\item\em The Love number of a tidal constituent at time 0 \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ad5a14d708b6bb8c3b7397aa76223a86f}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ad5a14d708b6bb8c3b7397aa76223a86f}} 
integer, dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ad5a14d708b6bb8c3b7397aa76223a86f}{struct}}
\begin{DoxyCompactList}\small\item\em An encoded spatial structure for each constituent. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a255f9691dffd9626d178c37e58e48dab}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a255f9691dffd9626d178c37e58e48dab}} 
character(len=16), dimension(\mbox{\hyperlink{namespacemom__tidal__forcing_a9d0f13c449127ecf48932f449bd4993f}{max\+\_\+constituents}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a255f9691dffd9626d178c37e58e48dab}{const\+\_\+name}}
\begin{DoxyCompactList}\small\item\em The name of each constituent. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a18d7c257941b53379c78984aa96000ab}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a18d7c257941b53379c78984aa96000ab}} 
type(time\+\_\+type) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a18d7c257941b53379c78984aa96000ab}{time\+\_\+ref}}
\begin{DoxyCompactList}\small\item\em Reference time (t = 0) used to calculate tidal forcing. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a5c48ae9c1c52deb2f660ff9370044792}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a5c48ae9c1c52deb2f660ff9370044792}} 
type(\mbox{\hyperlink{structmom__tidal__forcing_1_1astro__longitudes}{astro\+\_\+longitudes}}) \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a5c48ae9c1c52deb2f660ff9370044792}{tidal\+\_\+longitudes}}
\begin{DoxyCompactList}\small\item\em Astronomical longitudes used to calculate tidal phases at t = 0. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a49068afec003eb8b2641e7276a8b45df}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a49068afec003eb8b2641e7276a8b45df}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a49068afec003eb8b2641e7276a8b45df}{sin\+\_\+struct}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The sine and cosine based structures that can. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_abbec6a96d129d93c58feccad79507fcb}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_abbec6a96d129d93c58feccad79507fcb}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_abbec6a96d129d93c58feccad79507fcb}{cos\+\_\+struct}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em be associated with the astronomical forcing. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ad10c6ff552f301d22f5ab1b5b2e49fc1}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ad10c6ff552f301d22f5ab1b5b2e49fc1}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ad10c6ff552f301d22f5ab1b5b2e49fc1}{cosphasesal}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The cosine and sine of the phase of the. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ab8a457432941c72ced08a914b3fb9c25}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ab8a457432941c72ced08a914b3fb9c25}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ab8a457432941c72ced08a914b3fb9c25}{sinphasesal}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em self-\/attraction and loading amphidromes. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_acf37fbfd6a96d4fdf8a08406b4ba30cb}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_acf37fbfd6a96d4fdf8a08406b4ba30cb}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_acf37fbfd6a96d4fdf8a08406b4ba30cb}{ampsal}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The amplitude of the S\+AL \mbox{[}m\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_ae946850212ea2c7a271751310ae9fc74}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_ae946850212ea2c7a271751310ae9fc74}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_ae946850212ea2c7a271751310ae9fc74}{cosphase\+\_\+prev}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The cosine and sine of the phase of the. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a88b21e940687e3a3f92b84c3a5658dea}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a88b21e940687e3a3f92b84c3a5658dea}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a88b21e940687e3a3f92b84c3a5658dea}{sinphase\+\_\+prev}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em amphidromes in the previous tidal solutions. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__tidal__forcing_1_1tidal__forcing__cs_a8b8df877215003a2a54c8ee7d6a703f8}\label{structmom__tidal__forcing_1_1tidal__forcing__cs_a8b8df877215003a2a54c8ee7d6a703f8}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__tidal__forcing_1_1tidal__forcing__cs_a8b8df877215003a2a54c8ee7d6a703f8}{amp\+\_\+prev}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The amplitude of the previous tidal solution \mbox{[}m\mbox{]}. \end{DoxyCompactList}\end{DoxyCompactItemize}


\subsection{Detailed Description}
The control structure for the M\+O\+M\+\_\+tidal\+\_\+forcing module. 

Definition at line 36 of file M\+O\+M\+\_\+tidal\+\_\+forcing.\+F90.



The documentation for this type was generated from the following file\+:\begin{DoxyCompactItemize}
\item 
/home/cermak/src/\+M\+O\+M6.\+devrob/src/parameterizations/lateral/M\+O\+M\+\_\+tidal\+\_\+forcing.\+F90\end{DoxyCompactItemize}