4.3BSD/usr/contrib/icon/book/14/limit1.icn

procedure main()
   every write(fibseq()) \ 20
end