Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Prelude/AndAnd.hs
module Prelude where infixr 3 && (&&) :: Bool -> Bool -> Bool True && x = x False && _ = False