hsaatc.f90

Path: hsaatc.f90
Last Update: Sun Jan 15 16:10:30 +0900 2006

gt4_history Fortran 77 用インターフェース

Authors:Shin-ichi TAKEHIRO, Yasuhiro MORIKAWA
Version:$Id: hsaatc.f90,v 1.3 2006-01-15 07:10:30 morikawa Exp $
Tag Name:$Name: gt4f90io-20080727 $
Copyright:Copyright (C) GFD Dennou Club, 2000-2005. All rights reserved.
License:See COPYRIGHT

サブルーチン対応表

gt4_history#HistoryAddAttr :HSAATC,HSAATR,HSAATD,HSAATI

Required files

gt4_history.f90  

Methods

hsaatc  

Included Modules

gt4_history

Public Instance methods

hsaatc( vname, atname, value )
Subroutine :
vname :character(len = *), intent(in)
: 変数名
atname :character(len = *), intent(in)
: 属性名
value :character(len = *), intent(in)
: 変数

機能

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

備考

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

[Source]

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

  call HistoryAddAttr(vname, atname, value)

end subroutine hsaatc

[Validate]