hsp1r.f90 File Reference

Fortran 77 compatibility wrapper for gtool_history HistoryPut (1D single precision) . More...

Go to the source code of this file.

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

Detailed Description

Fortran 77 compatibility wrapper for gtool_history HistoryPut (1D single precision)

.

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 hsp1r.f90.

Function/Subroutine Documentation

hsp1r()

subroutine hsp1r	(	character(len=*)	vname,
		real, dimension(i)	var,
		integer	i )

Output a variable to history

Definition at line 23 of file hsp1r.f90.

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