Arc Forumnew | comments | leaders | submit | mapper's commentslogin
2 points by mapper 5213 days ago | link | parent | on: CL's psetf

'fib should have been simpler.

  (def fib (n)
    (with (a 0 b 1)
      (repeat n
        (pset  a b  b (+ a b)))
      a))

-----