Skip to content

Instantly share code, notes, and snippets.

@ThomasCrevoisier
Last active August 29, 2015 14:15
Show Gist options
  • Save ThomasCrevoisier/82f49d6ecaceeb8f9c22 to your computer and use it in GitHub Desktop.
Save ThomasCrevoisier/82f49d6ecaceeb8f9c22 to your computer and use it in GitHub Desktop.
combineMaybe :: forall a f. (Applicative f) => Maybe (f a) -> f (Maybe a)
combineMaybe (Just x) = pure <$> x
combineMaybe Nothing = pure Nothing
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment