Help for this page

Select Code to Download


  1. or download this
    $ perl6 -e 'my $f=3; for (1..16) { $f = ($f-1)**2 if $_>1; say $f }'
    3
    ...
    247905749270529
    61457260521381894004129398784
    ...
    
  2. or download this
    $ perl6 -e 'my $f=3; for (1..16) { $f = ($f-1)**2 if $_>1; say "$f\n" 
    +}'
    3
    ...
    0337999319547061332639122812019036538179695068231223035911230807766438
    +8165324777524016625496185215336342093824