;+
; NAME:
;	SMEI_SEQUENCE::CLEANUP
;
;
; PURPOSE:
;	Destructor for a SMEI sequence
;
;
; CATEGORY:
;	SMEI_SEQUENCE
;
;
; CALLING SEQUENCE:
;	obj_destroy,seqref
;
;
; MODIFICATION HISTORY:
;	Original: 10/12/02; SJT
;-

pro smei_sequence::cleanup

; Must destroy the images of the sequence

while obj_valid(self -> get_last()) do obj_destroy, self -> get_last()

end