\hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put}{}\section{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+:\+:oasis\+\_\+put Interface Reference}
\label{interfacemod__oasis__getput__interface_1_1oasis__put}\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}


Generic overloaded interface for data put (send)  


\subsection*{Private Member Functions}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a5daa7fd6bfab2e09ba23d815d6120da1}{oasis\+\_\+put\+\_\+r14} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 4 byte real 1D data. \end{DoxyCompactList}\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a0d2dc5120c55ca753bc5e6a1a22c0890}{oasis\+\_\+put\+\_\+r24} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 4 byte real 2D data. \end{DoxyCompactList}\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a58fd29713950ff380f847bbb88cdca2b}{oasis\+\_\+put\+\_\+r34} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 4 byte real 2D bundled data. \end{DoxyCompactList}\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a1c434d693016ff43967eff96ee313dda}{oasis\+\_\+put\+\_\+r18} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 4 byte real 1D data. \end{DoxyCompactList}\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a9130f78702c3d05291301efd3eb812c6}{oasis\+\_\+put\+\_\+r28} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 8 byte real 2D data. \end{DoxyCompactList}\item 
subroutine \hyperlink{interfacemod__oasis__getput__interface_1_1oasis__put_a9040582c4598a3f4c6df1be95ee8913e}{oasis\+\_\+put\+\_\+r38} (var\+\_\+id, kstep, fld1, kinfo, fld2, fld3, fld4, fld5, write\+\_\+restart)
\begin{DoxyCompactList}\small\item\em Send 8 byte real 2D bundled data. \end{DoxyCompactList}\end{DoxyCompactItemize}


\subsection{Detailed Description}
Generic overloaded interface for data put (send) 

Definition at line 26 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.



\subsection{Member Function/\+Subroutine Documentation}
\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a5daa7fd6bfab2e09ba23d815d6120da1}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a5daa7fd6bfab2e09ba23d815d6120da1}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r14@{oasis\+\_\+put\+\_\+r14}}
\index{oasis\+\_\+put\+\_\+r14@{oasis\+\_\+put\+\_\+r14}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r14()}{oasis\_put\_r14()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r14 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 4 byte real 1D data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 58 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.

\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a1c434d693016ff43967eff96ee313dda}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a1c434d693016ff43967eff96ee313dda}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r18@{oasis\+\_\+put\+\_\+r18}}
\index{oasis\+\_\+put\+\_\+r18@{oasis\+\_\+put\+\_\+r18}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r18()}{oasis\_put\_r18()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r18 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 4 byte real 1D data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 124 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.

\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a0d2dc5120c55ca753bc5e6a1a22c0890}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a0d2dc5120c55ca753bc5e6a1a22c0890}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r24@{oasis\+\_\+put\+\_\+r24}}
\index{oasis\+\_\+put\+\_\+r24@{oasis\+\_\+put\+\_\+r24}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r24()}{oasis\_put\_r24()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r24 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 4 byte real 2D data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 190 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.

\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a9130f78702c3d05291301efd3eb812c6}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a9130f78702c3d05291301efd3eb812c6}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r28@{oasis\+\_\+put\+\_\+r28}}
\index{oasis\+\_\+put\+\_\+r28@{oasis\+\_\+put\+\_\+r28}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r28()}{oasis\_put\_r28()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r28 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 8 byte real 2D data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 420 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.

\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a58fd29713950ff380f847bbb88cdca2b}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a58fd29713950ff380f847bbb88cdca2b}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r34@{oasis\+\_\+put\+\_\+r34}}
\index{oasis\+\_\+put\+\_\+r34@{oasis\+\_\+put\+\_\+r34}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r34()}{oasis\_put\_r34()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r34 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:,\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+single\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 4 byte real 2D bundled data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 314 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.

\mbox{\Hypertarget{interfacemod__oasis__getput__interface_1_1oasis__put_a9040582c4598a3f4c6df1be95ee8913e}\label{interfacemod__oasis__getput__interface_1_1oasis__put_a9040582c4598a3f4c6df1be95ee8913e}} 
\index{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}!oasis\+\_\+put\+\_\+r38@{oasis\+\_\+put\+\_\+r38}}
\index{oasis\+\_\+put\+\_\+r38@{oasis\+\_\+put\+\_\+r38}!mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put@{mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put}}
\subsubsection{\texorpdfstring{oasis\+\_\+put\+\_\+r38()}{oasis\_put\_r38()}}
{\footnotesize\ttfamily subroutine mod\+\_\+oasis\+\_\+getput\+\_\+interface\+::oasis\+\_\+put\+::oasis\+\_\+put\+\_\+r38 (\begin{DoxyParamCaption}\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{var\+\_\+id,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(in)}]{kstep,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:,\+:)}]{fld1,  }\item[{integer(kind=ip\+\_\+i4\+\_\+p), intent(out)}]{kinfo,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld2,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld3,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld4,  }\item[{real(kind=ip\+\_\+double\+\_\+p), dimension(\+:,\+:,\+:), optional}]{fld5,  }\item[{logical, optional}]{write\+\_\+restart }\end{DoxyParamCaption})\hspace{0.3cm}{\ttfamily [private]}}



Send 8 byte real 2D bundled data. 


\begin{DoxyParams}[1]{Parameters}
\mbox{\tt in}  & {\em var\+\_\+id} & variable id\\
\hline
\mbox{\tt in}  & {\em kstep} & model time in seconds\\
\hline
 & {\em fld1} & field data\\
\hline
\mbox{\tt out}  & {\em kinfo} & return code\\
\hline
 & {\em fld2} & higher order field data\\
\hline
 & {\em fld3} & higher order field data\\
\hline
 & {\em fld4} & higher order field data\\
\hline
 & {\em fld5} & higher order field data\\
\hline
 & {\em write\+\_\+restart} & write restart now \\
\hline
\end{DoxyParams}


Definition at line 543 of file mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90.



The documentation for this interface was generated from the following file\+:\begin{DoxyCompactItemize}
\item 
/home/globc2/tcraig/oasis3-\/mct.\+trunk/lib/psmile/src/\hyperlink{mod__oasis__getput__interface_8_f90}{mod\+\_\+oasis\+\_\+getput\+\_\+interface.\+F90}\end{DoxyCompactItemize}
