sig
  type adjustment_method = HolmBonferroni | BenjaminiHochberg
  val adjust : float array -> Tests.Multiple.adjustment_method -> float array
end