%N grclip %F $MIR/src/grclip.f
%D Clip a point against clipping rectangle
%B
      SUBROUTINE GRCLIP (X,Y,XMIN,XMAX,YMIN,YMAX,C)
      REAL X,Y
      REAL XMIN,XMAX,YMIN,YMAX
      INTEGER C

 GRPCKG (internal routine): support routine for the clipping algorithm;
 called from GRLIN0 only. C is a 4 bit code indicating the relationship
 between point (X,Y) and the window boundaries; 0 implies the point is
 within the window.

 Arguments:
