;+ ; Project : Solar-B ; ; Name : widget_valid ; ; Purpose : check if variable is a valid widget id ; ; Category : utility widgets ; ; Syntax : IDL> s=widget_valid(id) ; ; Inputs : ID = id to check ; ; Outputs : 1/0 if it is or isn't ; ; Keywords : None ; ; History : 12-Jan-2006, Zarro (L-3Com/GSFC) - written ; ; Contact : DZARRO@SOLAR.STANFORD.EDU ;- function widget_valid,id ;-- catch obvious invalid cases (non-existent, non-long, or, negative) if n_elements(id) Eq 0 then return,0b if size(id, /type) ne 3 then return, 0b if id lt 0 then return, 0b return, widget_info(id, /valid) end