Module AcyclicGraph

type constraint_type =
| Lt
| Le
| Eq
module type Point = sig ... end
module Make : functor (Point : Point) -> sig ... end