my %helix1 = (
   A => [ -1.115,  8.537,  7.075 ],
   B => [ -2.745,  5.280,  7.165 ],
   C => [ -0.777,  3.267,  7.329 ],
   D => [  1.610,  5.225, 10.885 ],
   E => [  0.296,  5.263, 10.912 ],
);

my %helix2 = (
   K => [ -0.696, 13.041, 22.357 ],
   L => [  1.152, 11.081, 23.082 ],
   M => [  2.200, 17.590, 18.424 ],
);