undefine.pro

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

; $Id: undefine.pro,v 1.3 2002/12/04 14:51:36 riccardi Exp $
;+
;   UNDEFINE
;
;  undefine the passed variable.
;
;  undefine, var
;
;  EXAMPLE
;
; IDL> a=1
; IDL> help, a
; A               INT       =        1
; IDL> undefine, a
; IDL> help, a
; A               UNDEFINED = <Undefined>
;
;   HISTORY
;
; 1999 created by A. Riccardi
;-

pro undefine, varname
   if n_elements(varname) ne 0 then tempvar = size(temporary(varname))
end