Iterated digits squaring: Difference between revisions
m
→{{header|Perl 6}}: Need to explicitly use nqp; now
m (→{{header|Factor}}: improved run time by 34 seconds) |
Thundergnat (talk | contribs) m (→{{header|Perl 6}}: Need to explicitly use nqp; now) |
||
Line 1,603:
{{out}}
<pre>85744333</pre>
This runs in under ten minutes. We can reduce this
<lang perl6>
my $cache := nqp::list_i();
nqp::bindpos_i($cache, 650, 0);
nqp::bindpos_i($cache, 1, 1);
| |||