Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/PreludeList/NotElem.hs
module Prelude where infix 4 `notElem` notElem :: (Eq a) => a -> [a] -> Bool notElem x = all (x/=)