MPL Bytecode Compiler Code

Micro Programming Language - A Portable Language for Micro Computers

Status: Beta

Brought to you by: buzzphp

[r49]: / XACK.MPL Maximize Restore History

14 lines (11 with data), 203 Bytes

;LIBHDR

ACK(M,N) M==0?N+1,N==0?ACK(M-1,1),ACK(M-1,ACK(M,N-1))

MAIN(;N,M) [
  N=0; N<=6 @ [
    M=0; M<=3 @ [
      WRITEF("ACK(%N,%N) = %N*N",M,N,ACK(M,N));
      ++M
    ];
    ++N
  ]
]