sig
  val plus : int -> int -> int
  val plusplus : int -> int -> int -> int -> int
  val moins : int -> int -> int
  val terme_geometrique : float -> int -> float -> float
  val int_pow : int -> float -> float
  val gain : int -> float
  val gain_reel : float -> float
  val gain_rapide : int -> float
  val gain_rapide_reel : float -> float
  val antigain : int -> float
  val antigain_reel : float -> float
  val antigain_rapide : int -> float
  val antigain_rapide_reel : float -> float
  val antigain_lent : int -> float
  val antigain_lent_reel : float -> float
  val gain_median : float
  val angle : float -> float
  val repartition : int -> float array
  val trirepartition : int -> float array
  val etat :
    float array ->
    int array ->
    int array array ->
    float array array -> float array array -> float array -> unit
end