;+
; NAME:
;	SMEI_SEQUENCE::GET_BIGGEST_IMAGE
;
;
; PURPOSE:
;	Find the largest image in a SMEI sequence
;
;
; CATEGORY:
;	SMEI_SEQUENCE
;
;
; CALLING SEQUENCE:
;	sz = seqref -> get_biggest_image
;
;
; OUTPUTS:
;	sz	The maximum X & Y sizes of the images in the sequence
;
;
; MODIFICATION HISTORY:
;	Original: 11/12/02; SJT
;-

function smei_sequence::get_biggest_image

im = self -> get_first()
sz = [0l, 0l]

while obj_valid(im) do begin
    isz = im -> get_size()
    sz = sz > isz
    im = im -> get_next()
endwhile

return, sz

end