\hypertarget{namespacemom__eos__nemo}{}\section{mom\+\_\+eos\+\_\+nemo Module Reference} \label{namespacemom__eos__nemo}\index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsection{Detailed Description} The equation of state using the expressions of Roquet et al. that are used in N\+E\+MO. \subsection*{Data Types} \begin{DoxyCompactItemize} \item interface \hyperlink{interfacemom__eos__nemo_1_1calculate__density__derivs__nemo}{calculate\+\_\+density\+\_\+derivs\+\_\+nemo} \begin{DoxyCompactList}\small\item\em For a given thermodynamic state, return the derivatives of density with conservative temperature and absolute salinity, the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\item interface \hyperlink{interfacemom__eos__nemo_1_1calculate__density__nemo}{calculate\+\_\+density\+\_\+nemo} \begin{DoxyCompactList}\small\item\em Compute the in situ density of sea water (\mbox{[}kg m-\/3\mbox{]}), or its anomaly with respect to a reference density, from absolute salinity (g/kg), conservative temperature (in deg C), and pressure \mbox{[}Pa\mbox{]}, using the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection*{Functions/\+Subroutines} \begin{DoxyCompactItemize} \item subroutine, public \hyperlink{namespacemom__eos__nemo_a78c3bbb7960ee09a4c0aacb3d9eda912}{calculate\+\_\+density\+\_\+scalar\+\_\+nemo} (T, S, pressure, rho, rho\+\_\+ref) \begin{DoxyCompactList}\small\item\em This subroutine computes the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) from absolute salinity (S \mbox{[}g kg-\/1\mbox{]}), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}. It uses the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\item subroutine, public \hyperlink{namespacemom__eos__nemo_a262e1078592bdb306dc27207c0463648}{calculate\+\_\+density\+\_\+array\+\_\+nemo} (T, S, pressure, rho, start, npts, rho\+\_\+ref) \begin{DoxyCompactList}\small\item\em This subroutine computes the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) from absolute salinity (S \mbox{[}g kg-\/1\mbox{]}), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}. It uses the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\item subroutine \hyperlink{namespacemom__eos__nemo_ac794e7251c8971a0795fc6add423a6d9}{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo} (T, S, pressure, drho\+\_\+dT, drho\+\_\+dS, start, npts) \begin{DoxyCompactList}\small\item\em For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\item subroutine \hyperlink{namespacemom__eos__nemo_a07b8b3637c4d692b17a97c1e58dddbf7}{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo} (T, S, pressure, drho\+\_\+dt, drho\+\_\+ds) \begin{DoxyCompactList}\small\item\em Wrapper to calculate\+\_\+density\+\_\+derivs\+\_\+array for scalar inputs. \end{DoxyCompactList}\item subroutine, public \hyperlink{namespacemom__eos__nemo_ab9441b5fdd50f09a5bac70012def0ea7}{calculate\+\_\+compress\+\_\+nemo} (T, S, pressure, rho, drho\+\_\+dp, start, npts) \begin{DoxyCompactList}\small\item\em Compute the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) and the compressibility (drho/dp = C\+\_\+sound$^\wedge$-\/2, stored as drho\+\_\+dp \mbox{[}s2 m-\/2\mbox{]}) from absolute salinity (sal in g/kg), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}, using the expressions derived for use with N\+E\+MO. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection*{Variables} \begin{DoxyCompactItemize} \item \mbox{\Hypertarget{namespacemom__eos__nemo_a0971df26b4852f72c6a5c365a48c43ca}\label{namespacemom__eos__nemo_a0971df26b4852f72c6a5c365a48c43ca}} real, parameter \hyperlink{namespacemom__eos__nemo_a0971df26b4852f72c6a5c365a48c43ca}{pa2db} = 1.e-\/4 \begin{DoxyCompactList}\small\item\em Conversion factor between Pa and dbar. \end{DoxyCompactList}\end{DoxyCompactItemize} \textbf{ }\par \begin{DoxyCompactItemize} \item \mbox{\Hypertarget{namespacemom__eos__nemo_a53533867a26002f1bbd7e3ac9ab3c100}\label{namespacemom__eos__nemo_a53533867a26002f1bbd7e3ac9ab3c100}} real, parameter \hyperlink{namespacemom__eos__nemo_a53533867a26002f1bbd7e3ac9ab3c100}{rdeltas} = 32. \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aff7c6945ca1604645b655cec03fdd296}\label{namespacemom__eos__nemo_aff7c6945ca1604645b655cec03fdd296}} real, parameter \hyperlink{namespacemom__eos__nemo_aff7c6945ca1604645b655cec03fdd296}{r1\+\_\+s0} = 0.\+875/35.\+16504 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aed16d8ac1150a3b68b39751484230387}\label{namespacemom__eos__nemo_aed16d8ac1150a3b68b39751484230387}} real, parameter \hyperlink{namespacemom__eos__nemo_aed16d8ac1150a3b68b39751484230387}{r1\+\_\+t0} = 1./40. \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa65f3c6aa54ef984c28377593a9a4c1c}\label{namespacemom__eos__nemo_aa65f3c6aa54ef984c28377593a9a4c1c}} real, parameter \hyperlink{namespacemom__eos__nemo_aa65f3c6aa54ef984c28377593a9a4c1c}{r1\+\_\+p0} = 1.e-\/4 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a11140d208e01db0c62986734b491d049}\label{namespacemom__eos__nemo_a11140d208e01db0c62986734b491d049}} real, parameter \hyperlink{namespacemom__eos__nemo_a11140d208e01db0c62986734b491d049}{r00} = 4.\+6494977072e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3b65a849a7e2895b9a3c9dc51005cea4}\label{namespacemom__eos__nemo_a3b65a849a7e2895b9a3c9dc51005cea4}} real, parameter \hyperlink{namespacemom__eos__nemo_a3b65a849a7e2895b9a3c9dc51005cea4}{r01} = -\/5.\+2099962525 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a53d876bc2be9855f046bd4412c179e1a}\label{namespacemom__eos__nemo_a53d876bc2be9855f046bd4412c179e1a}} real, parameter \hyperlink{namespacemom__eos__nemo_a53d876bc2be9855f046bd4412c179e1a}{r02} = 2.\+2601900708e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a236f2c051f4f2932cdcabe2591c44dd2}\label{namespacemom__eos__nemo_a236f2c051f4f2932cdcabe2591c44dd2}} real, parameter \hyperlink{namespacemom__eos__nemo_a236f2c051f4f2932cdcabe2591c44dd2}{r03} = 6.\+4326772569e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a43772f86d7655e96bf4ab76d1092e773}\label{namespacemom__eos__nemo_a43772f86d7655e96bf4ab76d1092e773}} real, parameter \hyperlink{namespacemom__eos__nemo_a43772f86d7655e96bf4ab76d1092e773}{r04} = 1.\+5616995503e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac785fe1208a79659132d28ad42c066e0}\label{namespacemom__eos__nemo_ac785fe1208a79659132d28ad42c066e0}} real, parameter \hyperlink{namespacemom__eos__nemo_ac785fe1208a79659132d28ad42c066e0}{r05} = -\/1.\+7243708991e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a195341a9f30953d4273b9911be919d97}\label{namespacemom__eos__nemo_a195341a9f30953d4273b9911be919d97}} real, parameter \hyperlink{namespacemom__eos__nemo_a195341a9f30953d4273b9911be919d97}{eos000} = 8.\+0189615746e+02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a5b9897ff53c111f9e5b6a6c518d1ee65}\label{namespacemom__eos__nemo_a5b9897ff53c111f9e5b6a6c518d1ee65}} real, parameter \hyperlink{namespacemom__eos__nemo_a5b9897ff53c111f9e5b6a6c518d1ee65}{eos100} = 8.\+6672408165e+02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a17eab41790870c83f4638caa1186e2db}\label{namespacemom__eos__nemo_a17eab41790870c83f4638caa1186e2db}} real, parameter \hyperlink{namespacemom__eos__nemo_a17eab41790870c83f4638caa1186e2db}{eos200} = -\/1.\+7864682637e+03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_af98ae0cde0d041c1626ba047434e8483}\label{namespacemom__eos__nemo_af98ae0cde0d041c1626ba047434e8483}} real, parameter \hyperlink{namespacemom__eos__nemo_af98ae0cde0d041c1626ba047434e8483}{eos300} = 2.\+0375295546e+03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3758b5e5c94ba44d181e606961f9ee5a}\label{namespacemom__eos__nemo_a3758b5e5c94ba44d181e606961f9ee5a}} real, parameter \hyperlink{namespacemom__eos__nemo_a3758b5e5c94ba44d181e606961f9ee5a}{eos400} = -\/1.\+2849161071e+03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_acb96ab9534110eb211af4af004fdac1a}\label{namespacemom__eos__nemo_acb96ab9534110eb211af4af004fdac1a}} real, parameter \hyperlink{namespacemom__eos__nemo_acb96ab9534110eb211af4af004fdac1a}{eos500} = 4.\+3227585684e+02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3d1a287dd3d4a06c2d3fe39a5b163022}\label{namespacemom__eos__nemo_a3d1a287dd3d4a06c2d3fe39a5b163022}} real, parameter \hyperlink{namespacemom__eos__nemo_a3d1a287dd3d4a06c2d3fe39a5b163022}{eos600} = -\/6.\+0579916612e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a781ec76f2d46654f722e11198fd93012}\label{namespacemom__eos__nemo_a781ec76f2d46654f722e11198fd93012}} real, parameter \hyperlink{namespacemom__eos__nemo_a781ec76f2d46654f722e11198fd93012}{eos010} = 2.\+6010145068e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac30b13ad7345624338668e62c3a78c4c}\label{namespacemom__eos__nemo_ac30b13ad7345624338668e62c3a78c4c}} real, parameter \hyperlink{namespacemom__eos__nemo_ac30b13ad7345624338668e62c3a78c4c}{eos110} = -\/6.\+5281885265e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a9e4e6638cbd038e3fdab06e70462cd01}\label{namespacemom__eos__nemo_a9e4e6638cbd038e3fdab06e70462cd01}} real, parameter \hyperlink{namespacemom__eos__nemo_a9e4e6638cbd038e3fdab06e70462cd01}{eos210} = 8.\+1770425108e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a559a3b13ac9e82537f3de1459efc06ac}\label{namespacemom__eos__nemo_a559a3b13ac9e82537f3de1459efc06ac}} real, parameter \hyperlink{namespacemom__eos__nemo_a559a3b13ac9e82537f3de1459efc06ac}{eos310} = -\/5.\+6888046321e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a8f58d4b1bf2110ff29844fc6f9913a6c}\label{namespacemom__eos__nemo_a8f58d4b1bf2110ff29844fc6f9913a6c}} real, parameter \hyperlink{namespacemom__eos__nemo_a8f58d4b1bf2110ff29844fc6f9913a6c}{eos410} = 1.\+7681814114e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a86b7d300df8b5253a5cb9f64012957ef}\label{namespacemom__eos__nemo_a86b7d300df8b5253a5cb9f64012957ef}} real, parameter \hyperlink{namespacemom__eos__nemo_a86b7d300df8b5253a5cb9f64012957ef}{eos510} = -\/1.\+9193502195 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a7fed7a7643bae52c96e46aea6121cfd7}\label{namespacemom__eos__nemo_a7fed7a7643bae52c96e46aea6121cfd7}} real, parameter \hyperlink{namespacemom__eos__nemo_a7fed7a7643bae52c96e46aea6121cfd7}{eos020} = -\/3.\+7074170417e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a1140b0daf070f8b18325e9e716bfb032}\label{namespacemom__eos__nemo_a1140b0daf070f8b18325e9e716bfb032}} real, parameter \hyperlink{namespacemom__eos__nemo_a1140b0daf070f8b18325e9e716bfb032}{eos120} = 6.\+1548258127e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a0b92658659f5f5627e1a221f6ff5679f}\label{namespacemom__eos__nemo_a0b92658659f5f5627e1a221f6ff5679f}} real, parameter \hyperlink{namespacemom__eos__nemo_a0b92658659f5f5627e1a221f6ff5679f}{eos220} = -\/6.\+0362551501e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa332603385c1fd88b6e9418a84966177}\label{namespacemom__eos__nemo_aa332603385c1fd88b6e9418a84966177}} real, parameter \hyperlink{namespacemom__eos__nemo_aa332603385c1fd88b6e9418a84966177}{eos320} = 2.\+9130021253e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac2e0619edb8047cc0126494a6e0b6646}\label{namespacemom__eos__nemo_ac2e0619edb8047cc0126494a6e0b6646}} real, parameter \hyperlink{namespacemom__eos__nemo_ac2e0619edb8047cc0126494a6e0b6646}{eos420} = -\/5.\+4723692739 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a58e6bc4bfeb9d5fb571dee2ada1a9967}\label{namespacemom__eos__nemo_a58e6bc4bfeb9d5fb571dee2ada1a9967}} real, parameter \hyperlink{namespacemom__eos__nemo_a58e6bc4bfeb9d5fb571dee2ada1a9967}{eos030} = 2.\+1661789529e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a79fa99f4e0ef86696088c05434b72a4d}\label{namespacemom__eos__nemo_a79fa99f4e0ef86696088c05434b72a4d}} real, parameter \hyperlink{namespacemom__eos__nemo_a79fa99f4e0ef86696088c05434b72a4d}{eos130} = -\/3.\+3449108469e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a2243c2d7d42bc157d3d3466525ac7c54}\label{namespacemom__eos__nemo_a2243c2d7d42bc157d3d3466525ac7c54}} real, parameter \hyperlink{namespacemom__eos__nemo_a2243c2d7d42bc157d3d3466525ac7c54}{eos230} = 1.\+9717078466e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ad1fdac3d58553ff61a5c7d44ba633b33}\label{namespacemom__eos__nemo_ad1fdac3d58553ff61a5c7d44ba633b33}} real, parameter \hyperlink{namespacemom__eos__nemo_ad1fdac3d58553ff61a5c7d44ba633b33}{eos330} = -\/3.\+1742946532 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a361d02ddbb998262d32bb29226211ac0}\label{namespacemom__eos__nemo_a361d02ddbb998262d32bb29226211ac0}} real, parameter \hyperlink{namespacemom__eos__nemo_a361d02ddbb998262d32bb29226211ac0}{eos040} = -\/8.\+3627885467 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a801de700bd93ec87db630ad0ab87bbda}\label{namespacemom__eos__nemo_a801de700bd93ec87db630ad0ab87bbda}} real, parameter \hyperlink{namespacemom__eos__nemo_a801de700bd93ec87db630ad0ab87bbda}{eos140} = 1.\+1311538584e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ab9c71aa000a5f556be70af9392c00f95}\label{namespacemom__eos__nemo_ab9c71aa000a5f556be70af9392c00f95}} real, parameter \hyperlink{namespacemom__eos__nemo_ab9c71aa000a5f556be70af9392c00f95}{eos240} = -\/5.\+3563304045 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a375b5788fe50b3459c96bedf2cc8d080}\label{namespacemom__eos__nemo_a375b5788fe50b3459c96bedf2cc8d080}} real, parameter \hyperlink{namespacemom__eos__nemo_a375b5788fe50b3459c96bedf2cc8d080}{eos050} = 5.\+4048723791e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a5a19990bad4568560882349e235791f9}\label{namespacemom__eos__nemo_a5a19990bad4568560882349e235791f9}} real, parameter \hyperlink{namespacemom__eos__nemo_a5a19990bad4568560882349e235791f9}{eos150} = 4.\+8169980163e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a2fff4dcad7d44124a7fe4b52815168b0}\label{namespacemom__eos__nemo_a2fff4dcad7d44124a7fe4b52815168b0}} real, parameter \hyperlink{namespacemom__eos__nemo_a2fff4dcad7d44124a7fe4b52815168b0}{eos060} = -\/1.\+9083568888e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a7a2438d3866b848c23254275474f190d}\label{namespacemom__eos__nemo_a7a2438d3866b848c23254275474f190d}} real, parameter \hyperlink{namespacemom__eos__nemo_a7a2438d3866b848c23254275474f190d}{eos001} = 1.\+9681925209e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a1b64af1e012977ce16f860d5a217f339}\label{namespacemom__eos__nemo_a1b64af1e012977ce16f860d5a217f339}} real, parameter \hyperlink{namespacemom__eos__nemo_a1b64af1e012977ce16f860d5a217f339}{eos101} = -\/4.\+2549998214e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a875177634103ed9d4731764a3388dc90}\label{namespacemom__eos__nemo_a875177634103ed9d4731764a3388dc90}} real, parameter \hyperlink{namespacemom__eos__nemo_a875177634103ed9d4731764a3388dc90}{eos201} = 5.\+0774768218e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a57de976d26bab259572285e5882fa456}\label{namespacemom__eos__nemo_a57de976d26bab259572285e5882fa456}} real, parameter \hyperlink{namespacemom__eos__nemo_a57de976d26bab259572285e5882fa456}{eos301} = -\/3.\+0938076334e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a9b447d6fdc00d872bf8cf1f05ce923f3}\label{namespacemom__eos__nemo_a9b447d6fdc00d872bf8cf1f05ce923f3}} real, parameter \hyperlink{namespacemom__eos__nemo_a9b447d6fdc00d872bf8cf1f05ce923f3}{eos401} = 6.\+6051753097 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a339d6be5b34efe4d4b89b51f7ce1f1cf}\label{namespacemom__eos__nemo_a339d6be5b34efe4d4b89b51f7ce1f1cf}} real, parameter \hyperlink{namespacemom__eos__nemo_a339d6be5b34efe4d4b89b51f7ce1f1cf}{eos011} = -\/1.\+3336301113e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a232bbf384411a8f3465bafab538737b7}\label{namespacemom__eos__nemo_a232bbf384411a8f3465bafab538737b7}} real, parameter \hyperlink{namespacemom__eos__nemo_a232bbf384411a8f3465bafab538737b7}{eos111} = -\/4.\+4870114575 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa6a67c9c57198e616aff5077d7de4b52}\label{namespacemom__eos__nemo_aa6a67c9c57198e616aff5077d7de4b52}} real, parameter \hyperlink{namespacemom__eos__nemo_aa6a67c9c57198e616aff5077d7de4b52}{eos211} = 5.\+0042598061 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aba322aac8117458e7c2ee93a04493a5d}\label{namespacemom__eos__nemo_aba322aac8117458e7c2ee93a04493a5d}} real, parameter \hyperlink{namespacemom__eos__nemo_aba322aac8117458e7c2ee93a04493a5d}{eos311} = -\/6.\+5399043664e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aac8e81af420b3df829557f080ac10cad}\label{namespacemom__eos__nemo_aac8e81af420b3df829557f080ac10cad}} real, parameter \hyperlink{namespacemom__eos__nemo_aac8e81af420b3df829557f080ac10cad}{eos021} = 6.\+7080479603 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a47d3df2ef8e61163929c066b9246d245}\label{namespacemom__eos__nemo_a47d3df2ef8e61163929c066b9246d245}} real, parameter \hyperlink{namespacemom__eos__nemo_a47d3df2ef8e61163929c066b9246d245}{eos121} = 3.\+5063081279 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a5e2df56a2f2b08848d9a5bad293dc0bf}\label{namespacemom__eos__nemo_a5e2df56a2f2b08848d9a5bad293dc0bf}} real, parameter \hyperlink{namespacemom__eos__nemo_a5e2df56a2f2b08848d9a5bad293dc0bf}{eos221} = -\/1.\+8795372996 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_adfbd3ebd4e5a7d1438c0688ebcf347a7}\label{namespacemom__eos__nemo_adfbd3ebd4e5a7d1438c0688ebcf347a7}} real, parameter \hyperlink{namespacemom__eos__nemo_adfbd3ebd4e5a7d1438c0688ebcf347a7}{eos031} = -\/2.\+4649669534 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a088a2e083a4715811ef4b94a362e56e0}\label{namespacemom__eos__nemo_a088a2e083a4715811ef4b94a362e56e0}} real, parameter \hyperlink{namespacemom__eos__nemo_a088a2e083a4715811ef4b94a362e56e0}{eos131} = -\/5.\+5077101279e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ab8081b090fedbe063bc90dfded2356d2}\label{namespacemom__eos__nemo_ab8081b090fedbe063bc90dfded2356d2}} real, parameter \hyperlink{namespacemom__eos__nemo_ab8081b090fedbe063bc90dfded2356d2}{eos041} = 5.\+5927935970e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac9db32270ddefe892b14338b0cdda4bd}\label{namespacemom__eos__nemo_ac9db32270ddefe892b14338b0cdda4bd}} real, parameter \hyperlink{namespacemom__eos__nemo_ac9db32270ddefe892b14338b0cdda4bd}{eos002} = 2.\+0660924175 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a05d7e4897753cc48a69dadcf9f64d585}\label{namespacemom__eos__nemo_a05d7e4897753cc48a69dadcf9f64d585}} real, parameter \hyperlink{namespacemom__eos__nemo_a05d7e4897753cc48a69dadcf9f64d585}{eos102} = -\/4.\+9527603989 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa440e0883d473a1ff2a45d0246267c65}\label{namespacemom__eos__nemo_aa440e0883d473a1ff2a45d0246267c65}} real, parameter \hyperlink{namespacemom__eos__nemo_aa440e0883d473a1ff2a45d0246267c65}{eos202} = 2.\+5019633244 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a40ac7aa0960dc726c6c9c6c2d64fe418}\label{namespacemom__eos__nemo_a40ac7aa0960dc726c6c9c6c2d64fe418}} real, parameter \hyperlink{namespacemom__eos__nemo_a40ac7aa0960dc726c6c9c6c2d64fe418}{eos012} = 2.\+0564311499 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae07762358a520e338c027843c8d3f809}\label{namespacemom__eos__nemo_ae07762358a520e338c027843c8d3f809}} real, parameter \hyperlink{namespacemom__eos__nemo_ae07762358a520e338c027843c8d3f809}{eos112} = -\/2.\+1311365518e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a0aac1e6f018d8525bfd7a1f804432285}\label{namespacemom__eos__nemo_a0aac1e6f018d8525bfd7a1f804432285}} real, parameter \hyperlink{namespacemom__eos__nemo_a0aac1e6f018d8525bfd7a1f804432285}{eos022} = -\/1.\+2419983026 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3eb5ea6d738ae7a37d9ae33cdd5b567d}\label{namespacemom__eos__nemo_a3eb5ea6d738ae7a37d9ae33cdd5b567d}} real, parameter \hyperlink{namespacemom__eos__nemo_a3eb5ea6d738ae7a37d9ae33cdd5b567d}{eos003} = -\/2.\+3342758797e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a6401ddb09863186b39640d364c36895c}\label{namespacemom__eos__nemo_a6401ddb09863186b39640d364c36895c}} real, parameter \hyperlink{namespacemom__eos__nemo_a6401ddb09863186b39640d364c36895c}{eos103} = -\/1.\+8507636718e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a492917fb80383f4f60ee1f5cbdb8ba38}\label{namespacemom__eos__nemo_a492917fb80383f4f60ee1f5cbdb8ba38}} real, parameter \hyperlink{namespacemom__eos__nemo_a492917fb80383f4f60ee1f5cbdb8ba38}{eos013} = 3.\+7969820455e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a12bbc0d7956138ad9d9b86737a09cdff}\label{namespacemom__eos__nemo_a12bbc0d7956138ad9d9b86737a09cdff}} real, parameter \hyperlink{namespacemom__eos__nemo_a12bbc0d7956138ad9d9b86737a09cdff}{alp000} = -\/6.\+5025362670e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a8c717264d21710facfc8487f181eed8b}\label{namespacemom__eos__nemo_a8c717264d21710facfc8487f181eed8b}} real, parameter \hyperlink{namespacemom__eos__nemo_a8c717264d21710facfc8487f181eed8b}{alp100} = 1.\+6320471316 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa9b6efc95a2e6ec8f8152d40aa267f51}\label{namespacemom__eos__nemo_aa9b6efc95a2e6ec8f8152d40aa267f51}} real, parameter \hyperlink{namespacemom__eos__nemo_aa9b6efc95a2e6ec8f8152d40aa267f51}{alp200} = -\/2.\+0442606277 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a055c837393fe4f2e3d86e1798291cf85}\label{namespacemom__eos__nemo_a055c837393fe4f2e3d86e1798291cf85}} real, parameter \hyperlink{namespacemom__eos__nemo_a055c837393fe4f2e3d86e1798291cf85}{alp300} = 1.\+4222011580 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a0d74f091416ad0369d2713cd5ec191d9}\label{namespacemom__eos__nemo_a0d74f091416ad0369d2713cd5ec191d9}} real, parameter \hyperlink{namespacemom__eos__nemo_a0d74f091416ad0369d2713cd5ec191d9}{alp400} = -\/4.\+4204535284e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a48e7c2b87af5f7271dd4ce9ee586dbaf}\label{namespacemom__eos__nemo_a48e7c2b87af5f7271dd4ce9ee586dbaf}} real, parameter \hyperlink{namespacemom__eos__nemo_a48e7c2b87af5f7271dd4ce9ee586dbaf}{alp500} = 4.\+7983755487e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a89f1f131b977ff3f78b4bb0df28874a5}\label{namespacemom__eos__nemo_a89f1f131b977ff3f78b4bb0df28874a5}} real, parameter \hyperlink{namespacemom__eos__nemo_a89f1f131b977ff3f78b4bb0df28874a5}{alp010} = 1.\+8537085209 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_afb74988a4f6bcc22cae7885d2d18df73}\label{namespacemom__eos__nemo_afb74988a4f6bcc22cae7885d2d18df73}} real, parameter \hyperlink{namespacemom__eos__nemo_afb74988a4f6bcc22cae7885d2d18df73}{alp110} = -\/3.\+0774129064 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ad42b98f751549f459ac4250742058ac1}\label{namespacemom__eos__nemo_ad42b98f751549f459ac4250742058ac1}} real, parameter \hyperlink{namespacemom__eos__nemo_ad42b98f751549f459ac4250742058ac1}{alp210} = 3.\+0181275751 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a91296f9d0d2c25a0772c75a11ae4888c}\label{namespacemom__eos__nemo_a91296f9d0d2c25a0772c75a11ae4888c}} real, parameter \hyperlink{namespacemom__eos__nemo_a91296f9d0d2c25a0772c75a11ae4888c}{alp310} = -\/1.\+4565010626 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3332a2914d7eaeec33a882b5e3ba5317}\label{namespacemom__eos__nemo_a3332a2914d7eaeec33a882b5e3ba5317}} real, parameter \hyperlink{namespacemom__eos__nemo_a3332a2914d7eaeec33a882b5e3ba5317}{alp410} = 2.\+7361846370e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae883ed088760a0f3cf68817ec612fdb1}\label{namespacemom__eos__nemo_ae883ed088760a0f3cf68817ec612fdb1}} real, parameter \hyperlink{namespacemom__eos__nemo_ae883ed088760a0f3cf68817ec612fdb1}{alp020} = -\/1.\+6246342147 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a13c0572d0ddd2382744d2d4ff9e68b6a}\label{namespacemom__eos__nemo_a13c0572d0ddd2382744d2d4ff9e68b6a}} real, parameter \hyperlink{namespacemom__eos__nemo_a13c0572d0ddd2382744d2d4ff9e68b6a}{alp120} = 2.\+5086831352 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac17610b10a170875112af38eb317c1c3}\label{namespacemom__eos__nemo_ac17610b10a170875112af38eb317c1c3}} real, parameter \hyperlink{namespacemom__eos__nemo_ac17610b10a170875112af38eb317c1c3}{alp220} = -\/1.\+4787808849 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_af9b5b2c521936b50d07320e6be59182f}\label{namespacemom__eos__nemo_af9b5b2c521936b50d07320e6be59182f}} real, parameter \hyperlink{namespacemom__eos__nemo_af9b5b2c521936b50d07320e6be59182f}{alp320} = 2.\+3807209899e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_af4110b7d300164ff04e7ad45247bc059}\label{namespacemom__eos__nemo_af4110b7d300164ff04e7ad45247bc059}} real, parameter \hyperlink{namespacemom__eos__nemo_af4110b7d300164ff04e7ad45247bc059}{alp030} = 8.\+3627885467e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ad541cb8f5b147788abbe8b9d57100400}\label{namespacemom__eos__nemo_ad541cb8f5b147788abbe8b9d57100400}} real, parameter \hyperlink{namespacemom__eos__nemo_ad541cb8f5b147788abbe8b9d57100400}{alp130} = -\/1.\+1311538584 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a0bb7fb7a80942aa8e83149d75cf757a5}\label{namespacemom__eos__nemo_a0bb7fb7a80942aa8e83149d75cf757a5}} real, parameter \hyperlink{namespacemom__eos__nemo_a0bb7fb7a80942aa8e83149d75cf757a5}{alp230} = 5.\+3563304045e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa4dcc26a005ea0ee24c1de3e7901789b}\label{namespacemom__eos__nemo_aa4dcc26a005ea0ee24c1de3e7901789b}} real, parameter \hyperlink{namespacemom__eos__nemo_aa4dcc26a005ea0ee24c1de3e7901789b}{alp040} = -\/6.\+7560904739e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a2a25b6f6294e214e298c72f32e5d2197}\label{namespacemom__eos__nemo_a2a25b6f6294e214e298c72f32e5d2197}} real, parameter \hyperlink{namespacemom__eos__nemo_a2a25b6f6294e214e298c72f32e5d2197}{alp140} = -\/6.\+0212475204e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_abc5a5461d87e78db910ee7211c2da225}\label{namespacemom__eos__nemo_abc5a5461d87e78db910ee7211c2da225}} real, parameter \hyperlink{namespacemom__eos__nemo_abc5a5461d87e78db910ee7211c2da225}{alp050} = 2.\+8625353333e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a061ca2790a68fefe428c09ed34273b79}\label{namespacemom__eos__nemo_a061ca2790a68fefe428c09ed34273b79}} real, parameter \hyperlink{namespacemom__eos__nemo_a061ca2790a68fefe428c09ed34273b79}{alp001} = 3.\+3340752782e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a7da890910571a9780af441a8b044208a}\label{namespacemom__eos__nemo_a7da890910571a9780af441a8b044208a}} real, parameter \hyperlink{namespacemom__eos__nemo_a7da890910571a9780af441a8b044208a}{alp101} = 1.\+1217528644e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a1638866ff203a0ee1bdbc4e759e64ba4}\label{namespacemom__eos__nemo_a1638866ff203a0ee1bdbc4e759e64ba4}} real, parameter \hyperlink{namespacemom__eos__nemo_a1638866ff203a0ee1bdbc4e759e64ba4}{alp201} = -\/1.\+2510649515e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_afd547bff76abf76eb68da4c14a93fee8}\label{namespacemom__eos__nemo_afd547bff76abf76eb68da4c14a93fee8}} real, parameter \hyperlink{namespacemom__eos__nemo_afd547bff76abf76eb68da4c14a93fee8}{alp301} = 1.\+6349760916e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a21d1d8e9f7d934d8619a9babc02ecda2}\label{namespacemom__eos__nemo_a21d1d8e9f7d934d8619a9babc02ecda2}} real, parameter \hyperlink{namespacemom__eos__nemo_a21d1d8e9f7d934d8619a9babc02ecda2}{alp011} = -\/3.\+3540239802e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa190f940e390fdcef74d1347417fdd3a}\label{namespacemom__eos__nemo_aa190f940e390fdcef74d1347417fdd3a}} real, parameter \hyperlink{namespacemom__eos__nemo_aa190f940e390fdcef74d1347417fdd3a}{alp111} = -\/1.\+7531540640e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_af7e883aa58d5286342a109103f702cf0}\label{namespacemom__eos__nemo_af7e883aa58d5286342a109103f702cf0}} real, parameter \hyperlink{namespacemom__eos__nemo_af7e883aa58d5286342a109103f702cf0}{alp211} = 9.\+3976864981e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a015953fdf2f3018e91e157579f2cf286}\label{namespacemom__eos__nemo_a015953fdf2f3018e91e157579f2cf286}} real, parameter \hyperlink{namespacemom__eos__nemo_a015953fdf2f3018e91e157579f2cf286}{alp021} = 1.\+8487252150e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a60701564fcbb969497164607d446c559}\label{namespacemom__eos__nemo_a60701564fcbb969497164607d446c559}} real, parameter \hyperlink{namespacemom__eos__nemo_a60701564fcbb969497164607d446c559}{alp121} = 4.\+1307825959e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae80a74bf828662f7d41a825946c5c711}\label{namespacemom__eos__nemo_ae80a74bf828662f7d41a825946c5c711}} real, parameter \hyperlink{namespacemom__eos__nemo_ae80a74bf828662f7d41a825946c5c711}{alp031} = -\/5.\+5927935970e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a7659abd209dbb01ca52d65156b0fb2f3}\label{namespacemom__eos__nemo_a7659abd209dbb01ca52d65156b0fb2f3}} real, parameter \hyperlink{namespacemom__eos__nemo_a7659abd209dbb01ca52d65156b0fb2f3}{alp002} = -\/5.\+1410778748e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a26d91cf3d9abe246cdf640772c249098}\label{namespacemom__eos__nemo_a26d91cf3d9abe246cdf640772c249098}} real, parameter \hyperlink{namespacemom__eos__nemo_a26d91cf3d9abe246cdf640772c249098}{alp102} = 5.\+3278413794e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a03b6b188f255d3183922b7945f217d9e}\label{namespacemom__eos__nemo_a03b6b188f255d3183922b7945f217d9e}} real, parameter \hyperlink{namespacemom__eos__nemo_a03b6b188f255d3183922b7945f217d9e}{alp012} = 6.\+2099915132e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae3935140a93e13c596295828d6bd7f01}\label{namespacemom__eos__nemo_ae3935140a93e13c596295828d6bd7f01}} real, parameter \hyperlink{namespacemom__eos__nemo_ae3935140a93e13c596295828d6bd7f01}{alp003} = -\/9.\+4924551138e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a661c13203a6eab8603690c06edeb8bdb}\label{namespacemom__eos__nemo_a661c13203a6eab8603690c06edeb8bdb}} real, parameter \hyperlink{namespacemom__eos__nemo_a661c13203a6eab8603690c06edeb8bdb}{bet000} = 1.\+0783203594e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a665facb9d3d2099dc414d6fea3cd0819}\label{namespacemom__eos__nemo_a665facb9d3d2099dc414d6fea3cd0819}} real, parameter \hyperlink{namespacemom__eos__nemo_a665facb9d3d2099dc414d6fea3cd0819}{bet100} = -\/4.\+4452095908e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a58e24ab6fdc3be498e97083d630b1471}\label{namespacemom__eos__nemo_a58e24ab6fdc3be498e97083d630b1471}} real, parameter \hyperlink{namespacemom__eos__nemo_a58e24ab6fdc3be498e97083d630b1471}{bet200} = 7.\+6048755820e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ab67ae925dddb090513f4db1d4fa6c2fc}\label{namespacemom__eos__nemo_ab67ae925dddb090513f4db1d4fa6c2fc}} real, parameter \hyperlink{namespacemom__eos__nemo_ab67ae925dddb090513f4db1d4fa6c2fc}{bet300} = -\/6.\+3944280668e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a29cbb89ed6d46a96754ffcb88e84efd1}\label{namespacemom__eos__nemo_a29cbb89ed6d46a96754ffcb88e84efd1}} real, parameter \hyperlink{namespacemom__eos__nemo_a29cbb89ed6d46a96754ffcb88e84efd1}{bet400} = 2.\+6890441098e+01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a80fce83ddbd44e4ecb6bfa71489af06f}\label{namespacemom__eos__nemo_a80fce83ddbd44e4ecb6bfa71489af06f}} real, parameter \hyperlink{namespacemom__eos__nemo_a80fce83ddbd44e4ecb6bfa71489af06f}{bet500} = -\/4.\+5221697773 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_acd0ea461fa59b1380d7596953e091186}\label{namespacemom__eos__nemo_acd0ea461fa59b1380d7596953e091186}} real, parameter \hyperlink{namespacemom__eos__nemo_acd0ea461fa59b1380d7596953e091186}{bet010} = -\/8.\+1219372432e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac5f403c2e3bdedef3da4930f36e45b31}\label{namespacemom__eos__nemo_ac5f403c2e3bdedef3da4930f36e45b31}} real, parameter \hyperlink{namespacemom__eos__nemo_ac5f403c2e3bdedef3da4930f36e45b31}{bet110} = 2.\+0346663041 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a88684232c5f2229ddbadc9e67c16309c}\label{namespacemom__eos__nemo_a88684232c5f2229ddbadc9e67c16309c}} real, parameter \hyperlink{namespacemom__eos__nemo_a88684232c5f2229ddbadc9e67c16309c}{bet210} = -\/2.\+1232895170 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a743f5c292074642827328ab258f162f8}\label{namespacemom__eos__nemo_a743f5c292074642827328ab258f162f8}} real, parameter \hyperlink{namespacemom__eos__nemo_a743f5c292074642827328ab258f162f8}{bet310} = 8.\+7994140485e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac55dfd7729c2d67830e29d6ab1b1f9d0}\label{namespacemom__eos__nemo_ac55dfd7729c2d67830e29d6ab1b1f9d0}} real, parameter \hyperlink{namespacemom__eos__nemo_ac55dfd7729c2d67830e29d6ab1b1f9d0}{bet410} = -\/1.\+1939638360e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a5f3c78d5972e6e6a167abde61702d7ea}\label{namespacemom__eos__nemo_a5f3c78d5972e6e6a167abde61702d7ea}} real, parameter \hyperlink{namespacemom__eos__nemo_a5f3c78d5972e6e6a167abde61702d7ea}{bet020} = 7.\+6574242289e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_af69911317c47350901bc3cb057607a3a}\label{namespacemom__eos__nemo_af69911317c47350901bc3cb057607a3a}} real, parameter \hyperlink{namespacemom__eos__nemo_af69911317c47350901bc3cb057607a3a}{bet120} = -\/1.\+5019813020 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae8bffffe4717611a260fce9f7ca94f4b}\label{namespacemom__eos__nemo_ae8bffffe4717611a260fce9f7ca94f4b}} real, parameter \hyperlink{namespacemom__eos__nemo_ae8bffffe4717611a260fce9f7ca94f4b}{bet220} = 1.\+0872489522 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa0f0b6890f3308f1ec4cbbfa08ee6b00}\label{namespacemom__eos__nemo_aa0f0b6890f3308f1ec4cbbfa08ee6b00}} real, parameter \hyperlink{namespacemom__eos__nemo_aa0f0b6890f3308f1ec4cbbfa08ee6b00}{bet320} = -\/2.\+7233429080e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a20c07a37110282298ead0bb93c97bc8a}\label{namespacemom__eos__nemo_a20c07a37110282298ead0bb93c97bc8a}} real, parameter \hyperlink{namespacemom__eos__nemo_a20c07a37110282298ead0bb93c97bc8a}{bet030} = -\/4.\+1615152308e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a9b3df6e9e14a08a9d68d9e6b5877b529}\label{namespacemom__eos__nemo_a9b3df6e9e14a08a9d68d9e6b5877b529}} real, parameter \hyperlink{namespacemom__eos__nemo_a9b3df6e9e14a08a9d68d9e6b5877b529}{bet130} = 4.\+9061350869e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa1825ca4a38a41f23172c9b0f0e16bfd}\label{namespacemom__eos__nemo_aa1825ca4a38a41f23172c9b0f0e16bfd}} real, parameter \hyperlink{namespacemom__eos__nemo_aa1825ca4a38a41f23172c9b0f0e16bfd}{bet230} = -\/1.\+1847737788e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a95555b86b21fb2b061fa759edc2d0d28}\label{namespacemom__eos__nemo_a95555b86b21fb2b061fa759edc2d0d28}} real, parameter \hyperlink{namespacemom__eos__nemo_a95555b86b21fb2b061fa759edc2d0d28}{bet040} = 1.\+4073062708e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a6a2883b486e0f3fc6cbd4d3c228c608e}\label{namespacemom__eos__nemo_a6a2883b486e0f3fc6cbd4d3c228c608e}} real, parameter \hyperlink{namespacemom__eos__nemo_a6a2883b486e0f3fc6cbd4d3c228c608e}{bet140} = -\/1.\+3327978879e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_aa5c464b409b79812e04903f89ed270a7}\label{namespacemom__eos__nemo_aa5c464b409b79812e04903f89ed270a7}} real, parameter \hyperlink{namespacemom__eos__nemo_aa5c464b409b79812e04903f89ed270a7}{bet050} = 5.\+9929880134e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae66919c39133677392235eed3ccfd869}\label{namespacemom__eos__nemo_ae66919c39133677392235eed3ccfd869}} real, parameter \hyperlink{namespacemom__eos__nemo_ae66919c39133677392235eed3ccfd869}{bet001} = -\/5.\+2937873009e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a3ea18a40aae057d80a5a4d91a3b805e0}\label{namespacemom__eos__nemo_a3ea18a40aae057d80a5a4d91a3b805e0}} real, parameter \hyperlink{namespacemom__eos__nemo_a3ea18a40aae057d80a5a4d91a3b805e0}{bet101} = 1.\+2634116779 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_acd84770c85a9c63905c5420002f58297}\label{namespacemom__eos__nemo_acd84770c85a9c63905c5420002f58297}} real, parameter \hyperlink{namespacemom__eos__nemo_acd84770c85a9c63905c5420002f58297}{bet201} = -\/1.\+1547328025 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac6c2e5a123204a4b62099c50633c0d63}\label{namespacemom__eos__nemo_ac6c2e5a123204a4b62099c50633c0d63}} real, parameter \hyperlink{namespacemom__eos__nemo_ac6c2e5a123204a4b62099c50633c0d63}{bet301} = 3.\+2870876279e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_afb787361a2607616d91e34aebe87164c}\label{namespacemom__eos__nemo_afb787361a2607616d91e34aebe87164c}} real, parameter \hyperlink{namespacemom__eos__nemo_afb787361a2607616d91e34aebe87164c}{bet011} = -\/5.\+5824407214e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a200f44ab3b54222d228d6da484381cbc}\label{namespacemom__eos__nemo_a200f44ab3b54222d228d6da484381cbc}} real, parameter \hyperlink{namespacemom__eos__nemo_a200f44ab3b54222d228d6da484381cbc}{bet111} = 1.\+2451933313e-\/01 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a08ba2c1d325577e63e17999ab458f484}\label{namespacemom__eos__nemo_a08ba2c1d325577e63e17999ab458f484}} real, parameter \hyperlink{namespacemom__eos__nemo_a08ba2c1d325577e63e17999ab458f484}{bet211} = -\/2.\+4409539932e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a2281b6763db5075d6b27295d5a80d1b7}\label{namespacemom__eos__nemo_a2281b6763db5075d6b27295d5a80d1b7}} real, parameter \hyperlink{namespacemom__eos__nemo_a2281b6763db5075d6b27295d5a80d1b7}{bet021} = 4.\+3623149752e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a247d3afbd394a99dafe21847dd099de7}\label{namespacemom__eos__nemo_a247d3afbd394a99dafe21847dd099de7}} real, parameter \hyperlink{namespacemom__eos__nemo_a247d3afbd394a99dafe21847dd099de7}{bet121} = -\/4.\+6767901790e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a96337503ee029e986f953deec033d7f5}\label{namespacemom__eos__nemo_a96337503ee029e986f953deec033d7f5}} real, parameter \hyperlink{namespacemom__eos__nemo_a96337503ee029e986f953deec033d7f5}{bet031} = -\/6.\+8523260060e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ae4186fe3bf6b703a42700137121985fe}\label{namespacemom__eos__nemo_ae4186fe3bf6b703a42700137121985fe}} real, parameter \hyperlink{namespacemom__eos__nemo_ae4186fe3bf6b703a42700137121985fe}{bet002} = -\/6.\+1618945251e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a1b162de8057aa7361ea7dc58ae598295}\label{namespacemom__eos__nemo_a1b162de8057aa7361ea7dc58ae598295}} real, parameter \hyperlink{namespacemom__eos__nemo_a1b162de8057aa7361ea7dc58ae598295}{bet102} = 6.\+2255521644e-\/02 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_ac34ea06ea881561dbc852ee219106a06}\label{namespacemom__eos__nemo_ac34ea06ea881561dbc852ee219106a06}} real, parameter \hyperlink{namespacemom__eos__nemo_ac34ea06ea881561dbc852ee219106a06}{bet012} = -\/2.\+6514181169e-\/03 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\item \mbox{\Hypertarget{namespacemom__eos__nemo_a2b4e5893526672f8aa8db06d3134a9c9}\label{namespacemom__eos__nemo_a2b4e5893526672f8aa8db06d3134a9c9}} real, parameter \hyperlink{namespacemom__eos__nemo_a2b4e5893526672f8aa8db06d3134a9c9}{bet003} = -\/2.\+3025968587e-\/04 \begin{DoxyCompactList}\small\item\em Parameters in the N\+E\+MO equation of state. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Function/\+Subroutine Documentation} \mbox{\Hypertarget{namespacemom__eos__nemo_ab9441b5fdd50f09a5bac70012def0ea7}\label{namespacemom__eos__nemo_ab9441b5fdd50f09a5bac70012def0ea7}} \index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}!calculate\+\_\+compress\+\_\+nemo@{calculate\+\_\+compress\+\_\+nemo}} \index{calculate\+\_\+compress\+\_\+nemo@{calculate\+\_\+compress\+\_\+nemo}!mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsubsection{\texorpdfstring{calculate\+\_\+compress\+\_\+nemo()}{calculate\_compress\_nemo()}} {\footnotesize\ttfamily subroutine, public mom\+\_\+eos\+\_\+nemo\+::calculate\+\_\+compress\+\_\+nemo (\begin{DoxyParamCaption}\item[{real, dimension(\+:), intent(in)}]{T, }\item[{real, dimension(\+:), intent(in)}]{S, }\item[{real, dimension(\+:), intent(in)}]{pressure, }\item[{real, dimension(\+:), intent(out)}]{rho, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+dp, }\item[{integer, intent(in)}]{start, }\item[{integer, intent(in)}]{npts }\end{DoxyParamCaption})} Compute the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) and the compressibility (drho/dp = C\+\_\+sound$^\wedge$-\/2, stored as drho\+\_\+dp \mbox{[}s2 m-\/2\mbox{]}) from absolute salinity (sal in g/kg), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}, using the expressions derived for use with N\+E\+MO. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em t} & Conservative temperature \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em s} & Absolute salinity \mbox{[}g/kg\mbox{]}.\\ \hline \mbox{\tt in} & {\em pressure} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em rho} & In situ density \mbox{[}kg m-\/3\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+dp} & The partial derivative of density with pressure (also the inverse of the square of sound speed) \mbox{[}s2 m-\/2\mbox{]}.\\ \hline \mbox{\tt in} & {\em start} & The starting point in the arrays.\\ \hline \mbox{\tt in} & {\em npts} & The number of values to calculate. \\ \hline \end{DoxyParams} Definition at line 369 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+N\+E\+M\+O.\+F90. \begin{DoxyCode} 369 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: t\textcolor{comment}{ !< Conservative temperature [degC].} 370 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: s\textcolor{comment}{ !< Absolute salinity [g/kg].} 371 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 372 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: rho\textcolor{comment}{ !< In situ density [kg m-3].} 373 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: drho\_dp\textcolor{comment}{ !< The partial derivative of density with pressure} 374 \textcolor{comment}{ !! (also the inverse of the square of sound speed)} 375 \textcolor{comment}{ !! [s2 m-2].} 376 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< The starting point in the arrays.} 377 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< The number of values to calculate.} 378 379 \textcolor{comment}{! Local variables} 380 \textcolor{keywordtype}{real} :: zs,zt,zp 381 \textcolor{keywordtype}{integer} :: j 382 383 \textcolor{keyword}{call }calculate\_density\_array\_nemo(t, s, pressure, rho, start, npts) 384 \textcolor{comment}{!} 385 \textcolor{comment}{!NOTE: The following calculates the TEOS10 approximation to compressibility} 386 \textcolor{comment}{! since the corresponding NEMO approximation is not available yet.} 387 \textcolor{comment}{!} 388 \textcolor{keywordflow}{do} j=start,start+npts-1 389 \textcolor{comment}{!Conversions} 390 zs = s(j) \textcolor{comment}{!gsw\_sr\_from\_sp(S(j)) !Convert practical salinity to absolute salinity} 391 zt = t(j) \textcolor{comment}{!gsw\_ct\_from\_pt(S(j),T(j)) !Convert potantial temp to conservative temp} 392 zp = pressure(j)* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 393 \textcolor{keyword}{call }gsw\_rho\_first\_derivatives(zs,zt,zp, drho\_dp=drho\_dp(j)) 394 \textcolor{keywordflow}{ enddo} \end{DoxyCode} \mbox{\Hypertarget{namespacemom__eos__nemo_a262e1078592bdb306dc27207c0463648}\label{namespacemom__eos__nemo_a262e1078592bdb306dc27207c0463648}} \index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}!calculate\+\_\+density\+\_\+array\+\_\+nemo@{calculate\+\_\+density\+\_\+array\+\_\+nemo}} \index{calculate\+\_\+density\+\_\+array\+\_\+nemo@{calculate\+\_\+density\+\_\+array\+\_\+nemo}!mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+array\+\_\+nemo()}{calculate\_density\_array\_nemo()}} {\footnotesize\ttfamily subroutine, public mom\+\_\+eos\+\_\+nemo\+::calculate\+\_\+density\+\_\+array\+\_\+nemo (\begin{DoxyParamCaption}\item[{real, dimension(\+:), intent(in)}]{T, }\item[{real, dimension(\+:), intent(in)}]{S, }\item[{real, dimension(\+:), intent(in)}]{pressure, }\item[{real, dimension(\+:), intent(out)}]{rho, }\item[{integer, intent(in)}]{start, }\item[{integer, intent(in)}]{npts, }\item[{real, intent(in), optional}]{rho\+\_\+ref }\end{DoxyParamCaption})} This subroutine computes the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) from absolute salinity (S \mbox{[}g kg-\/1\mbox{]}), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}. It uses the expressions derived for use with N\+E\+MO. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em t} & Conservative temperature \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em s} & Absolute salinity \mbox{[}g kg-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em pressure} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em rho} & in situ density \mbox{[}kg m-\/3\mbox{]}.\\ \hline \mbox{\tt in} & {\em start} & the starting point in the arrays.\\ \hline \mbox{\tt in} & {\em npts} & the number of values to calculate.\\ \hline \mbox{\tt in} & {\em rho\+\_\+ref} & A reference density \mbox{[}kg m-\/3\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 206 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+N\+E\+M\+O.\+F90. \begin{DoxyCode} 206 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Conservative temperature [degC].} 207 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Absolute salinity [g kg-1].} 208 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 209 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: rho\textcolor{comment}{ !< in situ density [kg m-3].} 210 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< the starting point in the arrays.} 211 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< the number of values to calculate.} 212 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: rho\_ref\textcolor{comment}{ !< A reference density [kg m-3].} 213 214 \textcolor{comment}{! Local variables} 215 \textcolor{keywordtype}{real} :: zp, zt, zh, zs, zr0, zn, zn0, zn1, zn2, zn3, zs0 216 \textcolor{keywordtype}{integer} :: j 217 218 \textcolor{keywordflow}{do} j=start,start+npts-1 219 \textcolor{comment}{!Conversions} 220 zs = s(j) \textcolor{comment}{!gsw\_sr\_from\_sp(S(j)) !Convert practical salinity to absolute salinity} 221 zt = t(j) \textcolor{comment}{!gsw\_ct\_from\_pt(S(j),T(j)) !Convert potential temp to conservative temp} 222 zp = pressure(j)* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 223 224 \textcolor{comment}{!The following algorithm was provided by Roquet in a private communication.} 225 \textcolor{comment}{!It is not necessarily the algorithm used in NEMO ocean!} 226 zp = zp * r1\_p0 \textcolor{comment}{!pressure} 227 zt = zt * r1\_t0 \textcolor{comment}{!temperature} 228 zs = sqrt( abs( zs + rdeltas ) * r1\_s0 ) \textcolor{comment}{! square root salinity} 229 230 zn3 = eos013*zt & 231 & + eos103*zs+eos003 232 233 zn2 = (eos022*zt & 234 & + eos112*zs+eos012)*zt & 235 & + (eos202*zs+eos102)*zs+eos002 236 237 zn1 = (((eos041*zt & 238 & + eos131*zs+eos031)*zt & 239 & + (eos221*zs+eos121)*zs+eos021)*zt & 240 & + ((eos311*zs+eos211)*zs+eos111)*zs+eos011)*zt & 241 & + (((eos401*zs+eos301)*zs+eos201)*zs+eos101)*zs+eos001 242 243 zn0 = (((((eos060*zt & 244 & + eos150*zs+eos050)*zt & 245 & + (eos240*zs+eos140)*zs+eos040)*zt & 246 & + ((eos330*zs+eos230)*zs+eos130)*zs+eos030)*zt & 247 & + (((eos420*zs+eos320)*zs+eos220)*zs+eos120)*zs+eos020)*zt & 248 & + ((((eos510*zs+eos410)*zs+eos310)*zs+eos210)*zs+eos110)*zs+eos010)*zt 249 250 zs0 = (((((eos600*zs+eos500)*zs+eos400)*zs+eos300)*zs+eos200)*zs+eos100)*zs + eos000 251 252 zr0 = (((((r05 * zp+r04) * zp+r03 ) * zp+r02 ) * zp+r01) * zp+r00) * zp 253 254 \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(rho\_ref)) \textcolor{keywordflow}{then} 255 zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + (zn0 + (zs0 - rho\_ref)) 256 rho(j) = ( zn + zr0 ) \textcolor{comment}{! density} 257 \textcolor{keywordflow}{else} 258 zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + (zn0 + zs0) 259 rho(j) = ( zn + zr0 ) \textcolor{comment}{! density} 260 \textcolor{keywordflow}{ endif} 261 262 \textcolor{keywordflow}{ enddo} \end{DoxyCode} \mbox{\Hypertarget{namespacemom__eos__nemo_ac794e7251c8971a0795fc6add423a6d9}\label{namespacemom__eos__nemo_ac794e7251c8971a0795fc6add423a6d9}} \index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}!calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo@{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo}} \index{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo@{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo}!mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo()}{calculate\_density\_derivs\_array\_nemo()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+nemo\+::calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+nemo (\begin{DoxyParamCaption}\item[{real, dimension(\+:), intent(in)}]{T, }\item[{real, dimension(\+:), intent(in)}]{S, }\item[{real, dimension(\+:), intent(in)}]{pressure, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+dT, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+dS, }\item[{integer, intent(in)}]{start, }\item[{integer, intent(in)}]{npts }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the expressions derived for use with N\+E\+MO. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em t} & Conservative temperature \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em s} & Absolute salinity \mbox{[}g kg-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em pressure} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt} & The partial derivative of density with potential temperature \mbox{[}kg m-\/3 deg\+C-\/1\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds} & The partial derivative of density with salinity, in \mbox{[}kg m-\/3 ppt-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em start} & The starting point in the arrays.\\ \hline \mbox{\tt in} & {\em npts} & The number of values to calculate. \\ \hline \end{DoxyParams} Definition at line 268 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+N\+E\+M\+O.\+F90. \begin{DoxyCode} 268 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: t\textcolor{comment}{ !< Conservative temperature [degC].} 269 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: s\textcolor{comment}{ !< Absolute salinity [g kg-1].} 270 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 271 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: drho\_dt\textcolor{comment}{ !< The partial derivative of density with potential} 272 \textcolor{comment}{ !! temperature [kg m-3 degC-1].} 273 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: drho\_ds\textcolor{comment}{ !< The partial derivative of density with salinity,} 274 \textcolor{comment}{ !! in [kg m-3 ppt-1].} 275 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< The starting point in the arrays.} 276 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< The number of values to calculate.} 277 278 \textcolor{comment}{! Local variables} 279 \textcolor{keywordtype}{real} :: zp,zt , zh , zs , zr0, zn , zn0, zn1, zn2, zn3 280 \textcolor{keywordtype}{integer} :: j 281 282 \textcolor{keywordflow}{do} j=start,start+npts-1 283 \textcolor{comment}{!Conversions} 284 zs = s(j) \textcolor{comment}{!gsw\_sr\_from\_sp(S(j)) !Convert practical salinity to absolute salinity} 285 zt = t(j) \textcolor{comment}{!gsw\_ct\_from\_pt(S(j),T(j)) !Convert potantial temp to conservative temp} 286 zp = pressure(j)* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 287 288 \textcolor{comment}{!The following algorithm was provided by Roquet in a private communication.} 289 \textcolor{comment}{!It is not necessarily the algorithm used in NEMO ocean!} 290 zp = zp * r1\_p0 \textcolor{comment}{! pressure (first converted to decibar)} 291 zt = zt * r1\_t0 \textcolor{comment}{! temperature} 292 zs = sqrt( abs( zs + rdeltas ) * r1\_s0 ) \textcolor{comment}{! square root salinity} 293 \textcolor{comment}{!} 294 \textcolor{comment}{! alpha} 295 zn3 = alp003 296 \textcolor{comment}{!} 297 zn2 = alp012*zt + alp102*zs+alp002 298 \textcolor{comment}{!} 299 zn1 = ((alp031*zt & 300 & + alp121*zs+alp021)*zt & 301 & + (alp211*zs+alp111)*zs+alp011)*zt & 302 & + ((alp301*zs+alp201)*zs+alp101)*zs+alp001 303 \textcolor{comment}{!} 304 zn0 = ((((alp050*zt & 305 & + alp140*zs+alp040)*zt & 306 & + (alp230*zs+alp130)*zs+alp030)*zt & 307 & + ((alp320*zs+alp220)*zs+alp120)*zs+alp020)*zt & 308 & + (((alp410*zs+alp310)*zs+alp210)*zs+alp110)*zs+alp010)*zt & 309 & + ((((alp500*zs+alp400)*zs+alp300)*zs+alp200)*zs+alp100)*zs+alp000 310 \textcolor{comment}{!} 311 zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + zn0 312 \textcolor{comment}{!} 313 drho\_dt(j) = -zn 314 \textcolor{comment}{!} 315 \textcolor{comment}{! beta} 316 \textcolor{comment}{!} 317 zn3 = bet003 318 \textcolor{comment}{!} 319 zn2 = bet012*zt + bet102*zs+bet002 320 \textcolor{comment}{!} 321 zn1 = ((bet031*zt & 322 & + bet121*zs+bet021)*zt & 323 & + (bet211*zs+bet111)*zs+bet011)*zt & 324 & + ((bet301*zs+bet201)*zs+bet101)*zs+bet001 325 \textcolor{comment}{!} 326 zn0 = ((((bet050*zt & 327 & + bet140*zs+bet040)*zt & 328 & + (bet230*zs+bet130)*zs+bet030)*zt & 329 & + ((bet320*zs+bet220)*zs+bet120)*zs+bet020)*zt & 330 & + (((bet410*zs+bet310)*zs+bet210)*zs+bet110)*zs+bet010)*zt & 331 & + ((((bet500*zs+bet400)*zs+bet300)*zs+bet200)*zs+bet100)*zs+bet000 332 \textcolor{comment}{!} 333 zn = ( ( zn3 * zp + zn2 ) * zp + zn1 ) * zp + zn0 334 \textcolor{comment}{!} 335 drho\_ds(j) = zn / zs 336 \textcolor{keywordflow}{ enddo} 337 \end{DoxyCode} \mbox{\Hypertarget{namespacemom__eos__nemo_a07b8b3637c4d692b17a97c1e58dddbf7}\label{namespacemom__eos__nemo_a07b8b3637c4d692b17a97c1e58dddbf7}} \index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}!calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo@{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo}} \index{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo@{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo}!mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo()}{calculate\_density\_derivs\_scalar\_nemo()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+nemo\+::calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+nemo (\begin{DoxyParamCaption}\item[{real, intent(in)}]{T, }\item[{real, intent(in)}]{S, }\item[{real, intent(in)}]{pressure, }\item[{real, intent(out)}]{drho\+\_\+dt, }\item[{real, intent(out)}]{drho\+\_\+ds }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} Wrapper to calculate\+\_\+density\+\_\+derivs\+\_\+array for scalar inputs. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em t} & Potential temperature relative to the surface \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em s} & Salinity \mbox{[}g kg-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em pressure} & Pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt} & The partial derivative of density with potential temperature \mbox{[}kg m-\/3 deg\+C-\/1\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds} & The partial derivative of density with salinity, in \mbox{[}kg m-\/3 ppt-\/1\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 342 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+N\+E\+M\+O.\+F90. \begin{DoxyCode} 342 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Potential temperature relative to the surface [degC].} 343 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Salinity [g kg-1].} 344 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< Pressure [Pa].} 345 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\textcolor{comment}{ !< The partial derivative of density with potential} 346 \textcolor{comment}{ !! temperature [kg m-3 degC-1].} 347 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\textcolor{comment}{ !< The partial derivative of density with salinity,} 348 \textcolor{comment}{ !! in [kg m-3 ppt-1].} 349 \textcolor{comment}{! Local variables} 350 \textcolor{keywordtype}{real} :: al0, p0, lambda 351 \textcolor{keywordtype}{integer} :: j 352 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(1)} :: t0, s0, pressure0 353 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(1)} :: drdt0, drds0 354 355 t0(1) = t 356 s0(1) = s 357 pressure0(1) = pressure 358 359 \textcolor{keyword}{call }calculate\_density\_derivs\_array\_nemo(t0, s0, pressure0, drdt0, drds0, 1, 1) 360 drho\_dt = drdt0(1) 361 drho\_ds = drds0(1) \end{DoxyCode} \mbox{\Hypertarget{namespacemom__eos__nemo_a78c3bbb7960ee09a4c0aacb3d9eda912}\label{namespacemom__eos__nemo_a78c3bbb7960ee09a4c0aacb3d9eda912}} \index{mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}!calculate\+\_\+density\+\_\+scalar\+\_\+nemo@{calculate\+\_\+density\+\_\+scalar\+\_\+nemo}} \index{calculate\+\_\+density\+\_\+scalar\+\_\+nemo@{calculate\+\_\+density\+\_\+scalar\+\_\+nemo}!mom\+\_\+eos\+\_\+nemo@{mom\+\_\+eos\+\_\+nemo}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+scalar\+\_\+nemo()}{calculate\_density\_scalar\_nemo()}} {\footnotesize\ttfamily subroutine, public mom\+\_\+eos\+\_\+nemo\+::calculate\+\_\+density\+\_\+scalar\+\_\+nemo (\begin{DoxyParamCaption}\item[{real, intent(in)}]{T, }\item[{real, intent(in)}]{S, }\item[{real, intent(in)}]{pressure, }\item[{real, intent(out)}]{rho, }\item[{real, intent(in), optional}]{rho\+\_\+ref }\end{DoxyParamCaption})} This subroutine computes the in situ density of sea water (rho in \mbox{[}kg m-\/3\mbox{]}) from absolute salinity (S \mbox{[}g kg-\/1\mbox{]}), conservative temperature (T \mbox{[}degC\mbox{]}), and pressure \mbox{[}Pa\mbox{]}. It uses the expressions derived for use with N\+E\+MO. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em t} & Conservative temperature \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em s} & Absolute salinity \mbox{[}g kg-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em pressure} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em rho} & In situ density \mbox{[}kg m-\/3\mbox{]}.\\ \hline \mbox{\tt in} & {\em rho\+\_\+ref} & A reference density \mbox{[}kg m-\/3\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 181 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+N\+E\+M\+O.\+F90. \begin{DoxyCode} 181 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Conservative temperature [degC].} 182 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Absolute salinity [g kg-1].} 183 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 184 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: rho\textcolor{comment}{ !< In situ density [kg m-3].} 185 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: rho\_ref\textcolor{comment}{ !< A reference density [kg m-3].} 186 187 \textcolor{keywordtype}{real} :: al0, p0, lambda 188 \textcolor{keywordtype}{integer} :: j 189 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(1)} :: t0, s0, pressure0 190 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(1)} :: rho0 191 192 t0(1) = t 193 s0(1) = s 194 pressure0(1) = pressure 195 196 \textcolor{keyword}{call }calculate\_density\_array\_nemo(t0, s0, pressure0, rho0, 1, 1, rho\_ref) 197 rho = rho0(1) 198 \end{DoxyCode}