\hypertarget{namespacegtdata__internal__vartable}{}\section{gtdata\+\_\+internal\+\_\+vartable Module Reference}
\label{namespacegtdata__internal__vartable}\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_ab247c7c0f247a93928a561ec13d9df43}{vartable\+\_\+dump} (vid)
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_a82fab475ec7a1438a92e5d27c13684d1}{vartableadd} (vid, class, cid)
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_a0fb95ab458f1dcd34f21b5c5574a63d2}{vartabledelete} (vid, action, err)
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_a1bddf47a2cacc8db25b6fa2c32ed68db}{vartablelookup} (vid, class, cid)
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_a751cac6e9c6372ddbed395624357806d}{vartablemore} (vid, err)
\item 
integer function, public \hyperlink{namespacegtdata__internal__vartable_ae622b02798006661945bef1406c25ea4}{ndims} (vid)
\item 
subroutine, public \hyperlink{namespacegtdata__internal__vartable_a6c3912fc042a447a1586ce60f43874dc}{query\+\_\+growable} (vid, result)
\end{DoxyCompactItemize}
\subsection*{Variables}
\begin{DoxyCompactItemize}
\item 
integer, parameter, public \hyperlink{namespacegtdata__internal__vartable_a5df57179700a2e502b214711f87168c4}{vid\+\_\+invalid} = -\/1
\item 
integer, parameter, public \hyperlink{namespacegtdata__internal__vartable_aec4f073e19f0eb04d55229f478c745c7}{vtb\+\_\+class\+\_\+unused} = 0
\item 
integer, parameter, public \hyperlink{namespacegtdata__internal__vartable_a8881078f064af94c15a18b94ea5af49b}{vtb\+\_\+class\+\_\+netcdf} = 1
\item 
integer, parameter, public \hyperlink{namespacegtdata__internal__vartable_a1f6bc8deac28b5ae7650b25285cdce95}{classes\+\_\+max} = 2
\item 
type(gd\+\_\+nc\+\_\+variable\+\_\+search), save, public \hyperlink{namespacegtdata__internal__vartable_aaa4c37aba75313a971d0996e831aeda3}{gdnc\+\_\+search}
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_ae622b02798006661945bef1406c25ea4}\label{namespacegtdata__internal__vartable_ae622b02798006661945bef1406c25ea4}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!ndims@{ndims}}
\index{ndims@{ndims}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{ndims()}{ndims()}}
{\footnotesize\ttfamily integer function, public gtdata\+\_\+internal\+\_\+vartable\+::ndims (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid }\end{DoxyParamCaption})}



Definition at line 202 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References dc\+\_\+error\+::storeerror(), vartablelookup(), and vtb\+\_\+class\+\_\+netcdf.


\begin{DoxyCode}
202     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__types}{gtdata\_netcdf\_types}\textcolor{keywordtype}{, only}: \hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}
203     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__generic}{gtdata\_netcdf\_generic}\textcolor{keywordtype}{, only}: gdncinquire => \hyperlink{interfacegtdata__netcdf__generic_1_1inquire}{inquire}
204     \textcolor{keywordtype}{use }\hyperlink{namespacedc__error}{dc\_error}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__error_a0104aee83ee5752b1a9f6152b11864a8}{storeerror}, nf90\_einval
205     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
206     \textcolor{keywordtype}{integer}:: \textcolor{keywordtype}{class}, cid
207     \textcolor{keyword}{call }vartablelookup(vid, \textcolor{keywordtype}{class}, cid)
208     \textcolor{keywordflow}{select case}(class)
209     \textcolor{keywordflow}{case}(vtb\_class\_netcdf)
210       \textcolor{keyword}{call }gdncinquire(\hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}(cid), ndims=result)
211 \textcolor{keywordflow}{    case default}
212       \textcolor{keyword}{call }\hyperlink{namespacedc__error_a0104aee83ee5752b1a9f6152b11864a8}{storeerror}(nf90\_einval, \textcolor{stringliteral}{'gtdata::ndims'})
213 \textcolor{keywordflow}{    end select}
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacegtdata__internal__vartable_ae622b02798006661945bef1406c25ea4_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a6c3912fc042a447a1586ce60f43874dc}\label{namespacegtdata__internal__vartable_a6c3912fc042a447a1586ce60f43874dc}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!query\+\_\+growable@{query\+\_\+growable}}
\index{query\+\_\+growable@{query\+\_\+growable}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{query\+\_\+growable()}{query\_growable()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::query\+\_\+growable (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid,  }\item[{logical, intent(out)}]{result }\end{DoxyParamCaption})}



Definition at line 217 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References dc\+\_\+error\+::storeerror(), vartablelookup(), and vtb\+\_\+class\+\_\+netcdf.


\begin{DoxyCode}
217     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__types}{gtdata\_netcdf\_types}\textcolor{keywordtype}{, only}: \hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}
218     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__generic}{gtdata\_netcdf\_generic}\textcolor{keywordtype}{, only}: \hyperlink{interfacegtdata__netcdf__generic_1_1inquire}{inquire}
219     \textcolor{keywordtype}{use }\hyperlink{namespacedc__error}{dc\_error}\textcolor{keywordtype}{, only}: \hyperlink{namespacedc__error_a0104aee83ee5752b1a9f6152b11864a8}{storeerror}, nf90\_einval
220     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
221     \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{intent(out)}:: result
222     \textcolor{keywordtype}{integer}:: \textcolor{keywordtype}{class}, cid
223     \textcolor{keyword}{call }vartablelookup(vid, \textcolor{keywordtype}{class}, cid)
224     \textcolor{keywordflow}{select case}(class)
225     \textcolor{keywordflow}{case}(vtb\_class\_netcdf)
226       \textcolor{keyword}{call }\hyperlink{interfacegtdata__netcdf__generic_1_1inquire}{inquire}(\hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}(cid), growable=result)
227 \textcolor{keywordflow}{    case default}
228       \textcolor{keyword}{call }\hyperlink{namespacedc__error_a0104aee83ee5752b1a9f6152b11864a8}{storeerror}(nf90\_einval, \textcolor{stringliteral}{'gtdata::ndims'})
229 \textcolor{keywordflow}{    end select}
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacegtdata__internal__vartable_a6c3912fc042a447a1586ce60f43874dc_cgraph}
\end{center}
\end{figure}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_ab247c7c0f247a93928a561ec13d9df43}\label{namespacegtdata__internal__vartable_ab247c7c0f247a93928a561ec13d9df43}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vartable\+\_\+dump@{vartable\+\_\+dump}}
\index{vartable\+\_\+dump@{vartable\+\_\+dump}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vartable\+\_\+dump()}{vartable\_dump()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::vartable\+\_\+dump (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid }\end{DoxyParamCaption})}



Definition at line 63 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References vtb\+\_\+class\+\_\+netcdf, and vtb\+\_\+class\+\_\+unused.


\begin{DoxyCode}
63     \textcolor{keywordtype}{use }dc\_trace\textcolor{keywordtype}{, only}: dbgmessage
64     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__generic}{gtdata\_netcdf\_generic}\textcolor{keywordtype}{, only}: \hyperlink{interfacegtdata__netcdf__generic_1_1tostring}{tostring}
65     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__types}{gtdata\_netcdf\_types}\textcolor{keywordtype}{, only}: \hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}
66     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
67     \textcolor{keywordtype}{character(10)}:: class
68     \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{allocated}(table)) \textcolor{keywordflow}{return}
69     \textcolor{keywordflow}{if} (vid <= 0 .or. vid > \textcolor{keyword}{size}(table)) \textcolor{keywordflow}{return}
70     \textcolor{keywordflow}{select case}(table(vid)%class)
71     \textcolor{keywordflow}{case}(vtb\_class\_netcdf)
72       \textcolor{keywordtype}{class} = \textcolor{stringliteral}{'netcdf'}
73 \textcolor{keywordflow}{    case default}
74       \textcolor{keyword}{write}(\textcolor{keywordtype}{class}, fmt=\textcolor{stringliteral}{"(i10)"}) table(vid)%class
75 \textcolor{keywordflow}{    end select}
76     \textcolor{keyword}{call }dbgmessage(\textcolor{stringliteral}{'[vartable %d: class=%c cid=%d ref=%d]'}, &
77       & i=(/vid, table(vid)%cid, table(vid)%refcount/), &
78       & c1=trim(class))
79     \textcolor{keywordflow}{select case}(table(vid)%class)
80     \textcolor{keywordflow}{case}(vtb\_class\_netcdf)
81       \textcolor{keyword}{call }dbgmessage(\textcolor{stringliteral}{'[%c]'}, c1=trim(\hyperlink{interfacegtdata__netcdf__generic_1_1tostring}{tostring}(\hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}(table(vid)%cid))))
82 \textcolor{keywordflow}{    end select}
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a82fab475ec7a1438a92e5d27c13684d1}\label{namespacegtdata__internal__vartable_a82fab475ec7a1438a92e5d27c13684d1}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vartableadd@{vartableadd}}
\index{vartableadd@{vartableadd}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vartableadd()}{vartableadd()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::vartableadd (\begin{DoxyParamCaption}\item[{integer, intent(out)}]{vid,  }\item[{integer, intent(in)}]{class,  }\item[{integer, intent(in)}]{cid }\end{DoxyParamCaption})}



