;+
; NAME:
;	SMEI_SEQUENCE::GET_COLOUR_MAP
;
;
; PURPOSE:
;	Returns the colour table used for a SMEI sequence
;
;
; CATEGORY:
;	SMEI_SEQUENCE
;
;
; CALLING SEQUENCE:
;	map = seqref -> get_colour_map()
;
;
; KEYWORD PARAMETERS:
;	/red	Only return the red component
;	/green	Only return the green component
;	/blue	Only return the blue component
;
;
; OUTPUTS:
;	map	The colour map.
;
;
; MODIFICATION HISTORY:
;	Original: 12/12/02; SJT
;-

function smei_sequence::get_colour_map, red = red, green = green, blue $
                                        = blue

if keyword_set(red) then return, self.colour_table[*, 0]
if keyword_set(green) then return, self.colour_table[*, 1]
if keyword_set(blue) then return, self.colour_table[*, 2]

return, self.colour_table

end