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