Definition at line 93 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References vid\+\_\+invalid, and vtb\+\_\+class\+\_\+unused.


\begin{DoxyCode}
93     \textcolor{keywordtype}{use }dc\_trace\textcolor{keywordtype}{, only}: dbgmessage
94     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(out)}:: vid
95     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: \textcolor{keywordtype}{class}, cid
96     \textcolor{keywordtype}{type}(var\_table\_entry), \textcolor{keywordtype}{allocatable}:: tmp\_table(:)
97     \textcolor{keywordtype}{integer}:: n
98   \textcolor{keywordflow}{continue}
99     \textcolor{comment}{! 必要ならば初期幅確保}
100     \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{allocated}(table)) \textcolor{keywordflow}{then}
101       \textcolor{keyword}{allocate}(table(table\_ini\_size))
102       \textcolor{keyword}{call }entry\_cleanup(table(:))
103 \textcolor{keywordflow}{    endif}
104     \textcolor{comment}{! 該当があれば参照数増加}
105     \textcolor{keywordflow}{do}, n = 1, \textcolor{keyword}{size}(table)
106       \textcolor{keywordflow}{if} (table(n)%class == \textcolor{keywordtype}{class} .and. table(n)%cid == cid) \textcolor{keywordflow}{then}
107         table(n)%refcount = table(n)%refcount + 1
108         \textcolor{keyword}{call }dbgmessage(\textcolor{stringliteral}{'gtdata\_vartable.add(class=%d cid=%d) found (ref=%d)'}, &
109           & i=(/table(n)%class, table(n)%cid, table(n)%refcount/))
110         vid = n
111         \textcolor{keywordflow}{return}
112 \textcolor{keywordflow}{      endif}
113 \textcolor{keywordflow}{    enddo}
114     \textcolor{comment}{! もし空きが無ければ表を拡張}
115     \textcolor{keywordflow}{if} (all(table(:)%class /= vtb\_class\_unused)) \textcolor{keywordflow}{then}
116       n = \textcolor{keyword}{size}(table)
117       \textcolor{keyword}{allocate}(tmp\_table(n))
118       tmp\_table(:) = table(:)
119       \textcolor{keyword}{deallocate}(table)
120       \textcolor{keyword}{allocate}(table(n * 2))
121       table(1:n) = tmp\_table(1:n)
122       \textcolor{keyword}{deallocate}(tmp\_table)
123       table(n+1:n*2) = var\_table\_entry(vtb\_class\_unused, -1, 0)
124 \textcolor{keywordflow}{    endif}
125     \textcolor{keywordflow}{do}, n = 1, \textcolor{keyword}{size}(table)
126       \textcolor{keywordflow}{if} (table(n)%class == vtb\_class\_unused) \textcolor{keywordflow}{then}
127         table(n)%class = class
128         table(n)%cid = cid
129         table(n)%refcount = 1
130         vid = n
131         \textcolor{keywordflow}{return}
132 \textcolor{keywordflow}{      endif}
133 \textcolor{keywordflow}{    enddo}
134     vid = vid\_invalid
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a0fb95ab458f1dcd34f21b5c5574a63d2}\label{namespacegtdata__internal__vartable_a0fb95ab458f1dcd34f21b5c5574a63d2}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vartabledelete@{vartabledelete}}
\index{vartabledelete@{vartabledelete}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vartabledelete()}{vartabledelete()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::vartabledelete (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid,  }\item[{logical, intent(out)}]{action,  }\item[{logical, intent(out), optional}]{err }\end{DoxyParamCaption})}



Definition at line 138 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References classes\+\_\+max, and vtb\+\_\+class\+\_\+unused.


