	SUBROUTINE GSWAIT
C
C	SUBROUTINE TO WAIT FOR MOUSE CLICK ON CLOSEWINDOW GADGET
C
	CALL GSDRVR(9,DUMMY,DUMMY)
	RETURN
	END
