hsaatd.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine hsaatd (vname, atname, value, i)
 

Function/Subroutine Documentation

◆ hsaatd()

subroutine hsaatd ( character(len=*), intent(in)  vname,
character(len=*), intent(in)  atname,
double precision, dimension(i), intent(in)  value,
integer  i 
)

Definition at line 15 of file hsaatd.f90.

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