\begin{DoxyCode}
138     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
139     \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{intent(out)}:: action
140     \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{optional}:: err
141     \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{allocated}(table)) \textcolor{keywordflow}{goto} 999
142     \textcolor{keywordflow}{if} (vid <= 0 .or. vid > \textcolor{keyword}{size}(table)) \textcolor{keywordflow}{goto} 999
143     \textcolor{keywordflow}{if} (table(vid)%class <= vtb\_class\_unused) \textcolor{keywordflow}{goto} 999
144     \textcolor{keywordflow}{if} (table(vid)%class > classes\_max) \textcolor{keywordflow}{goto} 999
145     table(vid)%refcount = \hyperlink{interfacedc__date__generic_1_1max}{max}(table(vid)%refcount - 1, 0)
146     action = (table(vid)%refcount == 0)
147     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(err)) err = .false.
148     \textcolor{keywordflow}{return}
149 999 \textcolor{keywordflow}{continue}
150     action = .false.
151     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(err)) err = .true.
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a1bddf47a2cacc8db25b6fa2c32ed68db}\label{namespacegtdata__internal__vartable_a1bddf47a2cacc8db25b6fa2c32ed68db}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vartablelookup@{vartablelookup}}
\index{vartablelookup@{vartablelookup}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vartablelookup()}{vartablelookup()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::vartablelookup (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid,  }\item[{integer, intent(out), optional}]{class,  }\item[{integer, intent(out), optional}]{cid }\end{DoxyParamCaption})}



Definition at line 155 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References classes\+\_\+max, and vtb\+\_\+class\+\_\+unused.


\begin{DoxyCode}
155     \textcolor{comment}{! 同じファイル番号の変数表の中身を返す}
156     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
157     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{optional}:: \textcolor{keywordtype}{class}, cid
158     \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{allocated}(table)) \textcolor{keywordflow}{goto} 999
159     \textcolor{keywordflow}{if} (vid <= 0 .or. vid > \textcolor{keyword}{size}(table)) \textcolor{keywordflow}{goto} 999
160     \textcolor{keywordflow}{if} (table(vid)%class <= vtb\_class\_unused) \textcolor{keywordflow}{goto} 999
161     \textcolor{keywordflow}{if} (table(vid)%class > classes\_max) \textcolor{keywordflow}{goto} 999
162     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(class)) \textcolor{keywordtype}{class} = table(vid)%class
163     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(cid)) cid = table(vid)%cid
164     \textcolor{keywordflow}{return}
165 999 \textcolor{keywordflow}{continue}
166     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(class)) \textcolor{keywordtype}{class} = vtb\_class\_unused
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a751cac6e9c6372ddbed395624357806d}\label{namespacegtdata__internal__vartable_a751cac6e9c6372ddbed395624357806d}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vartablemore@{vartablemore}}
\index{vartablemore@{vartablemore}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vartablemore()}{vartablemore()}}
{\footnotesize\ttfamily subroutine, public gtdata\+\_\+internal\+\_\+vartable\+::vartablemore (\begin{DoxyParamCaption}\item[{integer, intent(in)}]{vid,  }\item[{logical, intent(out), optional}]{err }\end{DoxyParamCaption})}



Definition at line 170 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.



References classes\+\_\+max, dc\+\_\+error\+::gt\+\_\+efake, dc\+\_\+error\+::storeerror(), vartablelookup(), vtb\+\_\+class\+\_\+netcdf, and vtb\+\_\+class\+\_\+unused.


\begin{DoxyCode}
170     \textcolor{comment}{! 同じファイル番号の参照カウントを増加する。}
171     \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(in)}:: vid
172     \textcolor{keywordtype}{logical}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{optional}:: err
173     \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{allocated}(table)) \textcolor{keywordflow}{goto} 999
174     \textcolor{keywordflow}{if} (vid <= 0 .or. vid > \textcolor{keyword}{size}(table)) \textcolor{keywordflow}{goto} 999
175     \textcolor{keywordflow}{if} (table(vid)%class <= vtb\_class\_unused) \textcolor{keywordflow}{goto} 999
176     \textcolor{keywordflow}{if} (table(vid)%class > classes\_max) \textcolor{keywordflow}{goto} 999
177     table(vid)%refcount = table(vid)%refcount + 1
178     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(err)) err = .false.
179     \textcolor{keywordflow}{return}
180 999 \textcolor{keywordflow}{continue}
181     \textcolor{keywordflow}{if} (\textcolor{keyword}{present}(err)) err = .true.
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{namespacegtdata__internal__vartable_a751cac6e9c6372ddbed395624357806d_cgraph}
\end{center}
\end{figure}


