September 2017 Update
This commit is contained in:
parent
bba7bfd280
commit
ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions
|
|
@ -0,0 +1,21 @@
|
|||
PROGRAM:ACKERMAN
|
||||
:If not(M
|
||||
:Then
|
||||
:N+1→N
|
||||
:Return
|
||||
:Else
|
||||
:If not(N
|
||||
:Then
|
||||
:1→N
|
||||
:M-1→M
|
||||
:prgmACKERMAN
|
||||
:Else
|
||||
:N-1→N
|
||||
:M→L1(1+dim(L1
|
||||
:prgmACKERMAN
|
||||
:Ans→N
|
||||
:L1(dim(L1))-1→M
|
||||
:dim(L1)-1→dim(L1
|
||||
:prgmACKERMAN
|
||||
:End
|
||||
:End
|
||||
|
|
@ -0,0 +1,6 @@
|
|||
PROGRAM:AHANDLER
|
||||
:0→dim(L1
|
||||
:Prompt M
|
||||
:Prompt N
|
||||
:prgmACKERMAN
|
||||
:Disp Ans
|
||||
Loading…
Add table
Add a link
Reference in a new issue