adam@2298: fun fib n = adam@2298: if n = 0 then adam@2298: 0 adam@2298: else if n = 1 then adam@2298: 1 adam@2298: else adam@2298: fib (n - 1) + fib (n - 2) adam@2298: adam@2298: fun main n : transaction page = adam@2298: return {[fib n]}