Files
  • main.hs
main.hs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
newtype Bork = Bork Integer

instance Eq Bork where
    x == y = True

instance Num Bork where
    fromInteger = Bork



a = 2 :: Bork

main = do
    print $ a == 1 && a == 2 && a == 3
GHCi, version 8.6.3