From 15b6c9b6fa268a9af6dd4f05961e469545e92a6f Mon Sep 17 00:00:00 2001 From: Enrico Tassi Date: Mon, 24 Feb 2014 20:46:32 +0100 Subject: Lazyconstr -> Opaqueproof Make this module deal only with opaque proofs. Make discharging/substitution invariant more explicit via a third constructor. --- kernel/mod_subst.mli | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'kernel/mod_subst.mli') diff --git a/kernel/mod_subst.mli b/kernel/mod_subst.mli index ddc05380a..34f10b31a 100644 --- a/kernel/mod_subst.mli +++ b/kernel/mod_subst.mli @@ -152,3 +152,7 @@ val occur_mbid : MBId.t -> substitution -> bool - [Some s, a] when r is a delayed substitution [s] applied to [a] *) val repr_substituted : 'a substituted -> substitution list option * 'a + +val force_constr : Term.constr substituted -> Term.constr +val subst_constr : + substitution -> Term.constr substituted -> Term.constr substituted -- cgit v1.2.3