1 files changed, 1 insertions, 1 deletions
diff --git a/Alpha.hs b/Alpha.hs
index 788a125..7da7161 100644
--- a/Alpha.hs
+++ b/Alpha.hs
@@ -133,7 +133,7 @@ infixr 0 <|
 (|>) :: a -> (a -> b) -> b
 f |> g = g f
 
-infixl 0 |>
+infixl 1 |>
 
 -- | Alias for <&>. Can be read as "and then". Basically does into a
 -- functor, does some computation, then returns the same kind of