aboutsummaryrefslogtreecommitdiffhomepage
path: root/pretyping/reductionops.mli
diff options
context:
space:
mode:
authorGravatar Matej Kosik <m4tej.kosik@gmail.com>2016-01-11 12:34:30 +0100
committerGravatar Matej Kosik <m4tej.kosik@gmail.com>2016-01-11 12:34:30 +0100
commit78bad016e389cd78635d40281bfefd7136733b7e (patch)
tree51f90da34d2444734868d7954412ac08ddc0f5c6 /pretyping/reductionops.mli
parentf8eb2ed4ddbe2199187696f51c42734014f4d9d0 (diff)
parent9d991d36c07efbb6428e277573bd43f6d56788fc (diff)
merge
Diffstat (limited to 'pretyping/reductionops.mli')
-rw-r--r--pretyping/reductionops.mli7
1 files changed, 3 insertions, 4 deletions
diff --git a/pretyping/reductionops.mli b/pretyping/reductionops.mli
index 30c7ded24..55bce2308 100644
--- a/pretyping/reductionops.mli
+++ b/pretyping/reductionops.mli
@@ -8,7 +8,6 @@
open Names
open Term
-open Context
open Univ
open Evd
open Environ
@@ -218,10 +217,10 @@ val splay_prod : env -> evar_map -> constr -> (Name.t * constr) list * constr
val splay_lam : env -> evar_map -> constr -> (Name.t * constr) list * constr
val splay_arity : env -> evar_map -> constr -> (Name.t * constr) list * sorts
val sort_of_arity : env -> evar_map -> constr -> sorts
-val splay_prod_n : env -> evar_map -> int -> constr -> rel_context * constr
-val splay_lam_n : env -> evar_map -> int -> constr -> rel_context * constr
+val splay_prod_n : env -> evar_map -> int -> constr -> Context.Rel.t * constr
+val splay_lam_n : env -> evar_map -> int -> constr -> Context.Rel.t * constr
val splay_prod_assum :
- env -> evar_map -> constr -> rel_context * constr
+ env -> evar_map -> constr -> Context.Rel.t * constr
type 'a miota_args = {
mP : constr; (** the result type *)