Polynomial long division: Difference between revisions

Content added Content deleted
(Add Factor example)
m (→‎{{header|Perl 6}}: 'singularizer' not needed)
Line 1,812: Line 1,812:


=={{header|Perl 6}}==
=={{header|Perl 6}}==
{{Works with|rakudo|2015-12-19}}
{{Works with|rakudo|2018.10}}
{{trans|Perl}} for the core algorithm; original code for LaTeX pretty-printing.
{{trans|Perl}} for the core algorithm; original code for LaTeX pretty-printing.
<lang perl6>sub poly_long_div ( @n is copy, @d ) {
<lang perl6>sub poly_long_div ( @n is copy, @d ) {
Line 1,822: Line 1,822:
}
}


return $(@q), $(@n);
return @q, @n;
}
}