Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Maybe/IsJust.hs
module Maybe where isJust :: Maybe a -> Bool isJust (Just a) = True isJust Nothing = False