%N grarea %F $MIR/src/grarea.f
%D Define a clipping window
%B
      SUBROUTINE GRAREA (IDENT,X0,Y0,XSIZE,YSIZE)

 GRPCKG: Define a rectangular window in the current plotting area. All
 graphics (except characters written with GRCHAR) will be blanked
 outside this window.  The default window is the full plotting area
 defined by default or by GRSETS.

 Arguments:

 IDENT (input, integer): the plot identifier, returned by GROPEN.
 X0, Y0 (input, real): the lower left corner of the window, in absolute
       device coordinates.
 XSIZE, YSIZE (input, real): width and height of the window in absolute
       coordinates; if either is negative, the window will be reset to
       the full plotting area.
