#!/usr/bin/bc /* Fib-on-atchy * * (c) 2013 D. Haworth */ ff[0]=1 ff[1]=1 print "1, 1\n" print "2, 1\n" n = 3 while (1) { fib = ff[0] + ff[1] print n, ", ", fib, "\n" ff[0] = ff[1] ff[1] = fib; n+=1 }