作者：Filip Sergot

阿克曼函数是计算机科学中一个经典的递归例子。

更多

http://rosettacode.org/wiki/Ackermann_function#Raku

这里有什么有趣的地方？

• 三元链

• 递归函数

使用的功能

• 三元运算符 - http://doc.perl6.org/language/operators#infix_%3F%3F_%21%21

• 多子程序 - http://doc.perl6.org/syntax/multi

源代码：ackermann-function.pl

use v6;

sub A(Int $m, Int $n) {

    $m == 0  ??    $n + 1                   !!
    $n == 0  ??  A($m - 1, 1            )   !!
                 A($m - 1, A($m, $n - 1));

}
A(1, 2).say;