on 656d036 help sign in
ormolu/data/examples/declaration/instance/instance-sigs-out.hs
22 lines 322 B history raw
1{-# LANGUAGE InstanceSigs #-}
2instance Eq Int where
3 (==) :: Int -> Int -> Bool
4 (==) _ _ = False
6instance Ord Int where
7 compare
8 :: Int
9 -> Int
10 -> Ordering
11 compare
12 _
13 _ = GT
15instance Applicative [] where
16 pure
17 :: a
18 -> [a]
19 pure a = [a]
20 (<*>)
21 :: [a] -> [a] -> [a]
22 (<*>) _ _ = []