Remove Kleisli composition (not used anymore)

src/Core/Core.idr

@@ -455,16 +455,6 @@ export %inline
 pure : a -> Core a
 pure x = MkCore (pure (pure x))
 
-infixr 1 <=<
-
--- Right-to-left Kleisli composition of monads (specialised)
-export %inline
-(<=<) : (b -> Core c) -> (a -> Core b) -> (a -> Core c)
-(<=<) g f x
-    = do y <- f x
-         z <- g y
-         pure z
-
 export
 (<*>) : Core (a -> b) -> Core a -> Core b
 (<*>) (MkCore f) (MkCore a) = MkCore [| f <*> a |]

src/TTImp/Elab/Record.idr

@@ -284,7 +284,6 @@ elabInstance env fc n fs
                Nothing => def
                (Just x) => pure x
 
-
     subsetOf : forall a. Eq a => List a -> List a -> Bool
     subsetOf subset set = length (intersect subset set) == length subset