4 lines
87 B
Raku
4 lines
87 B
Raku
my @Q = 1, 1, -> $a, $b {
|
|
(state $n = 1)++;
|
|
@Q[$n - $a] + @Q[$n - $b]
|
|
} ... *;
|