def fibIter (int n) if (< n 2) return n end if decl int fib fibPrev num set fib (set fibPrev 1) for (set num 2) (< num n) (inc num) set fib (+ fib fibPrev) set fibPrev (- fib fibPrev) end for return fib end