1module HaddockComments where 2 3fun1 :: Int -> Float -> IO () 4fun1 = undefined 5fun2 = undefined 6 7fun3 :: Int -> Int 8fun3 = undefined 9 10square :: Int -> Int 11square x = x * x 12 13class C a where 14 f :: a -> Int 15 16 g :: Int -> a 17 18data MyData = Cons1{cons1Field1 :: Int, cons1Field2 :: Int, 19 cons1Field3 :: String} 20 | Cons2 Int 21