module Header: sig .. end
sig
end
type 'a t
'a
val create : tag:'a -> version:int -> 'a t
tag:'a -> version:int -> 'a t