hsaatr.f90 File Reference

gtool_history Fortran 77 用インターフェース (実数型属性付加) More...

Go to the source code of this file.

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

Detailed Description

gtool_history Fortran 77 用インターフェース (実数型属性付加)

Author

Shin-ichi TAKEHIRO, Yasuhiro MORIKAWA

Copyright

Copyright (C) GFD Dennou Club, 2000-2026. All rights reserved.
License is BSD-2-Clause. See COPYRIGHT in detail

Definition in file hsaatr.f90.

Function/Subroutine Documentation

hsaatr()

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

ヒストリー, 変数に属性をつける.

VNAME が空の場合にはヒストリーのグローバル属性として扱われる.

Definition at line 27 of file hsaatr.f90.

  !
  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)