12 lines
192 B
Text
12 lines
192 B
Text
[$$[%
|
|
\$$[%
|
|
1-\$@@a;! { i j -> A(i-1, A(i, j-1)) }
|
|
1]?0=[
|
|
%1 { i 0 -> A(i-1, 1) }
|
|
]?
|
|
\1-a;!
|
|
1]?0=[
|
|
%1+ { 0 j -> j+1 }
|
|
]?]a: { j i }
|
|
|
|
3 3 a;! . { 61 }
|