aboutsummaryrefslogtreecommitdiff
path: root/pretyping/reductionops.ml
diff options
context:
space:
mode:
authorpboutill2012-01-31 16:17:14 +0000
committerpboutill2012-01-31 16:17:14 +0000
commitb84b7b86a3fb37761c85cce7d16db962cf623ee4 (patch)
tree2ee2caa34a7bc54d7f0a7b99d8c1f22b3fc49822 /pretyping/reductionops.ml
parent51a2b40567bd48c19c2103f6c19ae39d3215ca86 (diff)
Bug #2041: unfold at betaiotaZETA normalize like unfold
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14952 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/reductionops.ml')
-rw-r--r--pretyping/reductionops.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/reductionops.ml b/pretyping/reductionops.ml
index e8acd67caf..bdb47d6893 100644
--- a/pretyping/reductionops.ml
+++ b/pretyping/reductionops.ml
@@ -527,6 +527,7 @@ let clos_norm_flags flgs env sigma t =
let nf_beta = clos_norm_flags Closure.beta empty_env
let nf_betaiota = clos_norm_flags Closure.betaiota empty_env
+let nf_betaiotazeta = clos_norm_flags Closure.betaiotazeta empty_env
let nf_betadeltaiota env sigma =
clos_norm_flags Closure.betadeltaiota env sigma