%N uvset %F $MIR/src/subs/uvio.c
%D Set up the uv linetype, and other massaging steps.
%P rjs
%: uv-i/o
%B
FORTRAN call sequence:
        subroutine uvset(tno,object,type,n,p1,p2,p3)
        integer tno
        character object*(*),type*(*)
        integer n
        real p1,p2,p3

  Set up the way uvread behaves. This determines whether uvread returns
  correlation channels, wide-band channels or velocity channels. This also
  sets up whether u and v are returned in wavelengths or nanosec, and
  what planet processing is performed.

  Input:
    tno         Handle of the uv data set.
    object      Name of the object that we are setting the type of.
    type        The type of data that the user wants returned.
    n           Some integer parameter.
    p1,p2,p3    Some real parameters.                                   
