hsaatd.f90 File Reference

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

Go to the source code of this file.

Functions/Subroutines
subroutine	hsaatd (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 hsaatd.f90.

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 )

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

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

Definition at line 27 of file hsaatd.f90.

  !
  use gtool_history
  character(len=*), intent(in):: vname ! 変数名
  character(len=*), intent(in):: atname ! 属性名
  double precision, intent(in):: value(i) ! 変数
  integer          :: i ! 属性の次元数
 
  call historyaddattr(vname, atname, value)