%N uvdatopn %F $MIR/src/subs/uvdat.for
%D Open uv data from a multi-file set.
%P rjs
%: uv-i/o, uv-data, uv-selection
%B
        logical function uvDatOpn(tIn)

        implicit none
        integer tIn

  This opens the next UV data file to be processed and performs the
  necessary initialisation.

  Output:
    tIn        The handle of the uv data file just opened.
