\hypertarget{namespaceatmos__ocean__fluxes__mod}{}\doxysection{atmos\+\_\+ocean\+\_\+fluxes\+\_\+mod Module Reference}
\label{namespaceatmos__ocean__fluxes__mod}\index{atmos\_ocean\_fluxes\_mod@{atmos\_ocean\_fluxes\_mod}}


\doxysubsection{Detailed Description}
A dummy version of \mbox{\hyperlink{namespaceatmos__ocean__fluxes__mod}{atmos\+\_\+ocean\+\_\+fluxes\+\_\+mod}} module for use when the vastly larger F\+MS package is not needed. \doxysubsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
integer function, public \mbox{\hyperlink{namespaceatmos__ocean__fluxes__mod_a1bd0443a803dd443bd7a4f24dae28e13}{aof\+\_\+set\+\_\+coupler\+\_\+flux}} (name, flux\+\_\+type, implementation, atm\+\_\+tr\+\_\+index, param, flag, mol\+\_\+wt, ice\+\_\+restart\+\_\+file, ocean\+\_\+restart\+\_\+file, units, caller, verbosity)
\begin{DoxyCompactList}\small\item\em This subroutine duplicates an interface used by the F\+MS coupler, but only returns a value of -\/1. None of the arguments are used for anything. \end{DoxyCompactList}\end{DoxyCompactItemize}


\doxysubsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespaceatmos__ocean__fluxes__mod_a1bd0443a803dd443bd7a4f24dae28e13}\label{namespaceatmos__ocean__fluxes__mod_a1bd0443a803dd443bd7a4f24dae28e13}} 
\index{atmos\_ocean\_fluxes\_mod@{atmos\_ocean\_fluxes\_mod}!aof\_set\_coupler\_flux@{aof\_set\_coupler\_flux}}
\index{aof\_set\_coupler\_flux@{aof\_set\_coupler\_flux}!atmos\_ocean\_fluxes\_mod@{atmos\_ocean\_fluxes\_mod}}
\doxysubsubsection{\texorpdfstring{aof\_set\_coupler\_flux()}{aof\_set\_coupler\_flux()}}
{\footnotesize\ttfamily integer function, public atmos\+\_\+ocean\+\_\+fluxes\+\_\+mod\+::aof\+\_\+set\+\_\+coupler\+\_\+flux (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{name,  }\item[{character(len=$\ast$), intent(in)}]{flux\+\_\+type,  }\item[{character(len=$\ast$), intent(in)}]{implementation,  }\item[{integer, intent(in), optional}]{atm\+\_\+tr\+\_\+index,  }\item[{real, dimension(\+:), intent(in), optional}]{param,  }\item[{logical, dimension(\+:), intent(in), optional}]{flag,  }\item[{real, intent(in), optional}]{mol\+\_\+wt,  }\item[{character(len=$\ast$), intent(in), optional}]{ice\+\_\+restart\+\_\+file,  }\item[{character(len=$\ast$), intent(in), optional}]{ocean\+\_\+restart\+\_\+file,  }\item[{character(len=$\ast$), intent(in), optional}]{units,  }\item[{character(len=$\ast$), intent(in), optional}]{caller,  }\item[{integer, intent(in), optional}]{verbosity }\end{DoxyParamCaption})}



This subroutine duplicates an interface used by the F\+MS coupler, but only returns a value of -\/1. None of the arguments are used for anything. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\texttt{ in}}  & {\em name} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em flux\+\_\+type} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em implementation} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em atm\+\_\+tr\+\_\+index} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em param} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em flag} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em mol\+\_\+wt} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em ice\+\_\+restart\+\_\+file} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em ocean\+\_\+restart\+\_\+file} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em units} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em caller} & An unused argument \\
\hline
\mbox{\texttt{ in}}  & {\em verbosity} & An unused argument \\
\hline
\end{DoxyParams}


Definition at line 18 of file atmos\+\_\+ocean\+\_\+fluxes.\+F90.


\begin{DoxyCode}{0}
\DoxyCodeLine{18 }
\DoxyCodeLine{19   \textcolor{keywordtype}{character(len=*)},                \textcolor{keywordtype}{intent(in)} :: name\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{20   \textcolor{keywordtype}{character(len=*)},                \textcolor{keywordtype}{intent(in)} :: flux\_type\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{21   \textcolor{keywordtype}{character(len=*)},                \textcolor{keywordtype}{intent(in)} :: implementation\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{22   \textcolor{keywordtype}{integer},               \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: atm\_tr\_index\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{23 \textcolor{keywordtype}{  real},    \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: param\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{24   \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{dimension(:)}, \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: flag\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{25 \textcolor{keywordtype}{  real},                  \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: mol\_wt\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{26   \textcolor{keywordtype}{character(len=*)},      \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: ice\_restart\_file\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{27   \textcolor{keywordtype}{character(len=*)},      \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: ocean\_restart\_file\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{28   \textcolor{keywordtype}{character(len=*)},      \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: units\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{29   \textcolor{keywordtype}{character(len=*)},      \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: caller\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{30   \textcolor{keywordtype}{integer},               \textcolor{keywordtype}{optional}, \textcolor{keywordtype}{intent(in)} :: verbosity\textcolor{comment}{ !< An unused argument}}
\DoxyCodeLine{31 }
\DoxyCodeLine{32   \textcolor{comment}{! None of these arguments are used for anything.}}
\DoxyCodeLine{33 }
\DoxyCodeLine{34   \textcolor{keywordtype}{integer} :: coupler\_index}
\DoxyCodeLine{35   coupler\_index = -\/1}
\DoxyCodeLine{36 }

\end{DoxyCode}