post-rebase fix

This commit is contained in:
Simon Cruanes 2021-06-11 21:55:44 -04:00
parent 6a9dbb8440
commit 899ea67188

View file

@ -630,7 +630,7 @@ module type SOLVER_INTERNAL = sig
and if [t] is [app "+" (const x) (const y)] where [x] and [y] are number,
returns [Some (const (x+y))], and [None] otherwise. *)
val normalize : t -> term -> term
val normalize : t -> term -> (term * P.t) option
(** Normalize a term using all the hooks. This performs
a fixpoint, i.e. it only stops when no hook applies anywhere inside
the term. *)