module Bound:iterative deepening boundsig..end
typeconfig =Config.config
typeliteral =Term.literal
typechoice_point =State.choice_point
typesubst =Subst.subst
typecomplexity =int
Flags.opt_iterative_deepening).class type bound =object..end
val create : inc:bool -> config -> boundbound object with the initial bound given in Config.deepening_bound.
if inc is true, Bound.bound.restart always increases the bound by 1,
otherwise as described in Bound.bound.restartval create_BS : config -> boundbound object specialized for the BS class (function free terms)
using term depth as the complexity.
that is, all terms are known to be of term depth 2,
so in essence no bound checks need to be performed at all.