Commit 9fb4882f authored by Robbert Krebbers's avatar Robbert Krebbers

Strenghen pair_op.

parent 5d2a103d
......@@ -985,8 +985,7 @@ Section prod.
Canonical Structure prodR :=
CMRAT (A * B) prod_cofe_mixin prod_cmra_mixin.
Lemma pair_op (a a' : A) (b b' : B) :
(a, b) (a', b') (a a', b b').
Lemma pair_op (a a' : A) (b b' : B) : (a, b) (a', b') = (a a', b b').
Proof. done. Qed.
Global Instance prod_cmra_total : CMRATotal A CMRATotal B CMRATotal prodR.
......
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