\hypertarget{gtvargetxtype_8f90}{}\section{gtdata/gtvargetxtype.f90 File Reference}
\label{gtvargetxtype_8f90}\index{gtdata/gtvargetxtype.\+f90@{gtdata/gtvargetxtype.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{gtvargetxtype_8f90_aeb4ea875735069845f24b5a3445de77a}{gtvargetxtype} (var, xtype)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{gtvargetxtype_8f90_aeb4ea875735069845f24b5a3445de77a}\label{gtvargetxtype_8f90_aeb4ea875735069845f24b5a3445de77a}} 
\index{gtvargetxtype.\+f90@{gtvargetxtype.\+f90}!gtvargetxtype@{gtvargetxtype}}
\index{gtvargetxtype@{gtvargetxtype}!gtvargetxtype.\+f90@{gtvargetxtype.\+f90}}
\subsubsection{\texorpdfstring{gtvargetxtype()}{gtvargetxtype()}}
{\footnotesize\ttfamily subroutine gtvargetxtype (\begin{DoxyParamCaption}\item[{type(gt\+\_\+variable), intent(in)}]{var,  }\item[{type(vstring), intent(out)}]{xtype }\end{DoxyParamCaption})}



Definition at line 7 of file gtvargetxtype.\+f90.


\begin{DoxyCode}
7     \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__types}{gtdata\_types}\textcolor{keywordtype}{, only}: gt\_variable
8     \textcolor{keywordtype}{use }dc\_string\textcolor{keywordtype}{, only}: vstring
9     \textcolor{keywordtype}{use }gtdata\_generic\textcolor{keywordtype}{, only}: \hyperlink{interfacegtdata__netcdf__generic_1_1get__attr}{get\_attr}
10     \textcolor{keywordtype}{implicit none}
11     \textcolor{keywordtype}{type}(gt\_variable), \textcolor{keywordtype}{intent(in)}:: var
12     \textcolor{keywordtype}{type}(vstring), \textcolor{keywordtype}{intent(out)}:: xtype
13     \textcolor{keyword}{call }\hyperlink{interfacegtdata__netcdf__generic_1_1get__attr}{get\_attr}(var, \textcolor{stringliteral}{"\_\_xtype\_\_"}, xtype, default=\textcolor{stringliteral}{""})
\end{DoxyCode}
