Skip to content
Snippets Groups Projects
Commit 7f97e384 authored by Herman Bergwerf's avatar Herman Bergwerf
Browse files

Remove unused names.

parent 123bd34a
No related branches found
No related tags found
No related merge requests found
Pipeline #78821 failed
......@@ -4233,7 +4233,7 @@ Section bind.
Proof.
intros inj Hf Hl; induction l; cbn; [constructor|inversion_clear Hl].
apply NoDup_app; repeat split; auto; intros b H1 H2.
apply elem_of_list_bind in H2 as (a' & H3 & H4).
apply elem_of_list_bind in H2 as (a'&?&?).
apply (inj a a') in H1; subst; done.
Qed.
End bind.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment