- Return the color point of a conflict.
  colorPoint :: Conflict -> ColorPoint.ColorPoint
  colorPoint (HorizontalConflict cp _) = cp

colorPoint :: Conflict -> ColorPoint.ColorPoint
colorPoint (HorizontalConflict cp _) = cp
colorPoint (HorizontalConflict cp _) = cp