\hypertarget{namespacewrite__ocean__obs__mod}{}\doxysection{write\+\_\+ocean\+\_\+obs\+\_\+mod Module Reference}
\label{namespacewrite__ocean__obs__mod}\index{write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}}


\doxysubsection{Detailed Description}
Dummy interfaces for writing O\+DA data. \doxysubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
integer function, public \mbox{\hyperlink{namespacewrite__ocean__obs__mod_abf452e43c96428721d8627b7952dabba}{open\+\_\+profile\+\_\+file}} (name, nvar, grid\+\_\+lon, grid\+\_\+lat, thread, fset)
\begin{DoxyCompactList}\small\item\em Open a profile file. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{namespacewrite__ocean__obs__mod_a1809b83c95b4f83e8a41cb1d907f306e}{write\+\_\+profile}} (unit, profile)
\begin{DoxyCompactList}\small\item\em Write a profile. \end{DoxyCompactList}\item 
subroutine, public \mbox{\hyperlink{namespacewrite__ocean__obs__mod_a909df31f85917475ff5defada87ed502}{close\+\_\+profile\+\_\+file}} (unit)
\begin{DoxyCompactList}\small\item\em Close a profile file. \end{DoxyCompactList}\item 
\mbox{\Hypertarget{namespacewrite__ocean__obs__mod_aeb18bf23c2c83c6e3c06a45b9e961cf9}\label{namespacewrite__ocean__obs__mod_aeb18bf23c2c83c6e3c06a45b9e961cf9}} 
subroutine, public \mbox{\hyperlink{namespacewrite__ocean__obs__mod_aeb18bf23c2c83c6e3c06a45b9e961cf9}{write\+\_\+ocean\+\_\+obs\+\_\+init}} ()
\begin{DoxyCompactList}\small\item\em Initialize write\+\_\+ocean\+\_\+obs module. \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacewrite__ocean__obs__mod_a909df31f85917475ff5defada87ed502}\label{namespacewrite__ocean__obs__mod_a909df31f85917475ff5defada87ed502}} 
\index{write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}!close\_profile\_file@{close\_profile\_file}}
\index{close\_profile\_file@{close\_profile\_file}!write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}}
\doxysubsubsection{\texorpdfstring{close\_profile\_file()}{close\_profile\_file()}}
{\footnotesize\ttfamily subroutine, public write\+\_\+ocean\+\_\+obs\+\_\+mod\+::close\+\_\+profile\+\_\+file (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{unit }\end{DoxyParamCaption})}



Close a profile file. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em unit} & File unit \\
\hline
\end{DoxyParams}


Definition at line 38 of file write\+\_\+ocean\+\_\+obs.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{39   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: unit\textcolor{comment}{ !< File unit}}
\DoxyCodeLine{40 }
\DoxyCodeLine{41   \textcolor{keywordflow}{return}}

\end{DoxyCode}
\mbox{\Hypertarget{namespacewrite__ocean__obs__mod_abf452e43c96428721d8627b7952dabba}\label{namespacewrite__ocean__obs__mod_abf452e43c96428721d8627b7952dabba}} 
\index{write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}!open\_profile\_file@{open\_profile\_file}}
\index{open\_profile\_file@{open\_profile\_file}!write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}}
\doxysubsubsection{\texorpdfstring{open\_profile\_file()}{open\_profile\_file()}}
{\footnotesize\ttfamily integer function, public write\+\_\+ocean\+\_\+obs\+\_\+mod\+::open\+\_\+profile\+\_\+file (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{name,  }\item[{integer, intent(in), optional}]{nvar,  }\item[{real, dimension(\+:), intent(in), optional}]{grid\+\_\+lon,  }\item[{real, dimension(\+:), intent(in), optional}]{grid\+\_\+lat,  }\item[{integer, intent(in), optional}]{thread,  }\item[{integer, intent(in), optional}]{fset }\end{DoxyParamCaption})}



Open a profile file. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em name} & File name \\
\hline
\mbox{\texttt{ in}}  & {\em nvar} & Number of variables \\
\hline
\mbox{\texttt{ in}}  & {\em grid\+\_\+lon} & Longitude \mbox{[}degreeE\mbox{]} \\
\hline
\mbox{\texttt{ in}}  & {\em grid\+\_\+lat} & Latitude \mbox{[}degreeN\mbox{]} \\
\hline
\mbox{\texttt{ in}}  & {\em thread} & Thread number \\
\hline
\mbox{\texttt{ in}}  & {\em fset} & File set \\
\hline
\end{DoxyParams}


Definition at line 18 of file write\+\_\+ocean\+\_\+obs.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{19   \textcolor{keywordtype}{character(len=*)}, \textcolor{keywordtype}{intent(in)} :: name\textcolor{comment}{ !< File name}}
\DoxyCodeLine{20   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{optional} :: nvar\textcolor{comment}{ !< Number of variables}}
\DoxyCodeLine{21 \textcolor{keywordtype}{  real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: grid\_lon\textcolor{comment}{ !< Longitude [degreeE]}}
\DoxyCodeLine{22 \textcolor{keywordtype}{  real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: grid\_lat\textcolor{comment}{ !< Latitude [degreeN]}}
\DoxyCodeLine{23   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: thread\textcolor{comment}{ !< Thread number}}
\DoxyCodeLine{24   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: fset\textcolor{comment}{ !< File set}}
\DoxyCodeLine{25 }
\DoxyCodeLine{26   open\_profile\_file=-\/1}

\end{DoxyCode}
\mbox{\Hypertarget{namespacewrite__ocean__obs__mod_a1809b83c95b4f83e8a41cb1d907f306e}\label{namespacewrite__ocean__obs__mod_a1809b83c95b4f83e8a41cb1d907f306e}} 
\index{write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}!write\_profile@{write\_profile}}
\index{write\_profile@{write\_profile}!write\_ocean\_obs\_mod@{write\_ocean\_obs\_mod}}
\doxysubsubsection{\texorpdfstring{write\_profile()}{write\_profile()}}
{\footnotesize\ttfamily subroutine, public write\+\_\+ocean\+\_\+obs\+\_\+mod\+::write\+\_\+profile (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{unit,  }\item[{type(\mbox{\hyperlink{structocean__da__types__mod_1_1ocean__profile__type}{ocean\+\_\+profile\+\_\+type}}), intent(in)}]{profile }\end{DoxyParamCaption})}



Write a profile. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em unit} & File unit \\
\hline
\mbox{\texttt{ in}}  & {\em profile} & Profile to write \\
\hline
\end{DoxyParams}


Definition at line 30 of file write\+\_\+ocean\+\_\+obs.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{31   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: unit\textcolor{comment}{ !< File unit}}
\DoxyCodeLine{32   \textcolor{keywordtype}{type}(ocean\_profile\_type), \textcolor{keywordtype}{intent(in)} :: profile\textcolor{comment}{ !< Profile to write}}
\DoxyCodeLine{33 }
\DoxyCodeLine{34   \textcolor{keywordflow}{return}}

\end{DoxyCode}