max/lean4-htt
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions 2

fix: binder name

Browse source 
Binder names are relevant for the `induction` tactic.
This commit is contained in:
Leonardo de Moura 2021-08-26 11:11:37 -07:00
parent 21a4296ca8
commit cf49e6fe8f
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
src/kernel/quot.cpp
View file

@ -92,7 +92,7 @@ environment environment::add_quot() const {
/* constant {u} quot.ind {α : Sort u} {r : α → α → Prop} {β : @quot.{u} α r → Prop}
: (∀ a : α, β (@quot.mk.{u} α r a)) → ∀ q : @quot.{u} α r, β q */
new_env.add_core(constant_info(quot_val(*quot_consts::g_quot_ind, {u_name},
lctx.mk_pi({alpha, r, beta}, mk_arrow(all_quot, lctx.mk_pi(q, beta_q))), quot_kind::Ind)));
lctx.mk_pi({alpha, r, beta}, mk_pi("mk", all_quot, lctx.mk_pi(q, beta_q))), quot_kind::Ind)));
new_env.mark_quot_initialized();
return new_env;
}