%N grrect %F $MIR/src/grrect.f
%D Fill a rectangle
%B
      SUBROUTINE GRRECT (X0,Y0,X1,Y1)
      REAL X0, Y0, X1, Y1

 GRPCKG: Fill a rectangle with solid color.  The rectangle
 is defined by the (x,y) world coordinates of its lower left and upper 
 right corners; the edges are parallel to the coordinate axes.

 Arguments:

 X0, Y0 (input, real): world coordinates of one corner of the 
       rectangle.
 X1, Y1 (input, real): world coordinates of the opposite corner of the 
       rectangle.
