\hypertarget{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10}{}\section{mom\+\_\+eos\+\_\+teos10\+:\+:calculate\+\_\+density\+\_\+derivs\+\_\+teos10 Interface Reference} \label{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10}\index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10}} \subsection{Detailed Description} For a given thermodynamic state, return the derivatives of density with conservative temperature and absolute salinity, using the T\+E\+O\+S10 expressions. Definition at line 41 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \subsection*{Private functions} \begin{DoxyCompactItemize} \item subroutine \hyperlink{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a7c29dc36bba6771e54b996ba169285ce}{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10} (T, S, pressure, drho\+\_\+dT, drho\+\_\+dS) \begin{DoxyCompactList}\small\item\em For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the T\+E\+O\+S10 expressions. \end{DoxyCompactList}\item subroutine \hyperlink{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a8dfe96aab9ef95fcf4db07408b20b42f}{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10} (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 T\+E\+O\+S10 expressions. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Detailed Description} For a given thermodynamic state, return the derivatives of density with conservative temperature and absolute salinity, using the T\+E\+O\+S10 expressions. Definition at line 41 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \subsection{Functions and subroutines} \mbox{\Hypertarget{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a8dfe96aab9ef95fcf4db07408b20b42f}\label{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a8dfe96aab9ef95fcf4db07408b20b42f}} \index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10}!calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10@{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10}} \index{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10@{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10}!mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10()}{calculate\_density\_derivs\_array\_teos10()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+array\+\_\+teos10 (\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 T\+E\+O\+S10 expressions. \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 conservative temperature \mbox{[}kg m-\/3 deg\+C-\/1\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds} & The partial derivative of density with absolute salinity, \mbox{[}kg m-\/3 (g/kg)-\/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 169 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \begin{DoxyCode} 169 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: t\textcolor{comment}{ !< Conservative temperature [degC].} 170 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: s\textcolor{comment}{ !< Absolute salinity [g kg-1].} 171 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{dimension(:)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 172 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: drho\_dt\textcolor{comment}{ !< The partial derivative of density with conservative} 173 \textcolor{comment}{ !! temperature [kg m-3 degC-1].} 174 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{dimension(:)} :: drho\_ds\textcolor{comment}{ !< The partial derivative of density with absolute salinity,} 175 \textcolor{comment}{ !! [kg m-3 (g/kg)-1].} 176 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< The starting point in the arrays.} 177 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< The number of values to calculate.} 178 179 \textcolor{comment}{! Local variables} 180 \textcolor{keywordtype}{real} :: zs, zt, zp 181 \textcolor{keywordtype}{integer} :: j 182 183 \textcolor{keywordflow}{do} j=start,start+npts-1 184 \textcolor{comment}{!Conversions} 185 zs = s(j) \textcolor{comment}{!gsw\_sr\_from\_sp(S(j)) !Convert practical salinity to absolute salinity} 186 zt = t(j) \textcolor{comment}{!gsw\_ct\_from\_pt(S(j),T(j)) !Convert potantial temp to conservative temp} 187 zp = pressure(j)* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 188 \textcolor{keywordflow}{if} (s(j) < -1.0e-10) \textcolor{keywordflow}{then} ; \textcolor{comment}{!Can we assume safely that this is a missing value?} 189 drho\_dt(j) = 0.0 ; drho\_ds(j) = 0.0 190 \textcolor{keywordflow}{else} 191 \textcolor{keyword}{call }gsw\_rho\_first\_derivatives(zs, zt, zp, drho\_dsa=drho\_ds(j), drho\_dct=drho\_dt(j)) 192 \textcolor{keywordflow}{ endif} 193 \textcolor{keywordflow}{ enddo} 194 \end{DoxyCode} \mbox{\Hypertarget{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a7c29dc36bba6771e54b996ba169285ce}\label{interfacemom__eos__teos10_1_1calculate__density__derivs__teos10_a7c29dc36bba6771e54b996ba169285ce}} \index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10}!calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10@{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10}} \index{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10@{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10}!mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10()}{calculate\_density\_derivs\_scalar\_teos10()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+teos10\+::calculate\+\_\+density\+\_\+derivs\+\_\+scalar\+\_\+teos10 (\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]}} For a given thermodynamic state, calculate the derivatives of density with conservative temperature and absolute salinity, using the T\+E\+O\+S10 expressions. \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 conservative temperature \mbox{[}kg m-\/3 deg\+C-\/1\mbox{]}.\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds} & The partial derivative of density with absolute salinity, \mbox{[}kg m-\/3 (g/kg)-\/1\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 200 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \begin{DoxyCode} 200 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Conservative temperature [degC]} 201 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Absolute Salinity [g kg-1]} 202 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 203 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\textcolor{comment}{ !< The partial derivative of density with conservative} 204 \textcolor{comment}{ !! temperature [kg m-3 degC-1].} 205 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\textcolor{comment}{ !< The partial derivative of density with absolute salinity,} 206 \textcolor{comment}{ !! [kg m-3 (g/kg)-1].} 207 208 \textcolor{comment}{! Local variables} 209 \textcolor{keywordtype}{real} :: zs, zt, zp 210 \textcolor{comment}{!Conversions} 211 zs = s \textcolor{comment}{!gsw\_sr\_from\_sp(S) !Convert practical salinity to absolute salinity} 212 zt = t \textcolor{comment}{!gsw\_ct\_from\_pt(S,T) !Convert potantial temp to conservative temp} 213 zp = pressure* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 214 \textcolor{keywordflow}{if} (s < -1.0e-10) \textcolor{keywordflow}{return} \textcolor{comment}{!Can we assume safely that this is a missing value?} 215 \textcolor{keyword}{call }gsw\_rho\_first\_derivatives(zs, zt, zp, drho\_dsa=drho\_ds, drho\_dct=drho\_dt) \end{DoxyCode} The documentation for this interface was generated from the following file\+:\begin{DoxyCompactItemize} \item /home/cermak/src/\+M\+O\+M6.\+devrob/src/equation\+\_\+of\+\_\+state/M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90\end{DoxyCompactItemize}