hsp1d.f90 File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	hsp1d (vname, var, i)

Function/Subroutine Documentation

hsp1d()

subroutine hsp1d	(	character(len=*)	vname,
		double precision, dimension(i)	var,
		integer	i
	)

Definition at line 15 of file hsp1d.f90.

  !
  !== 機能
  !
  ! ヒストリーに変数を出力する
  !

  use gtool_history
  character(len=*) :: vname ! 変数名
  double precision :: var(i) ! 変数
  integer          :: i ! 各次元の大きさ

  call historyput(vname,var)