%N xywrite %F $MIR/src/subs/xyio.c
%D Write a row to an image.
%: image-i/o
%B
FORTRAN call sequence:
        subroutine xywrite(tno,index,array)
        integer tno,index
        real array(*)

  This writes a single row to an image. This accesses the plane given
  by the last call to xysetpl.

  Input:
    tno         The image file handle, returned by xyopen.
    index       The row number to write. This varies from 1 to NAXIS2.
    array       The read row. NAXIS1 elements are written.              
