%N uvflgwr %F $MIR/src/subs/uvio.c
%D Write uv flags after a read.
%P rjs
%: uv-i/o
%B
FORTRAN call sequence:
        subroutine uvflgwr(tno,flags)
        integer tno
        logical flags(*)

  This causes the flags associated with correlation data to be rewritten.
  It is typically used by a flagging program to overwrite old flagging
  information. It will typically be called soon after uvread (which is
  used to get the old flags, and position the file), thus overwriting
  the old flags.

  Input:
    tno         The handle of the input uv file.
    flags       Logical array of "nread" elements ("nread" as returned
                by the last call to uvread).                            
