RosettaCodeData/Task/Ackermann-function/J/ackermann-function-3.j
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

1 line
82 B
Text

Ack=. 3 -~ [ ({&(2 4$'>: 2x&+') ::(,&'&1'&'2x&*'@:(-&2))"0@:[ 128!:2 ]) 3 + ]