%N pgeras %F $MIR/src/pgeras.f
%D Erase all graphics from current page
%B
      SUBROUTINE PGERAS

 Erase all graphics from the current page (or current panel, if
 the view surface has been divided into panels with PGSUBP).

 Arguments: none
