:: deftheorem Def1 defines AckermannFunction ACKERMAN:def 1 :
for b1 being BinOp of NAT holds
( b1 = AckermannFunction iff for m, n being Nat holds
( b1 . (0,n) = n + 1 & ( m > 0 implies b1 . (m,0) = b1 . ((m - 1),1) ) & ( m > 0 & n > 0 implies b1 . (m,n) = b1 . ((m - 1),(b1 . (m,(n - 1)))) ) ) );