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