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