diff --git a/src/Transformable.hs b/src/Transformable.hs
index 335b477..a99491d 100644
--- a/src/Transformable.hs
+++ b/src/Transformable.hs
@@ -36,8 +36,8 @@ instance Transformable TransformMap where
   transform = (*.*)
 
 (><) :: (Transform t, Transformable a) => t -> a -> a
-t >< a = transform (toMap t) a
+(><) = transform . toMap
 
 (>:<) :: (ReversibleTransform t, Transformable a) => t -> a -> a
-t >:< a = transform (toMap' t) a
+(>:<) = transform . toMap'