sig
  exception Invalid_degree of string
  type probability =
      [ `p0_01
      | `p0_02
      | `p0_05
      | `p0_1
      | `p0_15
      | `p0_2
      | `p0_25
      | `p0_3
      | `p0_4
      | `p0_5
      | `p0_6
      | `p0_7
      | `p0_75
      | `p0_8
      | `p0_85
      | `p0_9
      | `p0_95
      | `p0_975
      | `p0_98
      | `p0_99
      | `p0_999 ]
  val probabilities : Squantiles.Chi_deux.probability list
  val string_of_probability : Squantiles.Chi_deux.probability -> string
  val quantile_of_freedom_degree :
    ?p:Squantiles.Chi_deux.probability -> int -> float
  exception Out_of_table of string
  val probability_of_quantile :
    int -> float -> Squantiles.Chi_deux.probability
end