diff --git a/test.hs b/test.hs
new file mode 100644
index 0000000..7c4051e
--- /dev/null
+++ b/test.hs
@@ -0,0 +1,4 @@
+module Test where
+
+test :: Double -> Double
+test d = exp( (-2.0) * pi * d / 48000)
\ No newline at end of file