%N pghline %F $MIR/src/subs/pghline.for
%D Histogram line plot for pgplot.
%P mchw
%: plotting, uv-data
%B
        subroutine PgHline(npts,x,y,gapfac)

        implicit none
        integer npts
        real x(npts), y(npts), gapfac

  Histogram style line plot of y-array versus x-array. Points are not
  connected over gaps or reversals in the x-array.

  Inputs:
    npts       number of points
    x          x-array to be plotted
    y          y-array to be plotted
    gapfac     factor to define a gap in x-array. E.g. 2= 2*(x(i+1)-x(i)) 