\subsection{Variable Documentation}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a1f6bc8deac28b5ae7650b25285cdce95}\label{namespacegtdata__internal__vartable_a1f6bc8deac28b5ae7650b25285cdce95}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!classes\+\_\+max@{classes\+\_\+max}}
\index{classes\+\_\+max@{classes\+\_\+max}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{classes\+\_\+max}{classes\_max}}
{\footnotesize\ttfamily integer, parameter, public gtdata\+\_\+internal\+\_\+vartable\+::classes\+\_\+max = 2}



Definition at line 37 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.


\begin{DoxyCode}
37   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{parameter}, \textcolor{keywordtype}{public} :: classes\_max = 2
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_aaa4c37aba75313a971d0996e831aeda3}\label{namespacegtdata__internal__vartable_aaa4c37aba75313a971d0996e831aeda3}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!gdnc\+\_\+search@{gdnc\+\_\+search}}
\index{gdnc\+\_\+search@{gdnc\+\_\+search}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{gdnc\+\_\+search}{gdnc\_search}}
{\footnotesize\ttfamily type(gd\+\_\+nc\+\_\+variable\+\_\+search), save, public gtdata\+\_\+internal\+\_\+vartable\+::gdnc\+\_\+search}



Definition at line 48 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.


\begin{DoxyCode}
48   \textcolor{keywordtype}{type}(\hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable__search}{gd\_nc\_variable\_search}), \textcolor{keywordtype}{public}, \textcolor{keywordtype}{save}:: gdnc\_search
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a5df57179700a2e502b214711f87168c4}\label{namespacegtdata__internal__vartable_a5df57179700a2e502b214711f87168c4}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vid\+\_\+invalid@{vid\+\_\+invalid}}
\index{vid\+\_\+invalid@{vid\+\_\+invalid}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vid\+\_\+invalid}{vid\_invalid}}
{\footnotesize\ttfamily integer, parameter, public gtdata\+\_\+internal\+\_\+vartable\+::vid\+\_\+invalid = -\/1}



Definition at line 33 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.


\begin{DoxyCode}
33   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{parameter}, \textcolor{keywordtype}{public} :: vid\_invalid = -1
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_a8881078f064af94c15a18b94ea5af49b}\label{namespacegtdata__internal__vartable_a8881078f064af94c15a18b94ea5af49b}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vtb\+\_\+class\+\_\+netcdf@{vtb\+\_\+class\+\_\+netcdf}}
\index{vtb\+\_\+class\+\_\+netcdf@{vtb\+\_\+class\+\_\+netcdf}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vtb\+\_\+class\+\_\+netcdf}{vtb\_class\_netcdf}}
{\footnotesize\ttfamily integer, parameter, public gtdata\+\_\+internal\+\_\+vartable\+::vtb\+\_\+class\+\_\+netcdf = 1}



Definition at line 36 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.


\begin{DoxyCode}
36   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{parameter}, \textcolor{keywordtype}{public} :: vtb\_class\_netcdf = 1
\end{DoxyCode}
\mbox{\Hypertarget{namespacegtdata__internal__vartable_aec4f073e19f0eb04d55229f478c745c7}\label{namespacegtdata__internal__vartable_aec4f073e19f0eb04d55229f478c745c7}} 
\index{gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}!vtb\+\_\+class\+\_\+unused@{vtb\+\_\+class\+\_\+unused}}
\index{vtb\+\_\+class\+\_\+unused@{vtb\+\_\+class\+\_\+unused}!gtdata\+\_\+internal\+\_\+vartable@{gtdata\+\_\+internal\+\_\+vartable}}
\subsubsection{\texorpdfstring{vtb\+\_\+class\+\_\+unused}{vtb\_class\_unused}}
{\footnotesize\ttfamily integer, parameter, public gtdata\+\_\+internal\+\_\+vartable\+::vtb\+\_\+class\+\_\+unused = 0}



Definition at line 35 of file gtdata\+\_\+internal\+\_\+vartable.\+f90.


\begin{DoxyCode}
35   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{parameter}, \textcolor{keywordtype}{public} :: vtb\_class\_unused = 0
\end{DoxyCode}
