fib_loop(N) = Curr =>
Curr = 0,
Prev = 1,
foreach(_I in 1..N)
Tmp = Curr,
Curr := Curr + Prev,
Prev := Tmp
end.