Commit fa8a02f2 authored by Robbert Krebbers's avatar Robbert Krebbers

Permutation Proper instance for `omap` on lists.

parent 56fe186d
......@@ -3133,6 +3133,10 @@ Proof.
- apply IH. intros. eapply Hunique; rewrite ?elem_of_cons; eauto.
Global Instance omap_Permutation {A B} (f : A → option B) :
Proper ((≡ₚ) ==> (≡ₚ)) (omap f).
Proof. induction 1; simpl; repeat case_match; econstructor; eauto. Qed.
Section bind.
Context {A B : Type} (f : A → list B).
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment