MPL Bytecode Compiler Code

Micro Programming Language - A Portable Language for Micro Computers

Status: Beta

Brought to you by: buzzphp

[r99]: / XACK.MPL Maximize Restore History

14 lines (11 with data), 210 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
  ]
]