diff --git a/src/binary_formats.ml b/src/binary_formats.ml
index 38900c29..a2d31e35 100644
--- a/src/binary_formats.ml
+++ b/src/binary_formats.ml
@@ -12,7 +12,7 @@ let int64_size = 8
 module Time = struct
   module Absolute = struct
     type t = { timestamp_us: int64 }
-    type tNbo = { abs_value_us__: int64 }
+    type t_nbo = { abs_value_us__: int64 }
 
     let size = int64_size
 
@@ -32,7 +32,7 @@ module Time = struct
 
   module Relative = struct
     type t = { timestamp_us: int64 }
-    type tNbo = { relValue_us__: int64 }
+    type t_nbo = { rel_value_us__: int64 }
 
     let size = int64_size
 
@@ -44,8 +44,8 @@ module Time = struct
 
     let nboBin =
       let open Bin in
-      record (fun relValue_us__ -> { relValue_us__ })
-      |+ field beint64 (fun t -> t.relValue_us__)
+      record (fun rel_value_us__ -> { rel_value_us__ })
+      |+ field beint64 (fun t -> t.rel_value_us__)
       |> sealr
   end
 end