wdel.pro

来自「IDL语言编写的用于天文自适应光学仿真的软件CAOS V6.0的第一部分。」· PRO 代码 · 共 24 行

; $Id: wdel.pro,v 1.2 2002/03/14 11:49:14 riccardi Exp $

;+
;
; NAME
;
;  WDEL
;
; wdel
;
; delete all the windows currently defined.
;
; April 1999, A.R. (AOO)
;-

pro wdel

while (!D.WINDOW ne -1) do begin
    wdelete, !D.WINDOW
endwhile

end