toMaybeCond :: (a -> Bool) -> a -> Maybe a
toMaybeCond condFunc x = if condFunc x then Just x else Nothing
toMaybeCond :: (a -> Bool) -> a -> Maybe a
toMaybeCond condFunc x = if condFunc x then Just x else Nothing
toMaybeCond condFunc x = if condFunc x then Just x else Nothing