diff --git a/bin/main.ml b/bin/main.ml
index 6772f9e..5f50693 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -1,19 +1,3 @@
 open Dnstoy
 
-let print = function
-  | Some value -> print_endline (Utils.get_bytecode value)
-  | None -> print_endline "No IP found"
-;;
-
-let () =
-  let response = Network.send_request "8.8.8.8" "www.mylloon.fr" Types.DNSType.a in
-  print_endline (Utils.get_bytecode response);
-  let dns_packet = Response.parse_dns_packet response in
-  print_endline (Debug.dns_packet dns_packet);
-  print (Network.lookup_domain "example.com");
-  print (Network.lookup_domain "recurse.com");
-  print (Network.lookup_domain "www.metafilter.com");
-  List.iter
-    (fun e -> print_endline (Debug.dns_record e))
-    (Network.send "8.8.8.8" "example.com" 16).answers
-;;
+let () = print_endline (Network.resolve "www.mylloon.fr" Types.DNSType.a)