RosettaCodeData/Task/Anonymous-recursion/OxygenBasic/anonymous-recursion.oxy
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

9 lines
209 B
Text

function fiboRatio() as double
function fibo( double i, j ) as double
if j > 2e12 then return j / i
return fibo j, i + j
end function
return fibo 1, 1
end function
print fiboRatio