in reply to Re^2: e
in thread e
Simple optimizations down to 86:
sub e{ #234567890123456789012345678901234567890123456789012 map{$e[$q-1]+=$e[$q]/$q,($e[$q]%=$q--).=0for 1..($q=@e);$e[0]=!print"@e"|0}@e=(1)x pop } e(1000);
Update from tybalt89 - 80 chars:
$=[!print$=]=!map{$==$=[$#z]+=$=[@z]/@z,($=[@z]%=1+$#z--).=0}@z=@=for@ +==(1)x pop
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^4: e
by shmem (Chancellor) on Sep 13, 2015 at 09:47 UTC | |
Re^4: e
by tachyon (Chancellor) on Jul 17, 2004 at 10:02 UTC |
In Section
Obfuscated Code