diff --git a/21/main.ml b/21/main.ml
index 78b8513..cd019ea 100644
--- a/21/main.ml
+++ b/21/main.ml
@@ -123,7 +123,6 @@ let init_cache =
   cache
 
 let () =
-  let () = Printexc.record_backtrace true in
   let f = open_in "input.txt" in
   let lines = list_of_lines f in
   let cache = init_cache in
diff --git a/22/main.ml b/22/main.ml
index b904a42..1694880 100644
--- a/22/main.ml
+++ b/22/main.ml
@@ -60,7 +60,6 @@ let decode_index index =
   (index mod 19 - 9, (index / 19) mod 19 - 9, (index / 361) mod 19 - 9, (index / 6859) mod 19 - 9)
 
 let () =
-  let () = Printexc.record_backtrace true in
   let f = open_in "input.txt" in
   let monkey_seeds = list_of_lines f |> List.map int_of_string in
   let result = monkey_seeds
diff --git a/23/main.ml b/23/main.ml
index 9147f9e..fe2b0e0 100644
--- a/23/main.ml
+++ b/23/main.ml
@@ -121,7 +121,6 @@ let rec find_biggest_clique sorted_list_of_lists =
       find_biggest_clique bigger_sets
 
 let () =
-  let () = Printexc.record_backtrace true in
   let f = open_in "input.txt" in
   let computer_pairs = list_of_lines f |> List.map parse_computer_pair in
   let graph = make_graph computer_pairs in