/*

   fib - Numerator program to compute the Fibonacci series.

*/

new
a = 0
b = 1
do "subfib"