Initial 1.0 release

Exiting of DO WHILE loop
not yet clean; program outputs "1.#INF",
a result of 1 divided by 0.