\hypertarget{namespaceocean__da__core__mod}{}\section{ocean\+\_\+da\+\_\+core\+\_\+mod Module Reference}
\label{namespaceocean__da__core__mod}\index{ocean\_da\_core\_mod@{ocean\_da\_core\_mod}}


\subsection{Detailed Description}
A set of dummy interfaces for compiling the M\+O\+M6 DA driver code. \subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \mbox{\hyperlink{namespaceocean__da__core__mod_a9cdd5b7a18defca49132ae74501772b9}{ocean\+\_\+da\+\_\+core\+\_\+init}} (Domain, global\+\_\+grid, Profiles, model\+\_\+time)
\begin{DoxyCompactList}\small\item\em Initializes the M\+O\+M6 DA driver code. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{namespaceocean__da__core__mod_a96c4af035fc05977e404e977d0e62f25}{get\+\_\+profiles}} (model\+\_\+time, Profiles, Current\+\_\+profiles)
\begin{DoxyCompactList}\small\item\em Get profiles obs within the current analysis interval. \end{DoxyCompactList}\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespaceocean__da__core__mod_a96c4af035fc05977e404e977d0e62f25}\label{namespaceocean__da__core__mod_a96c4af035fc05977e404e977d0e62f25}} 
\index{ocean\_da\_core\_mod@{ocean\_da\_core\_mod}!get\_profiles@{get\_profiles}}
\index{get\_profiles@{get\_profiles}!ocean\_da\_core\_mod@{ocean\_da\_core\_mod}}
\subsubsection{\texorpdfstring{get\_profiles()}{get\_profiles()}}
{\footnotesize\ttfamily subroutine, public ocean\+\_\+da\+\_\+core\+\_\+mod\+::get\+\_\+profiles (\begin{DoxyParamCaption}\item[{type(time\+\_\+type), intent(in)}]{model\+\_\+time,  }\item[{type(\mbox{\hyperlink{structocean__da__types__mod_1_1ocean__profile__type}{ocean\+\_\+profile\+\_\+type}}), pointer}]{Profiles,  }\item[{type(\mbox{\hyperlink{structocean__da__types__mod_1_1ocean__profile__type}{ocean\+\_\+profile\+\_\+type}}), pointer}]{Current\+\_\+profiles }\end{DoxyParamCaption})}



Get profiles obs within the current analysis interval. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em model\+\_\+time} & The current analysis time. \\
\hline
 & {\em profiles} & The full recursive list of profiles. \\
\hline
 & {\em current\+\_\+profiles} & A returned list of profiles for the current analysis step. \\
\hline
\end{DoxyParams}


Definition at line 35 of file ocean\+\_\+da\+\_\+core.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{35     \textcolor{keywordtype}{type}(time\_type), \textcolor{keywordtype}{intent(in)} :: model\_time\textcolor{comment}{ !< The current analysis time.}}
\DoxyCodeLine{36     \textcolor{keywordtype}{type}(ocean\_profile\_type), \textcolor{keywordtype}{pointer} :: Profiles\textcolor{comment}{ !< The full recursive list of profiles.}}
\DoxyCodeLine{37     \textcolor{keywordtype}{type}(ocean\_profile\_type), \textcolor{keywordtype}{pointer} :: Current\_profiles\textcolor{comment}{ !< A returned list of profiles for the}}
\DoxyCodeLine{38 \textcolor{comment}{                                                          !! current analysis step.}}
\DoxyCodeLine{39 }
\DoxyCodeLine{40     profiles=>null()}
\DoxyCodeLine{41     current\_profiles=>null()}
\DoxyCodeLine{42 }
\DoxyCodeLine{43     \textcolor{keywordflow}{return}}

\end{DoxyCode}
\mbox{\Hypertarget{namespaceocean__da__core__mod_a9cdd5b7a18defca49132ae74501772b9}\label{namespaceocean__da__core__mod_a9cdd5b7a18defca49132ae74501772b9}} 
\index{ocean\_da\_core\_mod@{ocean\_da\_core\_mod}!ocean\_da\_core\_init@{ocean\_da\_core\_init}}
\index{ocean\_da\_core\_init@{ocean\_da\_core\_init}!ocean\_da\_core\_mod@{ocean\_da\_core\_mod}}
\subsubsection{\texorpdfstring{ocean\_da\_core\_init()}{ocean\_da\_core\_init()}}
{\footnotesize\ttfamily subroutine, public ocean\+\_\+da\+\_\+core\+\_\+mod\+::ocean\+\_\+da\+\_\+core\+\_\+init (\begin{DoxyParamCaption}\item[{type(domain2d), intent(in), pointer}]{Domain,  }\item[{type(\mbox{\hyperlink{structocean__da__types__mod_1_1grid__type}{grid\+\_\+type}}), intent(in), pointer}]{global\+\_\+grid,  }\item[{type(\mbox{\hyperlink{structocean__da__types__mod_1_1ocean__profile__type}{ocean\+\_\+profile\+\_\+type}}), pointer}]{Profiles,  }\item[{type(time\+\_\+type), intent(in)}]{model\+\_\+time }\end{DoxyParamCaption})}



Initializes the M\+O\+M6 DA driver code. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em domain} & A M\+OM domain type \\
\hline
\mbox{\texttt{ in}}  & {\em global\+\_\+grid} & The global O\+DA horizontal grid type \\
\hline
 & {\em profiles} & This is an unstructured recursive list of profiles which are either within the localized domain corresponding to the Domain argument, or the global profile list (type). \\
\hline
\mbox{\texttt{ in}}  & {\em model\+\_\+time} & The current model time type. \\
\hline
\end{DoxyParams}


Definition at line 19 of file ocean\+\_\+da\+\_\+core.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{19     \textcolor{keywordtype}{type}(domain2D), \textcolor{keywordtype}{pointer}, \textcolor{keywordtype}{intent(in)} :: Domain\textcolor{comment}{ !< A MOM domain type}}
\DoxyCodeLine{20     \textcolor{keywordtype}{type}(grid\_type), \textcolor{keywordtype}{pointer}, \textcolor{keywordtype}{intent(in)} :: global\_grid\textcolor{comment}{ !< The global ODA horizontal grid type}}
\DoxyCodeLine{21     \textcolor{keywordtype}{type}(ocean\_profile\_type), \textcolor{keywordtype}{pointer} :: Profiles\textcolor{comment}{  !< This is an unstructured recursive list of profiles}}
\DoxyCodeLine{22 \textcolor{comment}{                                          !! which are either within the localized domain corresponding}}
\DoxyCodeLine{23 \textcolor{comment}{                                          !! to the Domain argument, or the global profile list (type).}}
\DoxyCodeLine{24     \textcolor{keywordtype}{type}(time\_type), \textcolor{keywordtype}{intent(in)} :: model\_time\textcolor{comment}{ !< The current model time type.}}
\DoxyCodeLine{25 }
\DoxyCodeLine{26 }
\DoxyCodeLine{27 }
\DoxyCodeLine{28     profiles=>null()}
\DoxyCodeLine{29     \textcolor{keywordflow}{return}}

\end{DoxyCode}