sig
  module Chi_deux :
    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
end