diff --git a/model.ml b/model.ml
index 8fc7eb5e6e5fa2e3e858c2a4198d5974f56a2920..a9d8bdc92ccec9ad1292f01c8a5af4744610265c 100644
--- a/model.ml
+++ b/model.ml
@@ -180,6 +180,7 @@ let retrieve_nnet_metadata filename =
 
 let build ~filename =
   let open Result in
+  Logs.info (fun m -> m "Checking format of model file `%s'." filename);
   if Sys.file_exists filename
   then
     begin
@@ -189,6 +190,9 @@ let build ~filename =
         retrieve_nnet_metadata filename >>= fun nnet ->
         Ok (Nnet nnet)
     end >>= fun format ->
+    Logs.info (fun m ->
+        m "Model format recognized as `%s'."
+          (match format with Onnx -> "ONNX" | Nnet _ -> "NNet"));
     Ok { format; filename }
   else
     Error (Format.sprintf "No such file `%s'." filename)