isin.fth - changed "max" to "min" because the attempt to prevent numerical overflow was causing sin waves to become square waves.
forth/lib/isin.fth