hsaati.f90 File Reference

Go to the source code of this file.

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

Function/Subroutine Documentation

hsaati()

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

Definition at line 15 of file hsaati.f90.

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

  call historyaddattr(vname, atname, value)