This program works fine for me.  Did you actually test this specific
example, and what did it do?

Note that passing floats to a K&R style, unprototypes function causes
them to be converted back and forth to doubles.  This is expensive.


------------------------------------------------------------------------------