my @spectrum = qw/174.0 102.99 71.62 70.53 82.49 69.05 18.94 102.99 71.62 70.53 82.49 69.05 18.94 102.99 71.62 70.53 82.49 69.05 18.94 102.99 71.62 70.53 82.49 69.05 18.94/;
my @subsp = qw/102.0 18.94 71.61 82.0 173.0 68.7/;