\hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs}{}\section{mom\+\_\+neutral\+\_\+diffusion\+::neutral\+\_\+diffusion\+\_\+cs Type Reference} \label{structmom__neutral__diffusion_1_1neutral__diffusion__cs}\index{mom\_neutral\_diffusion::neutral\_diffusion\_cs@{mom\_neutral\_diffusion::neutral\_diffusion\_cs}} \subsection{Detailed Description} The control structure for the M\+O\+M\+\_\+neutral\+\_\+diffusion module. Definition at line 43 of file M\+O\+M\+\_\+neutral\+\_\+diffusion.\+F90. Collaboration diagram for mom\+\_\+neutral\+\_\+diffusion\+::neutral\+\_\+diffusion\+\_\+cs\+: \nopagebreak \begin{figure}[H] \begin{center} \leavevmode \includegraphics[width=350pt]{structmom__neutral__diffusion_1_1neutral__diffusion__cs__coll__graph} \end{center} \end{figure} \subsection*{Public variables and constants} \begin{DoxyCompactItemize} \item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab2e70b6a5da67b9bbd81e11374c68985}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab2e70b6a5da67b9bbd81e11374c68985}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab2e70b6a5da67b9bbd81e11374c68985}{nkp1}} \begin{DoxyCompactList}\small\item\em Number of interfaces for a column = nk + 1. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab5f13b3bde26ee02ffa4ee90d5f31a72}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab5f13b3bde26ee02ffa4ee90d5f31a72}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ab5f13b3bde26ee02ffa4ee90d5f31a72}{nsurf}} \begin{DoxyCompactList}\small\item\em Number of neutral surfaces. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4788521c70bd169b390df12eb258a984}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4788521c70bd169b390df12eb258a984}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4788521c70bd169b390df12eb258a984}{deg}} = 2 \begin{DoxyCompactList}\small\item\em Degree of polynomial used for reconstructions. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4d1499c61ce92fe5f376ab3c2f2f4225}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4d1499c61ce92fe5f376ab3c2f2f4225}} logical \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4d1499c61ce92fe5f376ab3c2f2f4225}{continuous\+\_\+reconstruction}} = .true. \begin{DoxyCompactList}\small\item\em True if using continuous P\+PM reconstruction at interfaces. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e10075a9a5d5aae6b4f49d5a53767eb}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e10075a9a5d5aae6b4f49d5a53767eb}} logical \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e10075a9a5d5aae6b4f49d5a53767eb}{debug}} = .false. \begin{DoxyCompactList}\small\item\em If true, write verbose debugging messages. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a50d108d66c47e9dd364f10d425c6f3b9}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a50d108d66c47e9dd364f10d425c6f3b9}} logical \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a50d108d66c47e9dd364f10d425c6f3b9}{hard\+\_\+fail\+\_\+heff}} \begin{DoxyCompactList}\small\item\em Bring down the model if a problem with heff is detected. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b749985c3162f0d1ce6f2e67d0fc93a}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b749985c3162f0d1ce6f2e67d0fc93a}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b749985c3162f0d1ce6f2e67d0fc93a}{max\+\_\+iter}} \begin{DoxyCompactList}\small\item\em Maximum number of iterations if refine\+\_\+position is defined. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ad63d816ff038602e95adc2d1c5cc2ea6}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ad63d816ff038602e95adc2d1c5cc2ea6}} real \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ad63d816ff038602e95adc2d1c5cc2ea6}{drho\+\_\+tol}} \begin{DoxyCompactList}\small\item\em Convergence criterion representing density difference from true neutrality \mbox{[}R $\sim$$>$ kg m-\/3\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a495236a638ad8f3aa4f97eb1bd95ac47}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a495236a638ad8f3aa4f97eb1bd95ac47}} real \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a495236a638ad8f3aa4f97eb1bd95ac47}{x\+\_\+tol}} \begin{DoxyCompactList}\small\item\em Convergence criterion for how small an update of the position can be. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a13d80de12dc0ae7771349d1e5475a0d3}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a13d80de12dc0ae7771349d1e5475a0d3}} real \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a13d80de12dc0ae7771349d1e5475a0d3}{ref\+\_\+pres}} \begin{DoxyCompactList}\small\item\em Reference pressure, negative if using locally referenced neutral density \mbox{[}R L2 T-\/2 $\sim$$>$ Pa\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a17281c208153b93e82446d4a7368c77b}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a17281c208153b93e82446d4a7368c77b}} logical \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a17281c208153b93e82446d4a7368c77b}{interior\+\_\+only}} \begin{DoxyCompactList}\small\item\em If true, only applies neutral diffusion in the ocean interior. That is, the algorithm will exclude the surface and bottom boundary layers. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a231f7cec1afc95e3e0717cb9e706694d}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a231f7cec1afc95e3e0717cb9e706694d}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a231f7cec1afc95e3e0717cb9e706694d}{upol}} \begin{DoxyCompactList}\small\item\em Non-\/dimensional position with left layer u\+Ko\+L-\/1, u-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a65c530c01bb0eeab86f56d5f35d032e3}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a65c530c01bb0eeab86f56d5f35d032e3}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a65c530c01bb0eeab86f56d5f35d032e3}{upor}} \begin{DoxyCompactList}\small\item\em Non-\/dimensional position with right layer u\+Ko\+R-\/1, u-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a73529c67e33d9f023c3fe9a45e77c872}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a73529c67e33d9f023c3fe9a45e77c872}} integer, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a73529c67e33d9f023c3fe9a45e77c872}{ukol}} \begin{DoxyCompactList}\small\item\em Index of left interface corresponding to neutral surface, at a u-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a68601909b78da0a20fc9bd79d53f723d}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a68601909b78da0a20fc9bd79d53f723d}} integer, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a68601909b78da0a20fc9bd79d53f723d}{ukor}} \begin{DoxyCompactList}\small\item\em Index of right interface corresponding to neutral surface, at a u-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ac234175d6abf714e629c0c512752d715}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ac234175d6abf714e629c0c512752d715}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ac234175d6abf714e629c0c512752d715}{uheff}} \begin{DoxyCompactList}\small\item\em Effective thickness at u-\/point \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af5e4e950313326669cccc166939c4f28}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af5e4e950313326669cccc166939c4f28}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af5e4e950313326669cccc166939c4f28}{vpol}} \begin{DoxyCompactList}\small\item\em Non-\/dimensional position with left layer u\+Ko\+L-\/1, v-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af572e0cb04caae6ba9c7831373aaac47}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af572e0cb04caae6ba9c7831373aaac47}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af572e0cb04caae6ba9c7831373aaac47}{vpor}} \begin{DoxyCompactList}\small\item\em Non-\/dimensional position with right layer u\+Ko\+R-\/1, v-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4bbee8c0bfe5473ad517f69a6b6b7128}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4bbee8c0bfe5473ad517f69a6b6b7128}} integer, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4bbee8c0bfe5473ad517f69a6b6b7128}{vkol}} \begin{DoxyCompactList}\small\item\em Index of left interface corresponding to neutral surface, at a v-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af25f992cc264682c21772bc15df9638d}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af25f992cc264682c21772bc15df9638d}} integer, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_af25f992cc264682c21772bc15df9638d}{vkor}} \begin{DoxyCompactList}\small\item\em Index of right interface corresponding to neutral surface, at a v-\/point. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6fd4961afbc6fdf528d86eaf0b98e42d}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6fd4961afbc6fdf528d86eaf0b98e42d}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6fd4961afbc6fdf528d86eaf0b98e42d}{vheff}} \begin{DoxyCompactList}\small\item\em Effective thickness at v-\/point \mbox{[}H $\sim$$>$ m or kg m-\/2\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ae11b310fb4a53a360863103b682f3afc}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ae11b310fb4a53a360863103b682f3afc}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_ae11b310fb4a53a360863103b682f3afc}{ppoly\+\_\+coeffs\+\_\+t}} \begin{DoxyCompactList}\small\item\em Polynomial coefficients for temperature. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa0c687f377813fd51ebf3555d6632006}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa0c687f377813fd51ebf3555d6632006}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa0c687f377813fd51ebf3555d6632006}{ppoly\+\_\+coeffs\+\_\+s}} \begin{DoxyCompactList}\small\item\em Polynomial coefficients for salinity. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_adef55748e754121a44762dc2db651793}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_adef55748e754121a44762dc2db651793}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_adef55748e754121a44762dc2db651793}{drdt}} \begin{DoxyCompactList}\small\item\em d\+Rho/dT \mbox{[}R deg\+C-\/1 $\sim$$>$ kg m-\/3 deg\+C-\/1\mbox{]} at interfaces \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a02e575ed770b5cc437fbdceb3a1fb27d}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a02e575ed770b5cc437fbdceb3a1fb27d}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a02e575ed770b5cc437fbdceb3a1fb27d}{drds}} \begin{DoxyCompactList}\small\item\em d\+Rho/dS \mbox{[}R ppt-\/1 $\sim$$>$ kg m-\/3 ppt-\/1\mbox{]} at interfaces \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e2912899ac9edb3d3bc9f4e092adf58}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e2912899ac9edb3d3bc9f4e092adf58}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5e2912899ac9edb3d3bc9f4e092adf58}{tint}} \begin{DoxyCompactList}\small\item\em Interface T \mbox{[}degC\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b363c5f5915dd8dbef96075c8c74f7b}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b363c5f5915dd8dbef96075c8c74f7b}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a2b363c5f5915dd8dbef96075c8c74f7b}{sint}} \begin{DoxyCompactList}\small\item\em Interface S \mbox{[}ppt\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa27eb5c714c73524bc53055bba6b72d2}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa27eb5c714c73524bc53055bba6b72d2}} real, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aa27eb5c714c73524bc53055bba6b72d2}{pint}} \begin{DoxyCompactList}\small\item\em Interface pressure \mbox{[}R L2 T-\/2 $\sim$$>$ Pa\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_afc6fbcc10891661823a7b904106f5896}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_afc6fbcc10891661823a7b904106f5896}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_afc6fbcc10891661823a7b904106f5896}{t\+\_\+i}} \begin{DoxyCompactList}\small\item\em Top edge reconstruction of temperature \mbox{[}degC\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a81df82348aee4c4cba675867ab208e30}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a81df82348aee4c4cba675867ab208e30}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a81df82348aee4c4cba675867ab208e30}{s\+\_\+i}} \begin{DoxyCompactList}\small\item\em Top edge reconstruction of salinity \mbox{[}ppt\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a95135e12e13dd6c0b65d18e39d349e96}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a95135e12e13dd6c0b65d18e39d349e96}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a95135e12e13dd6c0b65d18e39d349e96}{p\+\_\+i}} \begin{DoxyCompactList}\small\item\em Interface pressures \mbox{[}R L2 T-\/2 $\sim$$>$ Pa\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6c965e9728dcb1d8cc3ae32abeba9528}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6c965e9728dcb1d8cc3ae32abeba9528}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a6c965e9728dcb1d8cc3ae32abeba9528}{drdt\+\_\+i}} \begin{DoxyCompactList}\small\item\em d\+Rho/dT \mbox{[}R deg\+C-\/1 $\sim$$>$ kg m-\/3 deg\+C-\/1\mbox{]} at top edge \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4cc6dbb7585a555b0c30437a86a259e7}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4cc6dbb7585a555b0c30437a86a259e7}} real, dimension(\+:,\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a4cc6dbb7585a555b0c30437a86a259e7}{drds\+\_\+i}} \begin{DoxyCompactList}\small\item\em d\+Rho/dS \mbox{[}R ppt-\/1 $\sim$$>$ kg m-\/3 ppt-\/1\mbox{]} at top edge \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a7cc2224058f092b6f5258c6f9d615abd}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a7cc2224058f092b6f5258c6f9d615abd}} integer, dimension(\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a7cc2224058f092b6f5258c6f9d615abd}{ns}} \begin{DoxyCompactList}\small\item\em Number of interfacs in a column. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a38c912a63641a86c1ae783a23aa33511}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a38c912a63641a86c1ae783a23aa33511}} logical, dimension(\+:,\+:,\+:), allocatable \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a38c912a63641a86c1ae783a23aa33511}{stable\+\_\+cell}} \begin{DoxyCompactList}\small\item\em True if the cell is stably stratified wrt to the next cell. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a27b98adeae9b99953b3d0e58d15710b7}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a27b98adeae9b99953b3d0e58d15710b7}} real \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a27b98adeae9b99953b3d0e58d15710b7}{r\+\_\+to\+\_\+kg\+\_\+m3}} = 1.\+0 \begin{DoxyCompactList}\small\item\em A rescaling factor translating density to kg m-\/3 for use in diagnostic messages \mbox{[}kg m-\/3 R-\/1 $\sim$$>$ 1\mbox{]}. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aed682a35e9c0b2fff0d7a42dda522315}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aed682a35e9c0b2fff0d7a42dda522315}} type(diag\+\_\+ctrl), pointer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_aed682a35e9c0b2fff0d7a42dda522315}{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__neutral__diffusion_1_1neutral__diffusion__cs_a3a25a2d4ed608012ebe6310420fd004e}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a3a25a2d4ed608012ebe6310420fd004e}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a3a25a2d4ed608012ebe6310420fd004e}{neutral\+\_\+pos\+\_\+method}} \begin{DoxyCompactList}\small\item\em Method to find the position of a neutral surface within the layer. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1acd63b50ed5a1732186340c392fba41}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1acd63b50ed5a1732186340c392fba41}} character(len=40) \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1acd63b50ed5a1732186340c392fba41}{delta\+\_\+rho\+\_\+form}} \begin{DoxyCompactList}\small\item\em Determine which (if any) approximation is made to the equation describing the difference in density. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1092d379fa9a237de8683d6df284765f}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1092d379fa9a237de8683d6df284765f}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a1092d379fa9a237de8683d6df284765f}{id\+\_\+uheff\+\_\+2d}} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostic I\+Ds. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a498317fff8b3e6b783941d206838f29a}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a498317fff8b3e6b783941d206838f29a}} integer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a498317fff8b3e6b783941d206838f29a}{id\+\_\+vheff\+\_\+2d}} = -\/1 \begin{DoxyCompactList}\small\item\em Diagnostic I\+Ds. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a40a2185fef35e650b0314b2a40f82ec3}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a40a2185fef35e650b0314b2a40f82ec3}} type(eos\+\_\+type), pointer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a40a2185fef35e650b0314b2a40f82ec3}{eos}} =$>$ N\+U\+LL() \begin{DoxyCompactList}\small\item\em Equation of state parameters. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5490f3b750ea7b2edec5a1a50915395a}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5490f3b750ea7b2edec5a1a50915395a}} type(remapping\+\_\+cs) \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a5490f3b750ea7b2edec5a1a50915395a}{remap\+\_\+cs}} \begin{DoxyCompactList}\small\item\em Remapping control structure used to create sublayers. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a52943d42c60fe136f3a8180cad1ae432}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a52943d42c60fe136f3a8180cad1ae432}} logical \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a52943d42c60fe136f3a8180cad1ae432}{remap\+\_\+answers\+\_\+2018}} \begin{DoxyCompactList}\small\item\em If true, use the order of arithmetic and expressions that recover the answers for remapping from the end of 2018. Otherwise, use more robust forms of the same expressions. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a9d4ed4cfc1ab5a267a329265049e0548}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a9d4ed4cfc1ab5a267a329265049e0548}} type(kpp\+\_\+cs), pointer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a9d4ed4cfc1ab5a267a329265049e0548}{kpp\+\_\+csp}} =$>$ N\+U\+LL() \begin{DoxyCompactList}\small\item\em K\+PP control structure needed to get B\+LD. \end{DoxyCompactList}\item \mbox{\Hypertarget{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a71df800f90d2bce2b431c2a4b22fdd26}\label{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a71df800f90d2bce2b431c2a4b22fdd26}} type(energetic\+\_\+pbl\+\_\+cs), pointer \mbox{\hyperlink{structmom__neutral__diffusion_1_1neutral__diffusion__cs_a71df800f90d2bce2b431c2a4b22fdd26}{energetic\+\_\+pbl\+\_\+csp}} =$>$ N\+U\+LL() \begin{DoxyCompactList}\small\item\em e\+P\+BL control structure needed to get M\+LD \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Detailed Description} The control structure for the M\+O\+M\+\_\+neutral\+\_\+diffusion module. Definition at line 43 of file M\+O\+M\+\_\+neutral\+\_\+diffusion.\+F90. The documentation for this type was generated from the following file\+:\begin{DoxyCompactItemize} \item /home/cermak/src/\+M\+O\+M6.\+devrob/src/tracer/M\+O\+M\+\_\+neutral\+\_\+diffusion.\+F90\end{DoxyCompactItemize}