\hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs}{}\section{mom\+\_\+thickness\+\_\+diffuse\+::thickness\+\_\+diffuse\+\_\+cs Type Reference}
\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs}\index{mom\_thickness\_diffuse::thickness\_diffuse\_cs@{mom\_thickness\_diffuse::thickness\_diffuse\_cs}}


\subsection{Detailed Description}
Control structure for thickness diffusion. 

Definition at line 37 of file M\+O\+M\+\_\+thickness\+\_\+diffuse.\+F90.



Collaboration diagram for mom\+\_\+thickness\+\_\+diffuse\+::thickness\+\_\+diffuse\+\_\+cs\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{structmom__thickness__diffuse_1_1thickness__diffuse__cs__coll__graph}
\end{center}
\end{figure}
\subsection*{Public variables and constants}
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a822806ccf24449978f907aa2829e4ad0}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a822806ccf24449978f907aa2829e4ad0}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a822806ccf24449978f907aa2829e4ad0}{khth}}
\begin{DoxyCompactList}\small\item\em Background interface depth diffusivity \mbox{[}L2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a2f536ed134b565501461ed7105ab7f77}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a2f536ed134b565501461ed7105ab7f77}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a2f536ed134b565501461ed7105ab7f77}{khth\+\_\+slope\+\_\+cff}}
\begin{DoxyCompactList}\small\item\em Slope dependence coefficient of Khth \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3c60a2fa8481a66083b9243354976eb7}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3c60a2fa8481a66083b9243354976eb7}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3c60a2fa8481a66083b9243354976eb7}{max\+\_\+khth\+\_\+cfl}}
\begin{DoxyCompactList}\small\item\em Maximum value of the diffusive C\+FL for thickness diffusion. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3ec2e8b5412b1d193c7729eac02a525e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3ec2e8b5412b1d193c7729eac02a525e}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3ec2e8b5412b1d193c7729eac02a525e}{khth\+\_\+min}}
\begin{DoxyCompactList}\small\item\em Minimum value of Khth \mbox{[}L2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a5f8b53d94896af5e2494a3561153dd75}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a5f8b53d94896af5e2494a3561153dd75}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a5f8b53d94896af5e2494a3561153dd75}{khth\+\_\+max}}
\begin{DoxyCompactList}\small\item\em Maximum value of Khth \mbox{[}L2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}, or 0 for no max. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aa5a4d0b600601c6ad01fc10da11bef2b}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aa5a4d0b600601c6ad01fc10da11bef2b}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aa5a4d0b600601c6ad01fc10da11bef2b}{slope\+\_\+max}}
\begin{DoxyCompactList}\small\item\em Slopes steeper than slope\+\_\+max are limited in some way \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae6a6ed6658c8e82f93bd0a8e6ce61b6a}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae6a6ed6658c8e82f93bd0a8e6ce61b6a}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae6a6ed6658c8e82f93bd0a8e6ce61b6a}{kappa\+\_\+smooth}}
\begin{DoxyCompactList}\small\item\em Vertical diffusivity used to interpolate more sensible values of T \& S into thin layers \mbox{[}Z2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae75bc502571ff2d95285f4537314bcf0}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae75bc502571ff2d95285f4537314bcf0}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae75bc502571ff2d95285f4537314bcf0}{thickness\+\_\+diffuse}}
\begin{DoxyCompactList}\small\item\em If true, interfaces heights are diffused. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab619e30238388b2fb9b9693f3240fa65}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab619e30238388b2fb9b9693f3240fa65}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab619e30238388b2fb9b9693f3240fa65}{use\+\_\+fgnv\+\_\+streamfn}}
\begin{DoxyCompactList}\small\item\em If true, use the streamfunction formulation of Ferrari et al., 2010, which effectively emphasizes graver vertical modes by smoothing in the vertical. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac4bdd10106fde3122ba2ccfd91285e2e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac4bdd10106fde3122ba2ccfd91285e2e}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac4bdd10106fde3122ba2ccfd91285e2e}{fgnv\+\_\+scale}}
\begin{DoxyCompactList}\small\item\em A coefficient scaling the vertical smoothing term in the Ferrari et al., 2010, streamfunction formulation \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a560e87e9063c6635813a524e5a6c8d1d}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a560e87e9063c6635813a524e5a6c8d1d}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a560e87e9063c6635813a524e5a6c8d1d}{fgnv\+\_\+c\+\_\+min}}
\begin{DoxyCompactList}\small\item\em A minimum wave speed used in the Ferrari et al., 2010, streamfunction formulation \mbox{[}L T-\/1 $\sim$$>$ m s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ad167def69274020f0f0374fd8d35f707}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ad167def69274020f0f0374fd8d35f707}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ad167def69274020f0f0374fd8d35f707}{n2\+\_\+floor}}
\begin{DoxyCompactList}\small\item\em A floor for Brunt-\/\+Vasaila frequency in the Ferrari et al., 2010, streamfunction formulation \mbox{[}T-\/2 $\sim$$>$ s-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ada10cbc3837edd18d042a0ac3dc8b788}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ada10cbc3837edd18d042a0ac3dc8b788}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ada10cbc3837edd18d042a0ac3dc8b788}{detangle\+\_\+interfaces}}
\begin{DoxyCompactList}\small\item\em If true, add 3-\/d structured interface height diffusivities to horizontally smooth jagged layers. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aed330bf2012d92fb00770c6d935e3f7d}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aed330bf2012d92fb00770c6d935e3f7d}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aed330bf2012d92fb00770c6d935e3f7d}{detangle\+\_\+time}}
\begin{DoxyCompactList}\small\item\em If detangle\+\_\+interfaces is true, this is the timescale over which maximally jagged grid-\/scale thickness variations are suppressed \mbox{[}T $\sim$$>$ s\mbox{]}. This must be longer than DT, or 0 (the default) to use DT. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3fb34a0f4714997e965ce8163c863b25}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3fb34a0f4714997e965ce8163c863b25}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3fb34a0f4714997e965ce8163c863b25}{nkml}}
\begin{DoxyCompactList}\small\item\em number of layers within mixed layer \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af09e7d8b4c69fba3eeb2cde64b4d7c47}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af09e7d8b4c69fba3eeb2cde64b4d7c47}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af09e7d8b4c69fba3eeb2cde64b4d7c47}{debug}}
\begin{DoxyCompactList}\small\item\em write verbose checksums for debugging purposes \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb1ae340b4b40de9d6e77e692ce12a87}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb1ae340b4b40de9d6e77e692ce12a87}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb1ae340b4b40de9d6e77e692ce12a87}{use\+\_\+gme\+\_\+thickness\+\_\+diffuse}}
\begin{DoxyCompactList}\small\item\em If true, passes GM coefficients to M\+O\+M\+\_\+hor\+\_\+visc for use with G\+ME closure. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abbbce9c05560ad0890730576392167ac}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abbbce9c05560ad0890730576392167ac}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abbbce9c05560ad0890730576392167ac}{meke\+\_\+geometric}}
\begin{DoxyCompactList}\small\item\em If true, uses the GM coefficient formulation from the G\+E\+O\+M\+E\+T\+R\+IC framework (Marshall et al., 2012) \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a19b8215b33ed7123074781ffd2072b93}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a19b8215b33ed7123074781ffd2072b93}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a19b8215b33ed7123074781ffd2072b93}{meke\+\_\+geometric\+\_\+alpha}}
\begin{DoxyCompactList}\small\item\em The nondimensional coefficient governing the efficiency of the G\+E\+O\+M\+E\+T\+R\+IC thickness difussion \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a294ad26706b1c5484174a1f0072a546e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a294ad26706b1c5484174a1f0072a546e}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a294ad26706b1c5484174a1f0072a546e}{meke\+\_\+geometric\+\_\+epsilon}}
\begin{DoxyCompactList}\small\item\em Minimum Eady growth rate for the G\+E\+O\+M\+E\+T\+R\+IC thickness diffusivity \mbox{[}T-\/1 $\sim$$>$ s-\/1\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a9bd10d58e87a2ec7795620eee1d31676}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a9bd10d58e87a2ec7795620eee1d31676}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a9bd10d58e87a2ec7795620eee1d31676}{meke\+\_\+geom\+\_\+answers\+\_\+2018}}
\begin{DoxyCompactList}\small\item\em If true, use expressions in the M\+E\+K\+E\+\_\+\+G\+E\+O\+M\+E\+T\+R\+IC calculation that recover the answers from the original implementation. Otherwise, use expressions that satisfy rotational symmetry. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aec66023978e88f8ae8319001c263fca0}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aec66023978e88f8ae8319001c263fca0}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aec66023978e88f8ae8319001c263fca0}{use\+\_\+kh\+\_\+in\+\_\+meke}}
\begin{DoxyCompactList}\small\item\em If true, uses the thickness diffusivity calculated here to diffuse M\+E\+KE. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a25a04ea619e5c242d9024acb6b193d05}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a25a04ea619e5c242d9024acb6b193d05}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a25a04ea619e5c242d9024acb6b193d05}{gm\+\_\+src\+\_\+alt}}
\begin{DoxyCompactList}\small\item\em If true, use the GM energy conversion form S$^\wedge$2$\ast$\+N$^\wedge$2$\ast$kappa rather than the streamfunction for the GM source term. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7629e3b92c22cdd4554d04f4c1aa5de3}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7629e3b92c22cdd4554d04f4c1aa5de3}} 
logical \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7629e3b92c22cdd4554d04f4c1aa5de3}{use\+\_\+gm\+\_\+work\+\_\+bug}}
\begin{DoxyCompactList}\small\item\em If true, use the incorrect sign for the top-\/level work tendency on the top layer. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a078dbdbe776e8242330e68d69e7588e2}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a078dbdbe776e8242330e68d69e7588e2}} 
real \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a078dbdbe776e8242330e68d69e7588e2}{stanley\+\_\+det\+\_\+coeff}}
\begin{DoxyCompactList}\small\item\em The coefficient correlating S\+GS temperature variance with the mean temperature gradient in the deterministic part of the Stanley parameterization. Negative values disable the scheme." \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a65e175dbd5ad8095fa02c77fb8d69167}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a65e175dbd5ad8095fa02c77fb8d69167}} 
type(diag\+\_\+ctrl), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a65e175dbd5ad8095fa02c77fb8d69167}{diag}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em structure used to regulate timing of diagnostics \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abb8e3b0f3c745acd231ac78caa9b8989}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abb8e3b0f3c745acd231ac78caa9b8989}} 
real, dimension(\+:,\+:), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abb8e3b0f3c745acd231ac78caa9b8989}{gmwork}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em Work by thickness diffusivity \mbox{[}R Z L2 T-\/3 $\sim$$>$ W m-\/2\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a1b5c241b23ad83a91eaf83c1ee303076}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a1b5c241b23ad83a91eaf83c1ee303076}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a1b5c241b23ad83a91eaf83c1ee303076}{diagslopex}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em Diagnostic\+: zonal neutral slope \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a92d560bdd821d0ca2171a21b5fa8040e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a92d560bdd821d0ca2171a21b5fa8040e}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a92d560bdd821d0ca2171a21b5fa8040e}{diagslopey}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em Diagnostic\+: zonal neutral slope \mbox{[}nondim\mbox{]}. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abac13ce8def97efdaa916f547ca21d4f}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abac13ce8def97efdaa916f547ca21d4f}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_abac13ce8def97efdaa916f547ca21d4f}{kh\+\_\+u\+\_\+gme}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em interface height diffusivities in u-\/columns \mbox{[}L2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]} \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af3dc595dc7a996ffe55fd0731a42f55e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af3dc595dc7a996ffe55fd0731a42f55e}} 
real, dimension(\+:,\+:,\+:), pointer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_af3dc595dc7a996ffe55fd0731a42f55e}{kh\+\_\+v\+\_\+gme}} =$>$ N\+U\+LL()
\begin{DoxyCompactList}\small\item\em interface height diffusivities in v-\/columns \mbox{[}L2 T-\/1 $\sim$$>$ m2 s-\/1\mbox{]} \end{DoxyCompactList}\end{DoxyCompactItemize}
\textbf{ }\par
\begin{DoxyCompactItemize}
\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a197234a1e570a63c33cc0bc83f3171a6}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a197234a1e570a63c33cc0bc83f3171a6}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a197234a1e570a63c33cc0bc83f3171a6}{id\+\_\+uhgm}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7a24fa7761e073aca016501f557a8541}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7a24fa7761e073aca016501f557a8541}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a7a24fa7761e073aca016501f557a8541}{id\+\_\+vhgm}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb5afdc8e1ec18b1e4624d0eb0740d41}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb5afdc8e1ec18b1e4624d0eb0740d41}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_acb5afdc8e1ec18b1e4624d0eb0740d41}{id\+\_\+gmwork}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aaf50644aff65963e4b8ee4828dad31c0}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aaf50644aff65963e4b8ee4828dad31c0}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aaf50644aff65963e4b8ee4828dad31c0}{id\+\_\+kh\+\_\+u}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3968fd493644fd007b330e51b2d071e5}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3968fd493644fd007b330e51b2d071e5}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a3968fd493644fd007b330e51b2d071e5}{id\+\_\+kh\+\_\+v}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab6d795d3a3d754e39d22d8389c326560}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab6d795d3a3d754e39d22d8389c326560}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab6d795d3a3d754e39d22d8389c326560}{id\+\_\+kh\+\_\+t}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a218a241576d7aa982a5e39594b079583}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a218a241576d7aa982a5e39594b079583}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a218a241576d7aa982a5e39594b079583}{id\+\_\+kh\+\_\+u1}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac7cf58d69cee90f57a5dec440be0cf8e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac7cf58d69cee90f57a5dec440be0cf8e}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ac7cf58d69cee90f57a5dec440be0cf8e}{id\+\_\+kh\+\_\+v1}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a87a42d89b1d2b361f6e82b4bf679cba8}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a87a42d89b1d2b361f6e82b4bf679cba8}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a87a42d89b1d2b361f6e82b4bf679cba8}{id\+\_\+kh\+\_\+t1}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aff984cf90d79e4f7a9ab8e07efbbf61e}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aff984cf90d79e4f7a9ab8e07efbbf61e}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_aff984cf90d79e4f7a9ab8e07efbbf61e}{id\+\_\+slope\+\_\+x}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a05909b6dd1bc7d72f6678592f06244f3}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a05909b6dd1bc7d72f6678592f06244f3}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a05909b6dd1bc7d72f6678592f06244f3}{id\+\_\+slope\+\_\+y}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab96db43414bb4434fc9bee0790ce8707}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab96db43414bb4434fc9bee0790ce8707}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ab96db43414bb4434fc9bee0790ce8707}{id\+\_\+sfn\+\_\+unlim\+\_\+x}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a098f5a5ca63f0c3a851bf484b458d4e3}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a098f5a5ca63f0c3a851bf484b458d4e3}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a098f5a5ca63f0c3a851bf484b458d4e3}{id\+\_\+sfn\+\_\+unlim\+\_\+y}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae539e86f7bd673111033b25ac0a96300}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae539e86f7bd673111033b25ac0a96300}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_ae539e86f7bd673111033b25ac0a96300}{id\+\_\+sfn\+\_\+x}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a6434beb205a864c15cd413866a9546a1}\label{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a6434beb205a864c15cd413866a9546a1}} 
integer \mbox{\hyperlink{structmom__thickness__diffuse_1_1thickness__diffuse__cs_a6434beb205a864c15cd413866a9546a1}{id\+\_\+sfn\+\_\+y}} = -\/1
\begin{DoxyCompactList}\small\item\em Diagnostic identifier. \end{DoxyCompactList}\end{DoxyCompactItemize}



\subsection{Detailed Description}
Control structure for thickness diffusion. 

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