\hypertarget{gdncfiledatamode_8f90}{}\section{gtdata/gtdata\+\_\+netcdf/gtdata\+\_\+netcdf\+\_\+file/gdncfiledatamode.f90 File Reference}
\label{gdncfiledatamode_8f90}\index{gtdata/gtdata\+\_\+netcdf/gtdata\+\_\+netcdf\+\_\+file/gdncfiledatamode.\+f90@{gtdata/gtdata\+\_\+netcdf/gtdata\+\_\+netcdf\+\_\+file/gdncfiledatamode.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
integer function \hyperlink{gdncfiledatamode_8f90_a62939a5bbb992ef5dd1093b1f854cfce}{gdncfiledatamode} (fileid)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{gdncfiledatamode_8f90_a62939a5bbb992ef5dd1093b1f854cfce}\label{gdncfiledatamode_8f90_a62939a5bbb992ef5dd1093b1f854cfce}} 
\index{gdncfiledatamode.\+f90@{gdncfiledatamode.\+f90}!gdncfiledatamode@{gdncfiledatamode}}
\index{gdncfiledatamode@{gdncfiledatamode}!gdncfiledatamode.\+f90@{gdncfiledatamode.\+f90}}
\subsubsection{\texorpdfstring{gdncfiledatamode()}{gdncfiledatamode()}}
{\footnotesize\ttfamily integer function gdncfiledatamode (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{fileid }\end{DoxyParamCaption})}



Definition at line 2 of file gdncfiledatamode.\+f90.


\begin{DoxyCode}
2   \textcolor{keywordtype}{use }netcdf\textcolor{keywordtype}{, only}: nf90\_enddef, nf90\_enotindefine, nf90\_noerr
3   \textcolor{keywordtype}{use }dc\_trace\textcolor{keywordtype}{, only}: dbgmessage
4   \textcolor{keywordtype}{implicit none}
5   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: fileid
6   \textcolor{keywordtype}{character(*)}, \textcolor{keywordtype}{parameter}:: subname = \textcolor{stringliteral}{"GDNcFileDataMode"}
7 \textcolor{keywordflow}{continue}
8   \textcolor{keyword}{call }dbgmessage(subname)
9   result = nf90\_enddef(fileid)
10   \textcolor{keywordflow}{if} (result == nf90\_enotindefine) result = nf90\_noerr
\end{DoxyCode}
