open Int64

external random_seek                                    : int -> unit                                = "nr_random_seek"
external random_float                                   : unit -> float                              = "nr_random_float"
external random_int64                                   : unit -> int64                              = "nr_random_int64"