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

doc(library/init/meta/mk_dec_eq_instance): missing documentation

Browse source
This commit is contained in:
Leonardo de Moura 2016-07-20 20:30:02 -04:00
parent 0163c1aa5b
commit 9beacebf33
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
library/init/meta/mk_dec_eq_instance.lean
View file

@ -61,9 +61,10 @@ private meta_definition mk_rec_inst_aux : expr → nat → tactic expr
F' ← mk_app ("prod" <.> "pr2") [F],
mk_rec_inst_aux F' n
private meta_definition mk_rec_inst (F_name : name) (num_rec : nat) : tactic expr :=
/- Use brec_on F_name (dictionary) argument to create an decidable_eq instance for (i+1)-th recursive argument. -/
private meta_definition mk_rec_inst (F_name : name) (i : nat) : tactic expr :=
do F ← get_local F_name,
mk_rec_inst_aux F num_rec
mk_rec_inst_aux F i
/- Target is of the form (decidable (C ... = C ...)) where C is a constructor -/
private meta_definition dec_eq_same_constructor (I_name : name) (F_name : name) (num_rec : nat) : tactic unit :=