1module Main where 2 3-- | Baz 4class Baz a where 5 foobar :: a -> a 6 foobar a = 7 barbaz (bazbar a) 8 9 -- | Bar baz 10 barbaz :: 11 a -> a 12 13 -- | Baz bar 14 bazbar :: 15 a -> 16 a 17 18 -- First comment 19 barbaz a = 20 bazbar -- Middle comment 21 a 22 23 -- Last comment 24 bazbar a = 25 barbaz 26 a 27