hsaatr.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	hsaatr (vname, atname, value, i)

Function/Subroutine Documentation

hsaatr()

subroutine hsaatr	(	character(len=*), intent(in)	vname,
		character(len=*), intent(in)	atname,
		real, dimension(i), intent(in)	value,
		integer	i
	)

Definition at line 15 of file hsaatr.f90.

  !
  !== 機能
  !
  ! ヒストリー, 変数に属性をつける.
  !
  !== 備考
  !
  ! VNAME が空の場合にはヒストリーのグローバル属性として扱われる.
  !
  use gtool_history
  character(len=*), intent(in) :: vname ! 変数名
  character(len=*), intent(in) :: atname ! 属性名
  real, intent(in) :: value(i) ! 変数
  integer          :: i ! 属性の次元数

  call historyaddattr(vname, atname, value)