in reply to Re: Golf: overtone calculator
in thread Golf: overtone calculator

Little optimization:

sort{$a-$b}keys%{{map{map{1e-3*int"@_.e3"*$'/$_,0}/^/..$_}1..pop}}