Settle.Make
module A : sig ... end
module CST : sig ... end
module DCST : sig ... end
val settle : (DCST.dcst * A.state * A.terminal) -> CST.cst option