code cleanup

diff --git a/examples/EsdPlayerExample.hs b/examples/EsdPlayerExample.hs
index 126e1fea93c7dd1de1d0d9f7bc2e52c51b969bef..cddc9eb809a6a122baa61a3a6600a1d30795ac9e 100644 (file)
--- a/examples/EsdPlayerExample.hs
+++ b/examples/EsdPlayerExample.hs
@@ -46,4 +46,4 @@ playMono16Sine pl sampleFreq sec noteFreq
             2
             ⋅ π
             ⋅ noteFreq
-            ⋅ (realToFrac n / realToFrac sampleFreq)
+            ⋅ (realToFrac n ÷ realToFrac sampleFreq)