@@ -7,7 +7,7 @@ module Prelude
77 , ($), (#)
88 , (:), cons
99 , Show, show
10− , Functor, (<$>), (<$), ($>), (<#>), void
10+ , Functor, (<$>), (<#>), void
1111 , Apply, (<*>)
1212 , Applicative, pure, liftA1
1313 , Bind, (>>=)
@@ -111,8 +111,6 @@ module Prelude
111111 show = showArrayImpl show
112112
113113 infixl 4 <$>
114− infixl 4 <$
115− infixl 4 $>
116114 infixl 1 <#>
117115
118116 class Functor f where
@@ -121,12 +119,6 @@ module Prelude
121119 (<#>) :: forall f a b. (Functor f) => f a -> (a -> b) -> f b
122120 (<#>) fa f = f <$> fa
123121
124− (<$) :: forall f a b. (Functor f) => b -> f a -> f b
125− (<$) b fa = const b <$> fa
126−
127− ($>) :: forall f a b. (Functor f) => f a -> b -> f b
128− ($>) fa b = const b <$> fa
129−
130122 void :: forall f a. (Functor f) => f a -> f Unit
131123 void fa = const unit <$> fa
132124