sig
  val firing_interval : float -> float -> int -> float * float
  val random_firing_time : float -> int -> float
  val round_float : float -> float
  val int_of_fi : float * float -> int * int
  val round_fi_closest : float * float -> int * int
  val round_fi_ex : float * float -> int * int
  val round_fi_in : float * float -> int * int
  val zoom_fi : float -> float * float -> float * float
  val rsa_of_firinginterval : float * float -> float -> float * int
end