function [group,name,spec1,spec2,spec3] = qp_kinfo( kname )


%=== Set some default values
name  = kname;
spec1 = [];
spec2 = [];
spec3 = [];
 

%=== Species
%
if strncmp( kname, 'Species:', 8 );
  %
  group = 'Species';
  name  = kname( [10:length(kname)] ); 


%=== Temperature
%
elseif strncmp( kname, 'Temperature:', 12 )
  %
  group = 'Temperature';
  name  = group;
  spec1 = kname(14:length(kname));


%=== Pointing off-set
%
elseif strncmp( kname, 'Pointing:', 9 )
  %
  group = 'Sensor scalar';
  

%=== Calibration
%
%elseif strncmp( kname, 'Calibration:', 12 )
%  %
%  group = 'Sensor scalar';


%=== Continuum
%
%elseif strncmp( kname, 'Continuum:', 10 );
%  %
%  group = 'Continuum';
%  spec1 = sscanf( name(12:length(name)), '%f' );
%  ind   = find( name == '/' );
%  spec2 = sscanf( name(ind+(-2:-1)), '%d' );
%  spec3 = sscanf( name((ind+1):length(name)), '%d' );
%  name  = sprintf('%s: %7.3f GHz (%d/%d)',group,spec1/1e9,spec2,spec3);


else
  error(sprintf('Unknown retrieval identity: %s', kname));
end