<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">\hypertarget{gtvarsync_8f90}{}\section{gtdata/gtvarsync.f90 File Reference}
\label{gtvarsync_8f90}\index{gtdata/gtvarsync.\+f90@{gtdata/gtvarsync.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{gtvarsync_8f90_a588ca6cb76c00f2024a19b46e97e8d3a}{gtvarsync} (var, stat)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{gtvarsync_8f90_a588ca6cb76c00f2024a19b46e97e8d3a}\label{gtvarsync_8f90_a588ca6cb76c00f2024a19b46e97e8d3a}} 
\index{gtvarsync.\+f90@{gtvarsync.\+f90}!gtvarsync@{gtvarsync}}
\index{gtvarsync@{gtvarsync}!gtvarsync.\+f90@{gtvarsync.\+f90}}
\subsubsection{\texorpdfstring{gtvarsync()}{gtvarsync()}}
{\footnotesize\ttfamily subroutine gtvarsync (\begin{DoxyParamCaption}\item[{type(gt\+\_\+variable), intent(inout), optional}]{var,  }\item[{integer, intent(out), optional}]{stat }\end{DoxyParamCaption})}



Definition at line 15 of file gtvarsync.\+f90.



References gdncvarsync(), and gtdata\+\_\+internal\+\_\+map\+::var\+\_\+class().


\begin{DoxyCode}
15   \textcolor{comment}{!}
16   \textcolor{comment}{!== 繝輔ぃ繧､繝ｫ蜈･蜃ｺ蜉帙�蜷梧悄}
17   \textcolor{comment}{!}
18   \textcolor{comment}{! 螟画焚 *var* 縺ｫ髢｢縺吶ｋ繝｡繝｢繝ｪ蜀��繝舌ャ繝輔ぃ縺ｨ netCDF 繝輔ぃ繧､繝ｫ縺ｮ繝�ぅ繧ｹ繧ｯ荳翫�}
19   \textcolor{comment}{! 繧ｳ繝斐�縺ｨ繧貞酔譛溘＠縺ｾ縺吶�*var* 縺御ｸ弱∴繧峨ｌ縺ｪ縺��ｴ蜷医√�繝ｭ繧ｰ繝ｩ繝�蜀�〒}
20   \textcolor{comment}{! 縺薙ｌ縺ｾ縺ｧ縺ｫ蜈･蜃ｺ蜉帙＠縺溷�縺ｦ縺ｮ繝輔ぃ繧､繝ｫ縺ｫ髢｢縺励※蜷梧悄縺後♀縺薙↑繧上ｌ縺ｾ縺吶�}
21   \textcolor{comment}{!}
22   \textcolor{comment}{! *stat* 縺ｫ縺ｯ繧ｹ繝��繧ｿ繧ｹ縺瑚ｿ斐ｊ縺ｾ縺吶�}
23   \textcolor{comment}{!}
24   \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__types}{gtdata\_types}\textcolor{keywordtype}{, only}: gt\_variable
25   \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__internal__map}{gtdata\_internal\_map}\textcolor{keywordtype}{, only}: \hyperlink{namespacegtdata__internal__map_a86b920031832bea17e70a6bf4623c3d9}{var\_class}, vtb\_class\_netcdf
26   \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__generic}{gtdata\_netcdf\_generic}\textcolor{keywordtype}{, only}: \hyperlink{gdncvarsync_8f90_a3f6f7876e7a25f7178c4e3e9926fa6f9}{gdncvarsync}
27   \textcolor{keywordtype}{use }\hyperlink{namespacegtdata__netcdf__types}{gtdata\_netcdf\_types}\textcolor{keywordtype}{, only}: \hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}
28   \textcolor{keywordtype}{type}(gt\_variable), \textcolor{keywordtype}{intent(inout)}, \textcolor{keywordtype}{optional}:: var
29   \textcolor{keywordtype}{integer}, \textcolor{keywordtype}{intent(out)}, \textcolor{keywordtype}{optional}:: stat
30   \textcolor{keywordtype}{integer}:: \textcolor{keywordtype}{class}, cid
31   \textcolor{keywordflow}{if} (.not. \textcolor{keyword}{present}(var)) \textcolor{keywordflow}{then}
32     \textcolor{keyword}{call }\hyperlink{gdncvarsync_8f90_a3f6f7876e7a25f7178c4e3e9926fa6f9}{gdncvarsync}(stat=stat)
33   \textcolor{keywordflow}{else}
34     \textcolor{keyword}{call }\hyperlink{namespacegtdata__internal__map_a86b920031832bea17e70a6bf4623c3d9}{var\_class}(var, \textcolor{keywordtype}{class}, cid)
35     \textcolor{keywordflow}{select case} (class)
36     \textcolor{keywordflow}{case}(vtb\_class\_netcdf)
37       \textcolor{keyword}{call }\hyperlink{gdncvarsync_8f90_a3f6f7876e7a25f7178c4e3e9926fa6f9}{gdncvarsync}(\hyperlink{structgtdata__netcdf__types_1_1gd__nc__variable}{gd\_nc\_variable}(cid), stat=stat)
38 \textcolor{keywordflow}{    end select}
39 \textcolor{keywordflow}{  endif}
\end{DoxyCode}
Here is the call graph for this function\+:
\nopagebreak
\begin{figure}[H]
\begin{center}
\leavevmode
\includegraphics[width=350pt]{gtvarsync_8f90_a588ca6cb76c00f2024a19b46e97e8d3a_cgraph}
\end{center}
\end{figure}
</pre></body></html>