val prng : Random.State.t option Pervasives.ref
val temp_file_name : string ‑> string ‑> string
val open_temp_file : ?perm:int ‑> string ‑> string ‑> string * Pervasives.out_channel