summaryrefslogtreecommitdiff
path: root/Alpha.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Alpha.hs')
-rw-r--r--Alpha.hs12
1 files changed, 6 insertions, 6 deletions
diff --git a/Alpha.hs b/Alpha.hs
index 7405103..ffcaff7 100644
--- a/Alpha.hs
+++ b/Alpha.hs
@@ -41,9 +41,9 @@ module Alpha
(</),
(<//),
- -- * Shoving / binding
+ -- * inding
bind,
- (>>=),
+ (+>),
-- * Bool
don't,
@@ -146,7 +146,7 @@ infixl 1 |>
-- | Alias for <&>. Can be read as "and then". Basically does into a
-- functor, does some computation, then returns the same kind of
--- functor. Could also be defined as `f >>= return <. g`
+-- functor. Could also be defined as `f +> return <. g`
--
-- Pronunciation: fas-gar
(/>) :: Functor f => f a -> (a -> b) -> f b
@@ -157,10 +157,10 @@ infixl 1 />
bind :: Monad m => m a -> (a -> m b) -> m b
bind a f = a Prelude.>>= f
-(>>=) :: Monad m => m a -> (a -> m b) -> m b
-a >>= b = a Prelude.>>= b
+(+>) :: Monad m => m a -> (a -> m b) -> m b
+a +> b = a Prelude.>>= b
-infixl 1 >>=
+infixl 1 +>
-- | Removes newlines from text.
chomp :: Text -> Text