Loading...
Searching...
No Matches
Functions/Subroutines
hsp3d.f90 File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine hsp3d (vname, var, i, j, k)
 

Function/Subroutine Documentation

◆ hsp3d()

subroutine hsp3d ( character(len=*)  vname,
double precision, dimension(i,j,k)  var,
integer  i,
integer  j,
integer  k 
)

Definition at line 14 of file hsp3d.f90.

15 !
16 !== 機能
17 !
18 ! ヒストリーに変数を出力する
19 !
20
22 character(len=*) :: vname ! 変数名
23 double precision :: var(i,j,k) ! 変数
24 integer :: i,j,k ! 各次元の大きさ
25
26 call historyput(vname,var)
27