%N uvdatgtv %F $MIR/src/subs/uvdat.for
%D Get real array information about the uvDat routines.
%P rjs
%: uv-i/o, uv-data, uv-selection
%B
        subroutine uvDatGtv(object,rval,n)

        implicit none
        integer n
        character object*(*)
        real rval(n)

  This returns miscellaneous information about what is going on inside
  the UVDAT routines.

  Input:
    object     This is a string describing the information to return.
               Possible values are:
                'variancef' Returns variance spectrum of the data.
  Output:
    rval       Real array valued output.
