Commit db003ba1 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

More rules and derived rules for the logic.

parent 1e2d180b
This diff is collapsed.
...@@ -83,6 +83,8 @@ Proof. rewrite (commutative _ x); apply ra_valid_op_l. Qed. ...@@ -83,6 +83,8 @@ Proof. rewrite (commutative _ x); apply ra_valid_op_l. Qed.
(** ** Units *) (** ** Units *)
Lemma ra_unit_r x : x unit x x. Lemma ra_unit_r x : x unit x x.
Proof. by rewrite (commutative _ x), ra_unit_l. Qed. Proof. by rewrite (commutative _ x), ra_unit_l. Qed.
Lemma ra_unit_unit x : unit x unit x unit x.
Proof. by rewrite <-(ra_unit_idempotent x) at 2; rewrite ra_unit_r. Qed.
(** ** Order *) (** ** Order *)
Lemma ra_included_spec x y : x y z, y x z. Lemma ra_included_spec x y : x y z, y x z.
......
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