Without using a bigint module, you can't generate much of the series. I suspect correct Perl 6 solutions would be really easy.
use bigint; my $f=3; for (1..12) { $f = ($f-1)**2 if $_>1; say $f } # Faster: replace bigint with Math::GMP qw/:constant/;
I admit I find code golf to be tiresome, and prefer readable and efficient solutions.
In reply to Re: challenge: OEIS A073015 serie
by danaj
in thread challenge: OEIS A073015 serie
by Discipulus
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |