diff options
author | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 13:29:45 +0000 |
---|---|---|
committer | barras <barras@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2002-03-04 13:29:45 +0000 |
commit | 6274447373e7dc69234da3415f8d9c4d4b67ced2 (patch) | |
tree | c2190c4f3ee24b87e49cec5927d02a77272ba42e /pretyping/termops.mli | |
parent | 9935f0d7ab63d31f7a4a8c05d90627dff41dabf8 (diff) |
Nouveau Rewrite-in plus economique
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2507 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/termops.mli')
-rw-r--r-- | pretyping/termops.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pretyping/termops.mli b/pretyping/termops.mli index 1bb74a303..c45b1b016 100644 --- a/pretyping/termops.mli +++ b/pretyping/termops.mli @@ -76,6 +76,9 @@ val subst_meta : (int * constr) list -> constr -> constr val whd_locals : env -> constr -> constr val nf_locals : env -> constr -> constr +(* [pop c] lifts by -1 the positive indexes in [c] *) +val pop : constr -> constr + (* substitution of an arbitrary large term. Uses equality modulo reduction of let *) val dependent : constr -> constr -> bool |