sig val v_badness : float -> Box.box array -> int -> Box.parameters -> float -> Box.box array -> int -> Box.parameters -> float -> float val h_badness : Box.box array array -> float -> Box.line -> float -> float end