gistfile1.txt

fun fibonacci(n) {
    fibI, fibPrev = 1, 1
    for (i 3..n)
        fibPrev, fibI = fibI, fibPrev + fibI
    fibI
}

from, to = 1, 30
from, x, y, z = fibonacci(5)

<< "Here are the first", to, "Fibonacci numbers:"
for (i from..to) {
    << "fib", i, "is", fibonacci(i)
}

fun fibfib(i) = fibonacci(fibonacci(i))

<< "Gonna count fib(fib(x)), enter x:"
>> x
<< "fibfib is ", fibfib(x)

fun fact(n) {
    if (n <= 1) ret 1
    n * fact(n-1)
}

<< "3!! =", fact(fact(3))

fun power(m, e) {
    r = 1
    for (i 1..e)
        r = r * m
    r
}

fun powerTwo(x) = power(2, x)

fun shl(i, s) = i * powerTwo(s)

<< "4 << 3 =", shl(4, 3)

<< "How old are you?"
>> age
<< "You are at least", age * 365 * 24 * 60 * 60, "seconds old!"