Graph.Fixpoint
module type G = sig ... end
type direction =
| Forward
| Backward
module type Analysis = sig ... end
module Make (G : G) (A : sig ... end) : sig ... end