\hypertarget{structmom__internal__tides_1_1int__tide__cs}{}\section{mom\+\_\+internal\+\_\+tides\+:\+:int\+\_\+tide\+\_\+cs Type Reference}
\label{structmom__internal__tides_1_1int__tide__cs}\index{mom\+\_\+internal\+\_\+tides\+::int\+\_\+tide\+\_\+cs@{mom\+\_\+internal\+\_\+tides\+::int\+\_\+tide\+\_\+cs}}


\subsection{Detailed Description}
This control structure has parameters for the M\+O\+M\+\_\+internal\+\_\+tides module. 

Definition at line 38 of file M\+O\+M\+\_\+internal\+\_\+tides.\+F90.



Collaboration diagram for mom\+\_\+internal\+\_\+tides\+:\+:int\+\_\+tide\+\_\+cs\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[height=550pt]{structmom__internal__tides_1_1int__tide__cs__coll__graph}
\end{center}
\end{figure}
\subsection*{Public variables and constants}
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a8d23a248a6350b98cc5e3a0a23107236}\label{structmom__internal__tides_1_1int__tide__cs_a8d23a248a6350b98cc5e3a0a23107236}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a8d23a248a6350b98cc5e3a0a23107236}{do\+\_\+int\+\_\+tides}
\begin{DoxyCompactList}\small\item\em If true, use the internal tide code. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a3e7eb7aec2d2c3d55ef28c23640e6b01}\label{structmom__internal__tides_1_1int__tide__cs_a3e7eb7aec2d2c3d55ef28c23640e6b01}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a3e7eb7aec2d2c3d55ef28c23640e6b01}{nfreq} = 0
\begin{DoxyCompactList}\small\item\em The number of internal tide frequency bands. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a4f4890099e469f6673892e209fe13cf3}\label{structmom__internal__tides_1_1int__tide__cs_a4f4890099e469f6673892e209fe13cf3}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a4f4890099e469f6673892e209fe13cf3}{nmode} = 1
\begin{DoxyCompactList}\small\item\em The number of internal tide vertical modes. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ac287f01ebc1b7a13e6fbd7c72b6030bb}\label{structmom__internal__tides_1_1int__tide__cs_ac287f01ebc1b7a13e6fbd7c72b6030bb}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_ac287f01ebc1b7a13e6fbd7c72b6030bb}{nangle} = 24
\begin{DoxyCompactList}\small\item\em The number of internal tide angular orientations. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_afc0971f4925b786f434356f444710183}\label{structmom__internal__tides_1_1int__tide__cs_afc0971f4925b786f434356f444710183}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_afc0971f4925b786f434356f444710183}{energized\+\_\+angle} = -\/1
\begin{DoxyCompactList}\small\item\em If positive, only this angular band is energized for debugging purposes. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a075edda526ee0f0e8d65cbf5dc3cee96}\label{structmom__internal__tides_1_1int__tide__cs_a075edda526ee0f0e8d65cbf5dc3cee96}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a075edda526ee0f0e8d65cbf5dc3cee96}{corner\+\_\+adv}
\begin{DoxyCompactList}\small\item\em If true, use a corner advection rather than P\+PM. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a2980fe44b24e3cc4960ac29026ea35e8}\label{structmom__internal__tides_1_1int__tide__cs_a2980fe44b24e3cc4960ac29026ea35e8}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a2980fe44b24e3cc4960ac29026ea35e8}{upwind\+\_\+1st}
\begin{DoxyCompactList}\small\item\em If true, use a first-\/order upwind scheme. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a7e9c8d5b511a721bf986696c5608b738}\label{structmom__internal__tides_1_1int__tide__cs_a7e9c8d5b511a721bf986696c5608b738}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a7e9c8d5b511a721bf986696c5608b738}{simple\+\_\+2nd}
\begin{DoxyCompactList}\small\item\em If true, use a simple second order (arithmetic mean) interpolation of the edge values instead of the higher order interpolation. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab56a989908b806c7f67715750e1bad9e}\label{structmom__internal__tides_1_1int__tide__cs_ab56a989908b806c7f67715750e1bad9e}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab56a989908b806c7f67715750e1bad9e}{vol\+\_\+cfl}
\begin{DoxyCompactList}\small\item\em If true, use the ratio of the open face lengths to the tracer cell areas when estimating C\+FL numbers. Without aggress\+\_\+adjust, the default is false; it is always true with aggress\+\_\+adjust. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab5196d0b91ef40005e13c264ecac20c5}\label{structmom__internal__tides_1_1int__tide__cs_ab5196d0b91ef40005e13c264ecac20c5}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab5196d0b91ef40005e13c264ecac20c5}{use\+\_\+ppmang}
\begin{DoxyCompactList}\small\item\em If true, use P\+PM for advection of energy in angular space. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a98bd0c161a27fa556af9ddf74ef822e3}\label{structmom__internal__tides_1_1int__tide__cs_a98bd0c161a27fa556af9ddf74ef822e3}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a98bd0c161a27fa556af9ddf74ef822e3}{refl\+\_\+angle}
\begin{DoxyCompactList}\small\item\em local coastline/ridge/shelf angles read from file \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_aaef9f67f6d2e27e0aac18066f3772886}\label{structmom__internal__tides_1_1int__tide__cs_aaef9f67f6d2e27e0aac18066f3772886}} 
real \hyperlink{structmom__internal__tides_1_1int__tide__cs_aaef9f67f6d2e27e0aac18066f3772886}{nullangle} = -\/999.\+9
\begin{DoxyCompactList}\small\item\em placeholder value in cells with no reflection \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a6cc9c91f8f6dac6961cd5e9aafe01adc}\label{structmom__internal__tides_1_1int__tide__cs_a6cc9c91f8f6dac6961cd5e9aafe01adc}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a6cc9c91f8f6dac6961cd5e9aafe01adc}{refl\+\_\+pref}
\begin{DoxyCompactList}\small\item\em partial reflection coeff for each \char`\"{}coast cell\char`\"{} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a2a926dfd535e8e86d1cd3870e815300c}\label{structmom__internal__tides_1_1int__tide__cs_a2a926dfd535e8e86d1cd3870e815300c}} 
logical, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a2a926dfd535e8e86d1cd3870e815300c}{refl\+\_\+pref\+\_\+logical}
\begin{DoxyCompactList}\small\item\em true if reflecting cell with partial reflection \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a10480d3d59b653c4e23b3b5da502ef7b}\label{structmom__internal__tides_1_1int__tide__cs_a10480d3d59b653c4e23b3b5da502ef7b}} 
logical, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a10480d3d59b653c4e23b3b5da502ef7b}{refl\+\_\+dbl}
\begin{DoxyCompactList}\small\item\em identifies reflection cells where double reflection is possible (i.\+e. ridge cells) \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_af6acdcb169859b29b3cb1a329655a80b}\label{structmom__internal__tides_1_1int__tide__cs_af6acdcb169859b29b3cb1a329655a80b}} 
real, dimension(\+:,\+:,\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_af6acdcb169859b29b3cb1a329655a80b}{cp}
\begin{DoxyCompactList}\small\item\em horizontal phase speed \mbox{[}L T-\/1 $\sim$$>$ m s-\/1\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a1ee894ff4e65aea4115a0bb797337311}\label{structmom__internal__tides_1_1int__tide__cs_a1ee894ff4e65aea4115a0bb797337311}} 
real, dimension(\+:,\+:,\+:,\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a1ee894ff4e65aea4115a0bb797337311}{tke\+\_\+leak\+\_\+loss}
\begin{DoxyCompactList}\small\item\em energy lost due to misc background processes \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a723cbb2e6017c01cb46bf0a8e875d462}\label{structmom__internal__tides_1_1int__tide__cs_a723cbb2e6017c01cb46bf0a8e875d462}} 
real, dimension(\+:,\+:,\+:,\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a723cbb2e6017c01cb46bf0a8e875d462}{tke\+\_\+quad\+\_\+loss}
\begin{DoxyCompactList}\small\item\em energy lost due to quadratic bottom drag \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a446921d2311d100d8ffd3822cb9bf383}\label{structmom__internal__tides_1_1int__tide__cs_a446921d2311d100d8ffd3822cb9bf383}} 
real, dimension(\+:,\+:,\+:,\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a446921d2311d100d8ffd3822cb9bf383}{tke\+\_\+froude\+\_\+loss}
\begin{DoxyCompactList}\small\item\em energy lost due to wave breaking \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a30a4183c81f6b7fccee72b79f23e44a1}\label{structmom__internal__tides_1_1int__tide__cs_a30a4183c81f6b7fccee72b79f23e44a1}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a30a4183c81f6b7fccee72b79f23e44a1}{tke\+\_\+itidal\+\_\+loss\+\_\+fixed}
\begin{DoxyCompactList}\small\item\em Fixed part of the energy lost due to small-\/scale drag \mbox{[}R L-\/2 Z3 $\sim$$>$ kg m-\/2\mbox{]} here; This will be multiplied by N and the squared near-\/bottom velocity to get the energy losses in \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a90039a03fa824c7572b83283be21e433}\label{structmom__internal__tides_1_1int__tide__cs_a90039a03fa824c7572b83283be21e433}} 
real, dimension(\+:,\+:,\+:,\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a90039a03fa824c7572b83283be21e433}{tke\+\_\+itidal\+\_\+loss}
\begin{DoxyCompactList}\small\item\em energy lost due to small-\/scale wave drag \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ad026873b57a71beeef778b69a921e3db}\label{structmom__internal__tides_1_1int__tide__cs_ad026873b57a71beeef778b69a921e3db}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_ad026873b57a71beeef778b69a921e3db}{tot\+\_\+leak\+\_\+loss}
\begin{DoxyCompactList}\small\item\em Energy loss rates due to misc bakground processes, summed over angle, frequency and mode \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_aa31428eec2f98ac2b76ba6b32799f2fa}\label{structmom__internal__tides_1_1int__tide__cs_aa31428eec2f98ac2b76ba6b32799f2fa}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_aa31428eec2f98ac2b76ba6b32799f2fa}{tot\+\_\+quad\+\_\+loss}
\begin{DoxyCompactList}\small\item\em Energy loss rates due to quadratic bottom drag, summed over angle, frequency and mode \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ae0f089ef71502a1f9b0c7a151a7c820c}\label{structmom__internal__tides_1_1int__tide__cs_ae0f089ef71502a1f9b0c7a151a7c820c}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_ae0f089ef71502a1f9b0c7a151a7c820c}{tot\+\_\+itidal\+\_\+loss}
\begin{DoxyCompactList}\small\item\em Energy loss rates due to small-\/scale drag, summed over angle, frequency and mode \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a13dcb4231fa1e3f0f4b3a7f85c662f5b}\label{structmom__internal__tides_1_1int__tide__cs_a13dcb4231fa1e3f0f4b3a7f85c662f5b}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a13dcb4231fa1e3f0f4b3a7f85c662f5b}{tot\+\_\+froude\+\_\+loss}
\begin{DoxyCompactList}\small\item\em Energy loss rates due to wave breaking, summed over angle, frequency and mode \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a275160053dd30e4e6ba8b44da19e731d}\label{structmom__internal__tides_1_1int__tide__cs_a275160053dd30e4e6ba8b44da19e731d}} 
real, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a275160053dd30e4e6ba8b44da19e731d}{tot\+\_\+allprocesses\+\_\+loss}
\begin{DoxyCompactList}\small\item\em Energy loss rates due to all processes, summed over angle, frequency and mode \mbox{[}R Z3 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab845642ca4f47c06665104ecf8eef553}\label{structmom__internal__tides_1_1int__tide__cs_ab845642ca4f47c06665104ecf8eef553}} 
real \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab845642ca4f47c06665104ecf8eef553}{q\+\_\+itides}
\begin{DoxyCompactList}\small\item\em fraction of local dissipation \mbox{[}nondim\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a4b52b5e2aff5b337fdf7b2b664c91d2c}\label{structmom__internal__tides_1_1int__tide__cs_a4b52b5e2aff5b337fdf7b2b664c91d2c}} 
real \hyperlink{structmom__internal__tides_1_1int__tide__cs_a4b52b5e2aff5b337fdf7b2b664c91d2c}{en\+\_\+sum}
\begin{DoxyCompactList}\small\item\em global sum of energy for use in debugging \mbox{[}R Z3 T-\/2 $\sim$$>$ J m-\/2\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a7475f1c062da3b6bfa6af331b70ac1e3}\label{structmom__internal__tides_1_1int__tide__cs_a7475f1c062da3b6bfa6af331b70ac1e3}} 
type(time\+\_\+type), pointer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a7475f1c062da3b6bfa6af331b70ac1e3}{time} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em A pointer to the model\textquotesingle{}s clock. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ae5c5024f3983b53abce879d5d55a8ab9}\label{structmom__internal__tides_1_1int__tide__cs_ae5c5024f3983b53abce879d5d55a8ab9}} 
character(len=200) \hyperlink{structmom__internal__tides_1_1int__tide__cs_ae5c5024f3983b53abce879d5d55a8ab9}{inputdir}
\begin{DoxyCompactList}\small\item\em directory to look for coastline angle file \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a2ad267e53423a0755fc0e245ee2892a1}\label{structmom__internal__tides_1_1int__tide__cs_a2ad267e53423a0755fc0e245ee2892a1}} 
real \hyperlink{structmom__internal__tides_1_1int__tide__cs_a2ad267e53423a0755fc0e245ee2892a1}{decay\+\_\+rate}
\begin{DoxyCompactList}\small\item\em A constant rate at which internal tide energy is lost to the interior ocean internal wave field. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_aa4fd28698b5bb188a5dc4aab71362667}\label{structmom__internal__tides_1_1int__tide__cs_aa4fd28698b5bb188a5dc4aab71362667}} 
real \hyperlink{structmom__internal__tides_1_1int__tide__cs_aa4fd28698b5bb188a5dc4aab71362667}{cdrag}
\begin{DoxyCompactList}\small\item\em The bottom drag coefficient \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ac0ca46ff10bf839b9f447958b469674c}\label{structmom__internal__tides_1_1int__tide__cs_ac0ca46ff10bf839b9f447958b469674c}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_ac0ca46ff10bf839b9f447958b469674c}{apply\+\_\+background\+\_\+drag}
\begin{DoxyCompactList}\small\item\em If true, apply a drag due to background processes as a sink. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_af38c741d17cecf6431f594ff58b0b366}\label{structmom__internal__tides_1_1int__tide__cs_af38c741d17cecf6431f594ff58b0b366}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_af38c741d17cecf6431f594ff58b0b366}{apply\+\_\+bottom\+\_\+drag}
\begin{DoxyCompactList}\small\item\em If true, apply a quadratic bottom drag as a sink. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a12b0e218e343438e07464987c91906e9}\label{structmom__internal__tides_1_1int__tide__cs_a12b0e218e343438e07464987c91906e9}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a12b0e218e343438e07464987c91906e9}{apply\+\_\+wave\+\_\+drag}
\begin{DoxyCompactList}\small\item\em If true, apply scattering due to small-\/scale roughness as a sink. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a5acffeacc7e63864e58b24ee1c785bea}\label{structmom__internal__tides_1_1int__tide__cs_a5acffeacc7e63864e58b24ee1c785bea}} 
logical \hyperlink{structmom__internal__tides_1_1int__tide__cs_a5acffeacc7e63864e58b24ee1c785bea}{apply\+\_\+froude\+\_\+drag}
\begin{DoxyCompactList}\small\item\em If true, apply wave breaking as a sink. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a3854d2a415e43e71151518f5efc14625}\label{structmom__internal__tides_1_1int__tide__cs_a3854d2a415e43e71151518f5efc14625}} 
real, dimension(\+:,\+:,\+:,\+:,\+:), pointer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a3854d2a415e43e71151518f5efc14625}{en} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The internal wave energy density as a function of (i,j,angle,frequency,mode) integrated within an angular and frequency band \mbox{[}R Z3 T-\/2 $\sim$$>$ J m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a06616e25ee68d1ace351154c49892948}\label{structmom__internal__tides_1_1int__tide__cs_a06616e25ee68d1ace351154c49892948}} 
real, dimension(\+:,\+:,\+:), pointer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a06616e25ee68d1ace351154c49892948}{en\+\_\+restart} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The internal wave energy density as a function of (i,j,angle); temporary for restart. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a07fa083566ba17fe7128c8924f5b9ece}\label{structmom__internal__tides_1_1int__tide__cs_a07fa083566ba17fe7128c8924f5b9ece}} 
real, dimension(\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a07fa083566ba17fe7128c8924f5b9ece}{frequency}
\begin{DoxyCompactList}\small\item\em The frequency of each band \mbox{[}T-\/1 $\sim$$>$ s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a5b4746b03860f3bcf7a591e2e4e08e38}\label{structmom__internal__tides_1_1int__tide__cs_a5b4746b03860f3bcf7a591e2e4e08e38}} 
type(diag\+\_\+ctrl), pointer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a5b4746b03860f3bcf7a591e2e4e08e38}{diag} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em A structure that is used to regulate the timing of diagnostic output. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_afb8d526d0b78425486de983eb6667576}\label{structmom__internal__tides_1_1int__tide__cs_afb8d526d0b78425486de983eb6667576}} 
type(wave\+\_\+structure\+\_\+cs), pointer \hyperlink{structmom__internal__tides_1_1int__tide__cs_afb8d526d0b78425486de983eb6667576}{wave\+\_\+structure\+\_\+csp} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em A pointer to the wave\+\_\+structure module control structure. \end{DoxyCompactList}\end{DoxyCompactItemize}
\textbf{ }\par
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab8b7cbe7abdffe3643ef6d7cd0619c24}\label{structmom__internal__tides_1_1int__tide__cs_ab8b7cbe7abdffe3643ef6d7cd0619c24}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab8b7cbe7abdffe3643ef6d7cd0619c24}{id\+\_\+tot\+\_\+en} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab76eb583b462aa92c29b541d32bfdfd5}\label{structmom__internal__tides_1_1int__tide__cs_ab76eb583b462aa92c29b541d32bfdfd5}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab76eb583b462aa92c29b541d32bfdfd5}{id\+\_\+tke\+\_\+itidal\+\_\+input} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a8b1fb21999bac7ea66e0b17b4a090a78}\label{structmom__internal__tides_1_1int__tide__cs_a8b1fb21999bac7ea66e0b17b4a090a78}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a8b1fb21999bac7ea66e0b17b4a090a78}{id\+\_\+itide\+\_\+drag} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a5bb59ca8a0bc1205553534927ee109f3}\label{structmom__internal__tides_1_1int__tide__cs_a5bb59ca8a0bc1205553534927ee109f3}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a5bb59ca8a0bc1205553534927ee109f3}{id\+\_\+refl\+\_\+pref} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a9a760041e1d4ddb6569ed9f1ecfa9874}\label{structmom__internal__tides_1_1int__tide__cs_a9a760041e1d4ddb6569ed9f1ecfa9874}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a9a760041e1d4ddb6569ed9f1ecfa9874}{id\+\_\+refl\+\_\+ang} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a0b165aa95535a650f4442c96cac77335}\label{structmom__internal__tides_1_1int__tide__cs_a0b165aa95535a650f4442c96cac77335}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a0b165aa95535a650f4442c96cac77335}{id\+\_\+land\+\_\+mask} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a3d35b6a145b3801b1a589c20818b6812}\label{structmom__internal__tides_1_1int__tide__cs_a3d35b6a145b3801b1a589c20818b6812}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a3d35b6a145b3801b1a589c20818b6812}{id\+\_\+dx\+\_\+cv} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a101b19137802c6e7362250780817abd1}\label{structmom__internal__tides_1_1int__tide__cs_a101b19137802c6e7362250780817abd1}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a101b19137802c6e7362250780817abd1}{id\+\_\+dy\+\_\+cu} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ad9749143dab1c90273c256a1c33d873d}\label{structmom__internal__tides_1_1int__tide__cs_ad9749143dab1c90273c256a1c33d873d}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_ad9749143dab1c90273c256a1c33d873d}{id\+\_\+tot\+\_\+leak\+\_\+loss} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a1cccc034a27753c0ba0e6e5ca2b1827d}\label{structmom__internal__tides_1_1int__tide__cs_a1cccc034a27753c0ba0e6e5ca2b1827d}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a1cccc034a27753c0ba0e6e5ca2b1827d}{id\+\_\+tot\+\_\+quad\+\_\+loss} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_ab4ac8bd41590b0cbc7d9d334922952cf}\label{structmom__internal__tides_1_1int__tide__cs_ab4ac8bd41590b0cbc7d9d334922952cf}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_ab4ac8bd41590b0cbc7d9d334922952cf}{id\+\_\+tot\+\_\+itidal\+\_\+loss} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a4f02c293dbda60feb518bd3f8ab6741b}\label{structmom__internal__tides_1_1int__tide__cs_a4f02c293dbda60feb518bd3f8ab6741b}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_a4f02c293dbda60feb518bd3f8ab6741b}{id\+\_\+tot\+\_\+froude\+\_\+loss} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_aa0b1f3d9f108155788f91b93afb81cdb}\label{structmom__internal__tides_1_1int__tide__cs_aa0b1f3d9f108155788f91b93afb81cdb}} 
integer \hyperlink{structmom__internal__tides_1_1int__tide__cs_aa0b1f3d9f108155788f91b93afb81cdb}{id\+\_\+tot\+\_\+allprocesses\+\_\+loss} = -\/1
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a9a45959e9aa34ac1e014376e548ccf6f}\label{structmom__internal__tides_1_1int__tide__cs_a9a45959e9aa34ac1e014376e548ccf6f}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a9a45959e9aa34ac1e014376e548ccf6f}{id\+\_\+en\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a2bb6aa92c2425fa209d216b93d5b6f62}\label{structmom__internal__tides_1_1int__tide__cs_a2bb6aa92c2425fa209d216b93d5b6f62}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a2bb6aa92c2425fa209d216b93d5b6f62}{id\+\_\+itidal\+\_\+loss\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a64c89a9ffd6b7bec17f4ac8715005c8c}\label{structmom__internal__tides_1_1int__tide__cs_a64c89a9ffd6b7bec17f4ac8715005c8c}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a64c89a9ffd6b7bec17f4ac8715005c8c}{id\+\_\+allprocesses\+\_\+loss\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a1ff1e3aabd1c26b02d4b08d247870137}\label{structmom__internal__tides_1_1int__tide__cs_a1ff1e3aabd1c26b02d4b08d247870137}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a1ff1e3aabd1c26b02d4b08d247870137}{id\+\_\+ub\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a39d4cdcbc0cdee35973b65d637875bee}\label{structmom__internal__tides_1_1int__tide__cs_a39d4cdcbc0cdee35973b65d637875bee}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a39d4cdcbc0cdee35973b65d637875bee}{id\+\_\+cp\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a972da12b7850f5a673fe65f61213c2c2}\label{structmom__internal__tides_1_1int__tide__cs_a972da12b7850f5a673fe65f61213c2c2}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a972da12b7850f5a673fe65f61213c2c2}{id\+\_\+en\+\_\+ang\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__internal__tides_1_1int__tide__cs_a365681c62b4421f2583e71f338df994c}\label{structmom__internal__tides_1_1int__tide__cs_a365681c62b4421f2583e71f338df994c}} 
integer, dimension(\+:,\+:), allocatable \hyperlink{structmom__internal__tides_1_1int__tide__cs_a365681c62b4421f2583e71f338df994c}{id\+\_\+itidal\+\_\+loss\+\_\+ang\+\_\+mode}
\begin{DoxyCompactList}\small\item\em Diag handles. \end{DoxyCompactList}\end{DoxyCompactItemize}



\subsection{Detailed Description}
This control structure has parameters for the M\+O\+M\+\_\+internal\+\_\+tides module. 

Definition at line 38 of file M\+O\+M\+\_\+internal\+\_\+tides.\+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\+\_\+internal\+\_\+tides.\+F90\end{DoxyCompactItemize}
