Commit 82d4b448 authored by Robbert Krebbers's avatar Robbert Krebbers

Lemma for validity of Some.

parent f82111d2
......@@ -72,6 +72,7 @@ Instance option_op : Op (option A) := union_with (λ x y, Some (x ⋅ y)).
Instance option_minus : Minus (option A) :=
difference_with (λ x y, Some (x y)).
Definition Some_valid a : Some a a := reflexivity _.
Definition Some_op a b : Some (a b) = Some a Some b := eq_refl.
Lemma option_included (mx my : option A) :
......
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