\hypertarget{hsaatd_8f90}{}\section{gtool/gtool\+\_\+history/hsaatd.f90 File Reference}
\label{hsaatd_8f90}\index{gtool/gtool\+\_\+history/hsaatd.\+f90@{gtool/gtool\+\_\+history/hsaatd.\+f90}}
\subsection*{Functions/\+Subroutines}
\begin{DoxyCompactItemize}
\item 
subroutine \hyperlink{hsaatd_8f90_a34202e14cf7baaecf742bc403330dc19}{hsaatd} (vname, atname, value, i)
\end{DoxyCompactItemize}


\subsection{Function/\+Subroutine Documentation}
\mbox{\Hypertarget{hsaatd_8f90_a34202e14cf7baaecf742bc403330dc19}\label{hsaatd_8f90_a34202e14cf7baaecf742bc403330dc19}} 
\index{hsaatd.\+f90@{hsaatd.\+f90}!hsaatd@{hsaatd}}
\index{hsaatd@{hsaatd}!hsaatd.\+f90@{hsaatd.\+f90}}
\subsubsection{\texorpdfstring{hsaatd()}{hsaatd()}}
{\footnotesize\ttfamily subroutine hsaatd (\begin{DoxyParamCaption}\item[{character(len=$\ast$), intent(in)}]{vname,  }\item[{character(len=$\ast$), intent(in)}]{atname,  }\item[{double precision, dimension(i), intent(in)}]{value,  }\item[{integer}]{i }\end{DoxyParamCaption})}



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


\begin{DoxyCode}
15   \textcolor{comment}{!}
16   \textcolor{comment}{!== 機能}
17   \textcolor{comment}{!}
18   \textcolor{comment}{! ヒストリー, 変数に属性をつける.}
19   \textcolor{comment}{!}
20   \textcolor{comment}{!== 備考}
21   \textcolor{comment}{!}
22   \textcolor{comment}{! VNAME が空の場合にはヒストリーのグローバル属性として扱われる.}
23   \textcolor{comment}{!}
24   \textcolor{keywordtype}{use }\hyperlink{namespacegtool__history}{gtool\_history}
25   \textcolor{keywordtype}{character(len=*)}, \textcolor{keywordtype}{intent(in)}:: vname \textcolor{comment}{! 変数名}
26   \textcolor{keywordtype}{character(len=*)}, \textcolor{keywordtype}{intent(in)}:: atname \textcolor{comment}{! 属性名}
27   \textcolor{keywordtype}{double precision}, \textcolor{keywordtype}{intent(in)}:: \textcolor{keywordtype}{value}(i) \textcolor{comment}{! 変数}
28   \textcolor{keywordtype}{integer}          :: i \textcolor{comment}{! 属性の次元数}
29 
30   \textcolor{keyword}{call }historyaddattr(vname, atname, \textcolor{keywordtype}{value})
31 
\end{DoxyCode}
