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: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |