diff --git a/lib/ast.ml b/lib/ast.ml
index c954c1d..0319ca7 100644
--- a/lib/ast.ml
+++ b/lib/ast.ml
@@ -60,6 +60,8 @@ let reduce init f =
     | _ -> invalid_arg "cannot reduce over non-list!"
   in aux init
 
+
+
 let rec dbg_print_one v =
   let pf = Printf.sprintf in
   match v with