\hypertarget{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10}{}\section{mom\+\_\+eos\+\_\+teos10\+:\+:calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10 Interface Reference} \label{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10}\index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10}} \subsection{Detailed Description} For a given thermodynamic state, return the second derivatives of density with various combinations of conservative temperature, absolute salinity, and pressure, using the T\+E\+O\+S10 expressions. Definition at line 47 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__second__derivs__teos10_aa000cb77e5fa422e3d9cb7033c6fe4f4}{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10} (T, S, pressure, drho\+\_\+d\+S\+\_\+dS, drho\+\_\+d\+S\+\_\+dT, drho\+\_\+d\+T\+\_\+dT, drho\+\_\+d\+S\+\_\+dP, drho\+\_\+d\+T\+\_\+dP) \begin{DoxyCompactList}\small\item\em Calculate the 5 second derivatives of the equation of state for scalar inputs. \end{DoxyCompactList}\item subroutine \hyperlink{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10_ac2cb9136a203096cf2e1c32a177fcf51}{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10} (T, S, pressure, drho\+\_\+d\+S\+\_\+dS, drho\+\_\+d\+S\+\_\+dT, drho\+\_\+d\+T\+\_\+dT, drho\+\_\+d\+S\+\_\+dP, drho\+\_\+d\+T\+\_\+dP, start, npts) \begin{DoxyCompactList}\small\item\em Calculate the 5 second derivatives of the equation of state for scalar inputs. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Detailed Description} For a given thermodynamic state, return the second derivatives of density with various combinations of conservative temperature, absolute salinity, and pressure, using the T\+E\+O\+S10 expressions. Definition at line 47 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__second__derivs__teos10_ac2cb9136a203096cf2e1c32a177fcf51}\label{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10_ac2cb9136a203096cf2e1c32a177fcf51}} \index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10}!calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10@{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10}} \index{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10@{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10}!mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+array\+\_\+teos10()}{calculate\_density\_second\_derivs\_array\_teos10()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+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\+\_\+d\+S\+\_\+dS, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+d\+S\+\_\+dT, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+d\+T\+\_\+dT, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+d\+S\+\_\+dP, }\item[{real, dimension(\+:), intent(out)}]{drho\+\_\+d\+T\+\_\+dP, }\item[{integer, intent(in)}]{start, }\item[{integer, intent(in)}]{npts }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} Calculate the 5 second derivatives of the equation of state for scalar inputs. \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\+\_\+ds\+\_\+ds} & Partial derivative of beta with respect to S\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds\+\_\+dt} & Partial derivative of beta with resepct to T\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt\+\_\+dt} & Partial derivative of alpha with respect to T\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds\+\_\+dp} & Partial derivative of beta with respect to pressure\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt\+\_\+dp} & Partial derivative of alpha with respect to pressure\\ \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 277 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \begin{DoxyCode} 277 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Conservative temperature [degC]} 278 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Absolute Salinity [g kg-1]} 279 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 280 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_ds\textcolor{comment}{ !< Partial derivative of beta with respect to S} 281 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_dt\textcolor{comment}{ !< Partial derivative of beta with resepct to T} 282 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\_dt\textcolor{comment}{ !< Partial derivative of alpha with respect to T} 283 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_dp\textcolor{comment}{ !< Partial derivative of beta with respect to pressure} 284 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\_dp\textcolor{comment}{ !< Partial derivative of alpha with respect to pressure} 285 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< The starting point in the arrays.} 286 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< The number of values to calculate.} 287 288 \textcolor{comment}{! Local variables} 289 \textcolor{keywordtype}{real} :: zs, zt, zp 290 \textcolor{keywordtype}{integer} :: j 291 292 \textcolor{keywordflow}{do} j=start,start+npts-1 293 \textcolor{comment}{!Conversions} 294 zs = s(j) \textcolor{comment}{!gsw\_sr\_from\_sp(S) !Convert practical salinity to absolute salinity} 295 zt = t(j) \textcolor{comment}{!gsw\_ct\_from\_pt(S,T) !Convert potantial temp to conservative temp} 296 zp = pressure(j)* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 297 \textcolor{keywordflow}{if} (s(j) < -1.0e-10) \textcolor{keywordflow}{then} ; \textcolor{comment}{!Can we assume safely that this is a missing value?} 298 drho\_ds\_ds(j) = 0.0 ; drho\_ds\_dt(j) = 0.0 ; drho\_dt\_dt(j) = 0.0 299 drho\_ds\_dp(j) = 0.0 ; drho\_dt\_dp(j) = 0.0 300 \textcolor{keywordflow}{else} 301 \textcolor{keyword}{call }gsw\_rho\_second\_derivatives(zs, zt, zp, rho\_sa\_sa=drho\_ds\_ds(j), rho\_sa\_ct=drho\_ds\_dt(j), & 302 rho\_ct\_ct=drho\_dt\_dt(j), rho\_sa\_p=drho\_ds\_dp(j), rho\_ct\_p=drho\_dt\_dp( j)) 303 \textcolor{keywordflow}{ endif} 304 \textcolor{keywordflow}{ enddo} 305 \end{DoxyCode} \mbox{\Hypertarget{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10_aa000cb77e5fa422e3d9cb7033c6fe4f4}\label{interfacemom__eos__teos10_1_1calculate__density__second__derivs__teos10_aa000cb77e5fa422e3d9cb7033c6fe4f4}} \index{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10}!calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10@{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10}} \index{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10@{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10}!mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10@{mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10}} \subsubsection{\texorpdfstring{calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+scalar\+\_\+teos10()}{calculate\_density\_second\_derivs\_scalar\_teos10()}} {\footnotesize\ttfamily subroutine mom\+\_\+eos\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+derivs\+\_\+teos10\+::calculate\+\_\+density\+\_\+second\+\_\+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\+\_\+d\+S\+\_\+dS, }\item[{real, intent(out)}]{drho\+\_\+d\+S\+\_\+dT, }\item[{real, intent(out)}]{drho\+\_\+d\+T\+\_\+dT, }\item[{real, intent(out)}]{drho\+\_\+d\+S\+\_\+dP, }\item[{real, intent(out)}]{drho\+\_\+d\+T\+\_\+dP }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} Calculate the 5 second derivatives of the equation of state for scalar inputs. \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\+\_\+ds\+\_\+ds} & Partial derivative of beta with respect to S\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds\+\_\+dt} & Partial derivative of beta with resepct to T\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt\+\_\+dt} & Partial derivative of alpha with respect to T\\ \hline \mbox{\tt out} & {\em drho\+\_\+ds\+\_\+dp} & Partial derivative of beta with respect to pressure\\ \hline \mbox{\tt out} & {\em drho\+\_\+dt\+\_\+dp} & Partial derivative of alpha with respect to pressure \\ \hline \end{DoxyParams} Definition at line 252 of file M\+O\+M\+\_\+\+E\+O\+S\+\_\+\+T\+E\+O\+S10.\+F90. \begin{DoxyCode} 252 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: t\textcolor{comment}{ !< Conservative temperature [degC]} 253 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: s\textcolor{comment}{ !< Absolute Salinity [g kg-1]} 254 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: pressure\textcolor{comment}{ !< pressure [Pa].} 255 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_ds\textcolor{comment}{ !< Partial derivative of beta with respect to S} 256 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_dt\textcolor{comment}{ !< Partial derivative of beta with resepct to T} 257 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\_dt\textcolor{comment}{ !< Partial derivative of alpha with respect to T} 258 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_ds\_dp\textcolor{comment}{ !< Partial derivative of beta with respect to pressure} 259 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: drho\_dt\_dp\textcolor{comment}{ !< Partial derivative of alpha with respect to pressure} 260 261 \textcolor{comment}{! Local variables} 262 \textcolor{keywordtype}{real} :: zs, zt, zp 263 264 \textcolor{comment}{!Conversions} 265 zs = s \textcolor{comment}{!gsw\_sr\_from\_sp(S) !Convert practical salinity to absolute salinity} 266 zt = t \textcolor{comment}{!gsw\_ct\_from\_pt(S,T) !Convert potantial temp to conservative temp} 267 zp = pressure* pa2db \textcolor{comment}{!Convert pressure from Pascal to decibar} 268 \textcolor{keywordflow}{if} (s < -1.0e-10) \textcolor{keywordflow}{return} \textcolor{comment}{!Can we assume safely that this is a missing value?} 269 \textcolor{keyword}{call }gsw\_rho\_second\_derivatives(zs, zt, zp, rho\_sa\_sa=drho\_ds\_ds, rho\_sa\_ct=drho\_ds\_dt, & 270 rho\_ct\_ct=drho\_dt\_dt, rho\_sa\_p=drho\_ds\_dp, rho\_ct\_p=drho\_dt\_dp) 271 \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}