module Double where main :: Fay () main = print ((2 * 4 / 2) :: Double)