; Object definition 
;-------------------------------------------------------------
;+
; NAME:
;    %NAME%
;
; PURPOSE:
;
; CATEGORY:
;
; PROPERTIES:
;    public properties:
;    private properties:
;
; METHODS:
;    public methods:
;       GetProperty
;       SetProperty
;       Show
;       Init
;       Cleanup
;    private methods:
;    
; DESCRIPTION:
;
; INTERFACES:
;
; SIDE EFFECTS:
;
; MODIFICATION HISTORY:
;-
; Copyright
;-------------------------------------------------------------


; **********************************************************************
; **********************************************************************
; Get Properties of %NAME%
;
pro %NAME%::GetProperty,    $
                          _ref_extra=extra

   ; Fill in lines along
   ; if arg_present(KEYWORD) then KEYWORD = self.KEYWORD

end  ;  %NAME%::GetProperty


; **********************************************************************
; **********************************************************************
; Set Properties of %NAME%
;
pro %NAME%::SetProperty,        $
                          _ref_extra=extra

   ; Fill in lines along
   ; if n_elements(KEYWORD) eq 1 then self.KEYWORD = fix(KEYWORD)

end  ;  %NAME%::SetProperty


; **********************************************************************
; **********************************************************************
; Display %NAME%
;
pro %NAME%::Show

end  ;  %NAME%::Show


; **********************************************************************
; **********************************************************************
; Cleanup method
;
pro %NAME%::CleanUp


   print,'%NAME%::CleanUp'

end  ;  %NAME%::CleanUp


; **********************************************************************
; **********************************************************************
; Initialization method
;
function %NAME%::Init,   $
                          _ref_extra=extra


   success = 0

   ; check inputs and set defaults 
   ; Fill in lines along
   ; if n_elements(KEYWORD) eq 0 then KEYWORD = 0L
   ; self.KEYWORD = KEYWORD
   ; success = 1

   return,success

end  ;  %NAME%::Init


; **********************************************************************
; **********************************************************************
; Structure definition
;
pro %NAME%__Define

   temp = {%NAME%,             $
             dummy:-1   }

end  ;  %NAME%__Define