golden_ratio := (1.0 + sqrt(5.0))/2.0; lo := 1; hi := 1; n := 1; print n; print hi; while hi < 2^63 repeat ( print "----------------------------------------"; n := n + 1; ratio : SF := hi / lo; print n; print hi; print ratio; diff : SF := (ratio - golden_ratio); print diff; hi := lo + hi; lo := hi - lo )