fay-0.18.0.0: tests/negation.hs

import           Prelude

print' :: Double -> Fay ()
print' = print

main = do print' $ (-7/2)
          print' $ (-7)/2
          print' $ -f x/y
     where f n = n * n
           x = 5
           y = 2