sig external set_seed : int -> int -> unit = "camlidl_r_set_seed" external qerlang : float -> int -> float -> bool -> float = "camlidl_r_qerlang" external rerlang : int -> float -> float = "camlidl_r_rerlang" end