;------------------------------------------------------------------------------;
;+
; NAME: 
;           eis_raster_undo__DEFINE
; PURPOSE:
;           This procedure defines the data memebers of the 
;           Object "eis_raster_undo".
; INPUTS:
;           ll - a lineList (eis_line_list) structure
;           ra - a raster   (eis_raster)    structure
; AUTHOR:
;           John A. Rainnie - RAL (j.a.rainnie@rl.ac.uk)
;-
;------------------------------------------------------------------------------;
FUNCTION eis_raster_undo::Init , ra , ll

Self.ra = ra
Self.ll = ll

RETURN,1
END
;______________________________________________________________________________
;
;______________________________________________________________________________
PRO eis_raster_undo::setProperty , wavelength = wavelength

stop
IF (N_ELEMENTS(wavelength) GT 0) THEN stop

END
;______________________________________________________________________________
;
;______________________________________________________________________________
PRO eis_raster_undo::getProperty , ra = ra , ll = ll

ra = Self.ra
ll = Self.ll

END
;______________________________________________________________________________
; Cleanup
;______________________________________________________________________________
PRO eis_raster_undo::Cleanup


END
;______________________________________________________________________________
Pro eis_raster_undo__Define
;______________________________________________________________________________

junk =  {   eis_raster_undo,                                                $
                        ra                      : {eis_raster}       ,      $
                        ll                      : {eis_line_list}           $
    	   }

End