diff --git a/src/misc/roseTree.ml b/src/misc/roseTree.ml
index f78670c2..5b69cf30 100644
--- a/src/misc/roseTree.ml
+++ b/src/misc/roseTree.ml
@@ -110,7 +110,7 @@ module Zipper = struct
     | last_left::tail_rev_lefts ->
       Some {
         tree = last_left ;
-        lefts = tail_rev_lefts |> List.rev ;
+        lefts = List.rev tail_rev_lefts;
         rights = zipper.tree::zipper.rights ;
         parents = zipper.parents
       }
diff --git a/tests/test_RoseTree.ml b/tests/test_RoseTree.ml
index c967d8c1..36e4c735 100644
--- a/tests/test_RoseTree.ml
+++ b/tests/test_RoseTree.ml
@@ -1,5 +1,7 @@
-open Containers_misc
 open OUnit
+open CCFun
+
+module RoseTree = Containers_misc.RoseTree
 
 let format_node = Format.pp_print_int