Is there a Haskell code formatter?

I used to write

data A = A {
      a :: Double
    }
    deriving(Eq, Show)

but now i prefer

data A = A {
      a :: Double
    } deriving(Eq, Show)

I think the answer will be no, but i ask anyway: is there a code formatter for Haskell?