\hypertarget{structmom__sponge_1_1sponge__cs}{}\doxysection{mom\+\_\+sponge\+::sponge\+\_\+cs Type Reference}
\label{structmom__sponge_1_1sponge__cs}\index{mom\_sponge::sponge\_cs@{mom\_sponge::sponge\_cs}}


\doxysubsection{Detailed Description}
This control structure holds memory and parameters for the M\+O\+M\+\_\+sponge module. 

Definition at line 41 of file M\+O\+M\+\_\+sponge.\+F90.



Collaboration diagram for mom\+\_\+sponge\+::sponge\+\_\+cs\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{structmom__sponge_1_1sponge__cs__coll__graph}
\end{center}
\end{figure}
\doxysubsection*{Public variables and constants}
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_af282fe11886a599a1c8cdd70b41bb6b2}\label{structmom__sponge_1_1sponge__cs_af282fe11886a599a1c8cdd70b41bb6b2}} 
logical \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_af282fe11886a599a1c8cdd70b41bb6b2}{bulkmixedlayer}}
\begin{DoxyCompactList}\small\item\em If true, a refined bulk mixed layer is used with nkml sublayers and nkbl buffer layer. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a4191d80e05d742241a1401ab4083230e}\label{structmom__sponge_1_1sponge__cs_a4191d80e05d742241a1401ab4083230e}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a4191d80e05d742241a1401ab4083230e}{nz}}
\begin{DoxyCompactList}\small\item\em The total number of layers. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a7ec50ed116ba0f96d71a1207368d0c90}\label{structmom__sponge_1_1sponge__cs_a7ec50ed116ba0f96d71a1207368d0c90}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a7ec50ed116ba0f96d71a1207368d0c90}{isc}}
\begin{DoxyCompactList}\small\item\em The starting i-\/index of the computational domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_af71db48e5aeb10b6afe506800c28704c}\label{structmom__sponge_1_1sponge__cs_af71db48e5aeb10b6afe506800c28704c}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_af71db48e5aeb10b6afe506800c28704c}{iec}}
\begin{DoxyCompactList}\small\item\em The ending i-\/index of the computational domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a2844032007cfc4d499fa0eeaf12e00c0}\label{structmom__sponge_1_1sponge__cs_a2844032007cfc4d499fa0eeaf12e00c0}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a2844032007cfc4d499fa0eeaf12e00c0}{jsc}}
\begin{DoxyCompactList}\small\item\em The starting j-\/index of the computational domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a99b63ae2e3bb506f5cb2d0b8ba9f44b5}\label{structmom__sponge_1_1sponge__cs_a99b63ae2e3bb506f5cb2d0b8ba9f44b5}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a99b63ae2e3bb506f5cb2d0b8ba9f44b5}{jec}}
\begin{DoxyCompactList}\small\item\em The ending j-\/index of the computational domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_ac822696549a557eefccca1f01733a24c}\label{structmom__sponge_1_1sponge__cs_ac822696549a557eefccca1f01733a24c}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_ac822696549a557eefccca1f01733a24c}{isd}}
\begin{DoxyCompactList}\small\item\em The starting i-\/index of the data domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a52e00e53218de0b380ad5903beda8fda}\label{structmom__sponge_1_1sponge__cs_a52e00e53218de0b380ad5903beda8fda}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a52e00e53218de0b380ad5903beda8fda}{ied}}
\begin{DoxyCompactList}\small\item\em The ending i-\/index of the data domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a5abf0b49454d62d923b1486c57c6780c}\label{structmom__sponge_1_1sponge__cs_a5abf0b49454d62d923b1486c57c6780c}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a5abf0b49454d62d923b1486c57c6780c}{jsd}}
\begin{DoxyCompactList}\small\item\em The starting j-\/index of the data domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a5f887dd4d304dbed540025090465a8be}\label{structmom__sponge_1_1sponge__cs_a5f887dd4d304dbed540025090465a8be}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a5f887dd4d304dbed540025090465a8be}{jed}}
\begin{DoxyCompactList}\small\item\em The ending j-\/index of the data domain at h. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a405a191d1ff910507ab532868fc65864}\label{structmom__sponge_1_1sponge__cs_a405a191d1ff910507ab532868fc65864}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a405a191d1ff910507ab532868fc65864}{num\+\_\+col}}
\begin{DoxyCompactList}\small\item\em The number of sponge points within the computational domain. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_ac0cd535cfdae85381cd19dfd3bced367}\label{structmom__sponge_1_1sponge__cs_ac0cd535cfdae85381cd19dfd3bced367}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_ac0cd535cfdae85381cd19dfd3bced367}{fldno}} = 0
\begin{DoxyCompactList}\small\item\em The number of fields which have already been registered by calls to set\+\_\+up\+\_\+sponge\+\_\+field. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a9deacb6a255841d01938ee77b67581d5}\label{structmom__sponge_1_1sponge__cs_a9deacb6a255841d01938ee77b67581d5}} 
integer, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a9deacb6a255841d01938ee77b67581d5}{col\+\_\+i}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em Array of the i-\/indicies of each of the columns being damped. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a50c084646768bede7428aee0c7167a13}\label{structmom__sponge_1_1sponge__cs_a50c084646768bede7428aee0c7167a13}} 
integer, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a50c084646768bede7428aee0c7167a13}{col\+\_\+j}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em Array of the j-\/indicies of each of the columns being damped. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a3b3a6eed04de9000aabc329ddb5dd514}\label{structmom__sponge_1_1sponge__cs_a3b3a6eed04de9000aabc329ddb5dd514}} 
real, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a3b3a6eed04de9000aabc329ddb5dd514}{iresttime\+\_\+col}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The inverse restoring time of each column \mbox{[}T-\/1 $\sim$$>$ s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a517e1f1da3d79797c5aa800c239b22ee}\label{structmom__sponge_1_1sponge__cs_a517e1f1da3d79797c5aa800c239b22ee}} 
real, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a517e1f1da3d79797c5aa800c239b22ee}{rcv\+\_\+ml\+\_\+ref}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The value toward which the mixed layer coordinate-\/density is being damped \mbox{[}R $\sim$$>$ kg m-\/3\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a71ce241342853fb3d68d855df61ddf5b}\label{structmom__sponge_1_1sponge__cs_a71ce241342853fb3d68d855df61ddf5b}} 
real, dimension(\+:,\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a71ce241342853fb3d68d855df61ddf5b}{ref\+\_\+eta}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The value toward which the interface heights are being damped \mbox{[}Z $\sim$$>$ m\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a22e8e749f9b0c0ed72726b4b849418c1}\label{structmom__sponge_1_1sponge__cs_a22e8e749f9b0c0ed72726b4b849418c1}} 
type(\mbox{\hyperlink{structmom__sponge_1_1p3d}{p3d}}), dimension(50) \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a22e8e749f9b0c0ed72726b4b849418c1}{var}}
\begin{DoxyCompactList}\small\item\em Pointers to the fields that are being damped. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a7db6085481bb38cc534b3007ef56cd3f}\label{structmom__sponge_1_1sponge__cs_a7db6085481bb38cc534b3007ef56cd3f}} 
type(\mbox{\hyperlink{structmom__sponge_1_1p2d}{p2d}}), dimension(50) \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a7db6085481bb38cc534b3007ef56cd3f}{ref\+\_\+val}}
\begin{DoxyCompactList}\small\item\em The values to which the fields are damped. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_aad5473d06a670043ebf247c5aaa66b5a}\label{structmom__sponge_1_1sponge__cs_aad5473d06a670043ebf247c5aaa66b5a}} 
logical \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_aad5473d06a670043ebf247c5aaa66b5a}{do\+\_\+i\+\_\+mean\+\_\+sponge}}
\begin{DoxyCompactList}\small\item\em If true, apply sponges to the i-\/mean fields. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a29f4a72bf953ef3c11d25c1efcb00581}\label{structmom__sponge_1_1sponge__cs_a29f4a72bf953ef3c11d25c1efcb00581}} 
real, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a29f4a72bf953ef3c11d25c1efcb00581}{iresttime\+\_\+im}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The inverse restoring time of each row for i-\/mean sponges \mbox{[}T-\/1 $\sim$$>$ s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a20926118323ed0a3afc1e750b7a112c4}\label{structmom__sponge_1_1sponge__cs_a20926118323ed0a3afc1e750b7a112c4}} 
real, dimension(\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a20926118323ed0a3afc1e750b7a112c4}{rcv\+\_\+ml\+\_\+ref\+\_\+im}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em mixed layer coordinate-\/density is being damped \mbox{[}R $\sim$$>$ kg m-\/3\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a3d9becce664fb2bccf5cd2031e8eed38}\label{structmom__sponge_1_1sponge__cs_a3d9becce664fb2bccf5cd2031e8eed38}} 
real, dimension(\+:,\+:), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a3d9becce664fb2bccf5cd2031e8eed38}{ref\+\_\+eta\+\_\+im}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em The value toward which the i-\/mean interface heights are being damped \mbox{[}Z $\sim$$>$ m\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a524e86e9c04253a5fbfdb51be395dbe3}\label{structmom__sponge_1_1sponge__cs_a524e86e9c04253a5fbfdb51be395dbe3}} 
type(\mbox{\hyperlink{structmom__sponge_1_1p2d}{p2d}}), dimension(50) \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a524e86e9c04253a5fbfdb51be395dbe3}{ref\+\_\+val\+\_\+im}}
\begin{DoxyCompactList}\small\item\em The values toward which the i-\/means of fields are damped. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__sponge_1_1sponge__cs_a0fd87bbf68ccccab55514b2b12887197}\label{structmom__sponge_1_1sponge__cs_a0fd87bbf68ccccab55514b2b12887197}} 
type(diag\+\_\+ctrl), pointer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_a0fd87bbf68ccccab55514b2b12887197}{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__sponge_1_1sponge__cs_aaf717d48c9baefc8ed69a45f04318d65}\label{structmom__sponge_1_1sponge__cs_aaf717d48c9baefc8ed69a45f04318d65}} 
integer \mbox{\hyperlink{structmom__sponge_1_1sponge__cs_aaf717d48c9baefc8ed69a45f04318d65}{id\+\_\+w\+\_\+sponge}} = -\/1
\begin{DoxyCompactList}\small\item\em A diagnostic ID. \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{Detailed Description}
This control structure holds memory and parameters for the M\+O\+M\+\_\+sponge module. 

Definition at line 41 of file M\+O\+M\+\_\+sponge.\+F90.



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