But that makes getting a strict version with a count of 84 a point of honour, right? :-)
sub p{ my@m=1;for my $p(@_){my@a;map{my$j=my$i=$_;$a[$j++]+=$_*$m[$i]for@$p}0 +..@m;@m=@a}\@m }
In reply to Re (tilly) 7: (Golf) Multiply polynomials
by tilly
in thread (Golf) Multiply polynomials
by tilly
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |