pro poa_colors
;
;+
;   Name: poa_colors
;
;   Purpose: set colors to "standard" PINTofALE defaults
;
;   Input Parameters:
;      NONE;
; 
;   Output Paramters:
;      NONE
;
;   Calling Sequence:
;      IDL> poa_colors
;
;   Side Effects:
;      Will change ssw/idl color tables 
;
;   History:
;      11-August-2004 - S.L.Freeland - helper routine to replace a
;                       few lines in non-ssw POA startup (initale.pro) - 
;       
;                       
;-
; following lines from PINTofALE initale.pro 
if !D.N_COLORS gt 256 then device,decomposed=0
;       and load color table with some useful colors
loadct,3        ;standard "heat" at high color numbers
peasecolr       ;specific colors at small color numbers
return
end