hsp3r.f90

Path: hsp3r.f90
Last Update: Sun Jan 15 16:10:30 JST 2006

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

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

サブルーチン対応表

gt4_history#HistoryPut :HSP1D, HSP2D, HSP3D, HSP1R, HSP2R, HSP3R

Required files

gt4_history.f90  

Methods

hsp3r  

Included Modules

gt4_history

Public Instance methods

hsp3r( vname, var, i, j, k )
Subroutine :
vname :character(len=*)
: 変数名
var(i,j,k) :real
: 変数
i :integer
: 各次元の大きさ
j :integer
: 各次元の大きさ
k :integer
: 各次元の大きさ

機能

ヒストリーに変数を出力する

[Source]

subroutine hsp3r(vname,var,i,j,k)
  !
  !== 機能
  !
  ! ヒストリーに変数を出力する
  !

  use gt4_history
  character(len=*) :: vname ! 変数名
  real             :: var(i,j,k) ! 変数
  integer          :: i,j,k ! 各次元の大きさ

  call HistoryPut(vname,var)

end subroutine hsp3r

[Validate]