Skip to content
Snippets Groups Projects
Commit 610ed564 authored by Robbert Krebbers's avatar Robbert Krebbers
Browse files

Tweak priority of proof mode instances for £.

This closes issue #470.
parent 2f866db4
No related branches found
No related tags found
No related merge requests found
...@@ -106,23 +106,23 @@ Section later_credit_theory. ...@@ -106,23 +106,23 @@ Section later_credit_theory.
Qed. Qed.
Global Instance from_sep_lc_add n m : Global Instance from_sep_lc_add n m :
FromSep (£ (n + m)) (£ n) (£ m). FromSep (£ (n + m)) (£ n) (£ m) | 0.
Proof. Proof.
by rewrite /FromSep lc_split. by rewrite /FromSep lc_split.
Qed. Qed.
Global Instance from_sep_lc_S n : Global Instance from_sep_lc_S n :
FromSep (£ (S n)) (£ 1) (£ n). FromSep (£ (S n)) (£ 1) (£ n) | 1.
Proof. Proof.
by rewrite /FromSep (lc_succ n). by rewrite /FromSep (lc_succ n).
Qed. Qed.
Global Instance into_sep_lc_add n m : Global Instance into_sep_lc_add n m :
IntoSep (£ (n + m)) (£ n) (£ m). IntoSep (£ (n + m)) (£ n) (£ m) | 0.
Proof. Proof.
by rewrite /IntoSep lc_split. by rewrite /IntoSep lc_split.
Qed. Qed.
Global Instance into_sep_lc_S n : Global Instance into_sep_lc_S n :
IntoSep (£ (S n)) (£ 1) (£ n). IntoSep (£ (S n)) (£ 1) (£ n) | 1.
Proof. Proof.
by rewrite /IntoSep (lc_succ n). by rewrite /IntoSep (lc_succ n).
Qed. Qed.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment