%N uvgetvr %F $MIR/src/subs/uvio.c
%D Get the values of a uv variable.
%P rjs
%: uv-i/o
%B
FORTRAN call sequence:
        subroutine uvgetvra(tno,varname,adata)
        subroutine uvgetvri(tno,varname,idata,n)
        subroutine uvgetvrr(tno,varname,rdata,n)
        subroutine uvgetvrd(tno,varname,ddata,n)
        subroutine uvgetvrc(tno,varname,cdata,n)
        integer tno,n
        character varname*(*)
        character adata*(*)
        integer   idata(n)
        real      rdata(n)
        double precision ddata(n)
        complex cdata(n)

  These routines return the current value of a uv variable. N gives the size
  of elements in the return array. This MUST match with the actual number
  of elements in the variable. An exception is for the character string
  routine, where the size of the "adata" string must be strictly greater
  than (not equal to!) the size of the string.

  Input:
    tno         The handle of the uv data file.
    varname     The name of the variable to return.
    n           The number of elements to return. This must agree with
                the size of the variable!
  Output:
    data        The returned values of the variable.                    
