Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Re: Re: Re: Golf: overtone calculator

by jynx (Priest)
on Sep 02, 2002 at 01:37 UTC ( #194495=note: print w/ replies, xml ) Need Help??


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


Does this fix the problem? (at 72 chars):

sub Harmonics ($$) { #23456789_123456789_123456789_123456789_123456789_123456789_123456789_ +12 for$a(1..pop){$_{sprintf'%.3f',$_[0]*$a/$_}++for 1..$a}sort{$a-$b}keys +%_ }
jynx


Comment on Re: Re: Re: Golf: overtone calculator
Download Code
Re^4: Golf: overtone calculator
by Aristotle (Chancellor) on Sep 02, 2002 at 02:07 UTC
    I'm outta votes right now, but kudos for the $a-$b bit. D'oh..

    Makeshifts last the longest.

Re: Re: Re: Re: Golf: overtone calculator
by Django (Pilgrim) on Sep 02, 2002 at 06:43 UTC

    Does this fix the problem?

    Yepp, not only working, but kicking out my sort too!

    ~Django
    "Why don't we ever challenge the spherical earth theory?"

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://194495]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (7)
As of 2014-11-25 23:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My preferred Perl binaries come from:














    Results (160 votes), past polls