; $Id: wdelall.pro,v 5.5 2/4/2002 $
;
; (c) 2002 Javier G Corripio
;	jgc@geo.ed.ac.uk
;+
; NAME:
;	WDELALL
;
; PURPOSE:
;	Delete all windows on display
;
; CATEGORY:
;	cleaning & tidying up
;
; CALLING SEQUENCE:
;	WDELALL

;	
;
; MODIFICATION HISTORY:
; 	Written by:	Javier G. Corripio April, 2002
;
;-


PRO wdelall
  wnum=!D.WINDOW
WHILE (wnum GE 0) DO BEGIN
	WDELETE,wnum
	wnum=!D.WINDOW
ENDWHILE

END