%N fxyclose %F $MIR/src/subs/fitsio.for
%D Close a FITS image file.
%P rjs
%: fits
%B
      subroutine fxyclose(lu)

      integer lu
  ---------------------------------------------------------------------
  Close up a fits file. Good night.

  Input:
    lu         File descriptor.
