\hypertarget{interfacemom__tfreeze_1_1calculate__tfreeze__linear}{}\section{mom\+\_\+tfreeze\+:\+:calculate\+\_\+tfreeze\+\_\+linear Interface Reference} \label{interfacemom__tfreeze_1_1calculate__tfreeze__linear}\index{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear@{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear}} \subsection{Detailed Description} Compute the freezing point potential temperature \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]} and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. Definition at line 18 of file M\+O\+M\+\_\+\+T\+Freeze.\+F90. \subsection*{Private functions} \begin{DoxyCompactItemize} \item subroutine \mbox{\hyperlink{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a18e78235e6105b57513ed941bf054273}{calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar}} (S, pres, T\+\_\+\+Fr, T\+Fr\+\_\+\+S0\+\_\+\+P0, d\+T\+Fr\+\_\+dS, d\+T\+Fr\+\_\+dp) \begin{DoxyCompactList}\small\item\em This subroutine computes the freezing point potential temperature \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]}, and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. \end{DoxyCompactList}\item subroutine \mbox{\hyperlink{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a5dd726d92e2e168f8d9ede34f5898258}{calculate\+\_\+tfreeze\+\_\+linear\+\_\+array}} (S, pres, T\+\_\+\+Fr, start, npts, T\+Fr\+\_\+\+S0\+\_\+\+P0, d\+T\+Fr\+\_\+dS, d\+T\+Fr\+\_\+dp) \begin{DoxyCompactList}\small\item\em This subroutine computes an array of freezing point potential temperatures \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]}, and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. \end{DoxyCompactList}\end{DoxyCompactItemize} \subsection{Detailed Description} Compute the freezing point potential temperature \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]} and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. Definition at line 18 of file M\+O\+M\+\_\+\+T\+Freeze.\+F90. \subsection{Functions and subroutines} \mbox{\Hypertarget{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a5dd726d92e2e168f8d9ede34f5898258}\label{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a5dd726d92e2e168f8d9ede34f5898258}} \index{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear@{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear}!calculate\+\_\+tfreeze\+\_\+linear\+\_\+array@{calculate\+\_\+tfreeze\+\_\+linear\+\_\+array}} \index{calculate\+\_\+tfreeze\+\_\+linear\+\_\+array@{calculate\+\_\+tfreeze\+\_\+linear\+\_\+array}!mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear@{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear}} \subsubsection{\texorpdfstring{calculate\+\_\+tfreeze\+\_\+linear\+\_\+array()}{calculate\_tfreeze\_linear\_array()}} {\footnotesize\ttfamily subroutine mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear\+::calculate\+\_\+tfreeze\+\_\+linear\+\_\+array (\begin{DoxyParamCaption}\item[{real, dimension(\+:), intent(in)}]{S, }\item[{real, dimension(\+:), intent(in)}]{pres, }\item[{real, dimension(\+:), intent(out)}]{T\+\_\+\+Fr, }\item[{integer, intent(in)}]{start, }\item[{integer, intent(in)}]{npts, }\item[{real, intent(in)}]{T\+Fr\+\_\+\+S0\+\_\+\+P0, }\item[{real, intent(in)}]{d\+T\+Fr\+\_\+dS, }\item[{real, intent(in)}]{d\+T\+Fr\+\_\+dp }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} This subroutine computes an array of freezing point potential temperatures \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]}, and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em s} & salinity \mbox{[}ppt\mbox{]}.\\ \hline \mbox{\tt in} & {\em pres} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em t\+\_\+fr} & Freezing point potential temperature \mbox{[}degC\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 tfr\+\_\+s0\+\_\+p0} & The freezing point at S=0, p=0, \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em dtfr\+\_\+ds} & The derivative of freezing point with salinity, \mbox{[}degC P\+S\+U-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em dtfr\+\_\+dp} & The derivative of freezing point with pressure, \mbox{[}degC Pa-\/1\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 62 of file M\+O\+M\+\_\+\+T\+Freeze.\+F90. \begin{DoxyCode} 62 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: S\textcolor{comment}{ !< salinity [ppt].} 63 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(in)} :: pres\textcolor{comment}{ !< pressure [Pa].} 64 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{intent(out)} :: T\_Fr\textcolor{comment}{ !< Freezing point potential temperature [degC].} 65 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: start\textcolor{comment}{ !< the starting point in the arrays.} 66 \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: npts\textcolor{comment}{ !< the number of values to calculate.} 67 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: TFr\_S0\_P0\textcolor{comment}{ !< The freezing point at S=0, p=0, [degC].} 68 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: dTFr\_dS\textcolor{comment}{ !< The derivative of freezing point with salinity,} 69 \textcolor{comment}{ !! [degC PSU-1].} 70 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: dTFr\_dp\textcolor{comment}{ !< The derivative of freezing point with pressure,} 71 \textcolor{comment}{ !! [degC Pa-1].} 72 \textcolor{keywordtype}{integer} :: j 73 74 \textcolor{keywordflow}{do} j=start,start+npts-1 75 t\_fr(j) = (tfr\_s0\_p0 + dtfr\_ds*s(j)) + dtfr\_dp*pres(j) 76 \textcolor{keywordflow}{ enddo} 77 \end{DoxyCode} \mbox{\Hypertarget{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a18e78235e6105b57513ed941bf054273}\label{interfacemom__tfreeze_1_1calculate__tfreeze__linear_a18e78235e6105b57513ed941bf054273}} \index{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear@{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear}!calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar@{calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar}} \index{calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar@{calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar}!mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear@{mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear}} \subsubsection{\texorpdfstring{calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar()}{calculate\_tfreeze\_linear\_scalar()}} {\footnotesize\ttfamily subroutine mom\+\_\+tfreeze\+::calculate\+\_\+tfreeze\+\_\+linear\+::calculate\+\_\+tfreeze\+\_\+linear\+\_\+scalar (\begin{DoxyParamCaption}\item[{real, intent(in)}]{S, }\item[{real, intent(in)}]{pres, }\item[{real, intent(out)}]{T\+\_\+\+Fr, }\item[{real, intent(in)}]{T\+Fr\+\_\+\+S0\+\_\+\+P0, }\item[{real, intent(in)}]{d\+T\+Fr\+\_\+dS, }\item[{real, intent(in)}]{d\+T\+Fr\+\_\+dp }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}} This subroutine computes the freezing point potential temperature \mbox{[}degC\mbox{]} from salinity \mbox{[}ppt\mbox{]}, and pressure \mbox{[}Pa\mbox{]} using a simple linear expression, with coefficients passed in as arguments. \begin{DoxyParams}[1]{Parameters} \mbox{\tt in} & {\em s} & salinity \mbox{[}ppt\mbox{]}.\\ \hline \mbox{\tt in} & {\em pres} & pressure \mbox{[}Pa\mbox{]}.\\ \hline \mbox{\tt out} & {\em t\+\_\+fr} & Freezing point potential temperature \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em tfr\+\_\+s0\+\_\+p0} & The freezing point at S=0, p=0 \mbox{[}degC\mbox{]}.\\ \hline \mbox{\tt in} & {\em dtfr\+\_\+ds} & The derivative of freezing point with salinity, \mbox{[}degC ppt-\/1\mbox{]}.\\ \hline \mbox{\tt in} & {\em dtfr\+\_\+dp} & The derivative of freezing point with pressure, \mbox{[}degC Pa-\/1\mbox{]}. \\ \hline \end{DoxyParams} Definition at line 44 of file M\+O\+M\+\_\+\+T\+Freeze.\+F90. \begin{DoxyCode} 44 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: S\textcolor{comment}{ !< salinity [ppt].} 45 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: pres\textcolor{comment}{ !< pressure [Pa].} 46 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(out)} :: T\_Fr\textcolor{comment}{ !< Freezing point potential temperature [degC].} 47 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: TFr\_S0\_P0\textcolor{comment}{ !< The freezing point at S=0, p=0 [degC].} 48 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: dTFr\_dS\textcolor{comment}{ !< The derivative of freezing point with salinity,} 49 \textcolor{comment}{ !! [degC ppt-1].} 50 \textcolor{keywordtype}{real}, \textcolor{keywordtype}{intent(in)} :: dTFr\_dp\textcolor{comment}{ !< The derivative of freezing point with pressure,} 51 \textcolor{comment}{ !! [degC Pa-1].} 52 53 t\_fr = (tfr\_s0\_p0 + dtfr\_ds*s) + dtfr\_dp*pres 54 \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\+\_\+\+T\+Freeze.\+F90\end{DoxyCompactItemize}