infixr 2 ^^^
(^^^) :: Maybe a -> Maybe a -> Maybe a
Nothing ^^^ r@(Just _) = r
l@(Just _) ^^^ Nothing = l
_ ^^^ _ = Nothing
Subscribe to:
Post Comments (Atom)
infixr 2 ^^^
(^^^) :: Maybe a -> Maybe a -> Maybe a
Nothing ^^^ r@(Just _) = r
l@(Just _) ^^^ Nothing = l
_ ^^^ _ = Nothing
1 comment:
Confirming once again that the
use of Haskell makes you exclusive.
-- Paul
Post a Comment