%N hisclose %F $MIR/src/subs/headio.c
%D This closes the history file.
%P pjt
%: header-i/o
%B
FORTRAN call sequence:
        subroutine hisclose(tno
        integer tno

  This closes the history file associated with a particular data set.
  Input:
    tno         The handle of the data set.                             
