sig
  val initialize : unit -> unit
  val sys_rng : string
  val reseed : ?bytes:int -> ?device:string -> Nocrypto.Rng.g -> unit
end