;+
; NAME:
;	qImage_cw_EphemKill
; PURPOSE:
;	Destroys heap variables associated with qephem widget
; CATEGORY:
; CALLING SEQUENCE:
	PRO qImage_cw_EphemKill, wid_ephem
; INPUTS:
;	wid_ephem
; OUTPUTS:
; INCLUDE:
	@compile_opt.pro		; On error, return to caller
; CALLS:
;	IsType, destroyvar
; PROCEDURE:
; MODIFICATION HISTORY:
;	SEP-2006, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;		Added documentation
;-

widget_control, wid_ephem, get_uvalue=ephem_state

IF IsType(ephem_state,/defined) THEN BEGIN

	destroyvar, *ephem_state.pnt_rr, *ephem_state.pnt_name
	ptr_free, ephem_state.pnt_rr, ephem_state.pnt_name

ENDIF

RETURN  &  END