Files
pete/test.hs
2017-06-27 21:17:46 -04:00

4 lines
82 B
Haskell

module Test where
test :: Double -> Double
test d = exp( (-2.0) * pi * d / 48000)