%N xyzclose %F $MIR/src/subs/xyzio.c
%D Close an image file
%P bpw
%: image-i/o
%B
      subroutine xyzclose( tno )
      integer    tno

This closes an image file.

   Input:
      tno:     The image-file handle                                          
