\hypertarget{namespacewrite__ocean__obs__mod}{}\section{write\+\_\+ocean\+\_\+obs\+\_\+mod Module Reference}
\label{namespacewrite__ocean__obs__mod}\index{write\+\_\+ocean\+\_\+obs\+\_\+mod@{write\+\_\+ocean\+\_\+obs\+\_\+mod}}


\subsection{Detailed Description}
Dummy interfaces for writing O\+DA data. \subsection*{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}


\subsection{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}}
\subsubsection{\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{\tt in}  & {\em unit} & File unit \\
\hline
\end{DoxyParams}


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


\begin{DoxyCode}
39   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)} :: unit\textcolor{comment}{ !< File unit}
40 
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}}
\subsubsection{\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{\tt in}  & {\em name} & File name\\
\hline
\mbox{\tt in}  & {\em nvar} & Number of variables\\
\hline
\mbox{\tt in}  & {\em grid\+\_\+lon} & Longitude \mbox{[}degreeE\mbox{]}\\
\hline
\mbox{\tt in}  & {\em grid\+\_\+lat} & Latitude \mbox{[}degreeN\mbox{]}\\
\hline
\mbox{\tt in}  & {\em thread} & Thread number\\
\hline
\mbox{\tt in}  & {\em fset} & File set \\
\hline
\end{DoxyParams}


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


\begin{DoxyCode}
19   \textcolor{keywordtype}{character(len=*)}, \textcolor{keywordtype}{intent(in)} :: name\textcolor{comment}{ !< File name}
20   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}, \textcolor{keywordtype}{optional} :: nvar\textcolor{comment}{ !< Number of variables}
21   \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: grid\_lon\textcolor{comment}{ !< Longitude [degreeE]}
22   \textcolor{keywordtype}{real}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: grid\_lat\textcolor{comment}{ !< Latitude [degreeN]}
23   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: thread\textcolor{comment}{ !< Thread number}
24   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: fset\textcolor{comment}{ !< File set}
25 
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}}
\subsubsection{\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{\tt in}  & {\em unit} & File unit\\
\hline
\mbox{\tt in}  & {\em profile} & Profile to write \\
\hline
\end{DoxyParams}


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


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