5 lines
131 B
Text
5 lines
131 B
Text
|
'if. * y do. y * u <: y else. 1 end.' Y 10 NB. Factorial
|
||
|
|
3628800
|
||
|
|
'(u@:<:@:<: + u@:<:)^:(1 < ])' Y 10 NB. Fibonacci
|
||
|
|
55
|