]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/library/didactic/exercises/duality.ma
- notation (possibly affecting all .ma files):
[helm.git] / matita / matita / library / didactic / exercises / duality.ma
index 14927653e2a08093452ebe02c5dd7ce1cab1a335..f967a416bbf6667be79abc105a0e60e3c1fd242e 100644 (file)
@@ -219,7 +219,7 @@ let rec negate (F: Formula) on F : Formula ≝
 *)
 definition equiv ≝ λF1,F2. ∀v.[[ F1 ]]v = [[ F2 ]]v.
 notation "hvbox(a \nbsp break mstyle color #0000ff (≡) \nbsp b)"  non associative with precedence 45 for @{ 'equivF $a $b }.
-notation > "a ≡ b" non associative with precedence 50 for @{ equiv $a $b }.
+notation > "a ≡ b" non associative with precedence 55 for @{ equiv $a $b }.
 interpretation "equivalence for Formulas" 'equivF a b = (equiv a b).
 lemma equiv_rewrite : ∀F1,F2,F3. F1 ≡ F2 → F1 ≡ F3 → F2 ≡ F3. intros; intro; rewrite < H; rewrite < H1; reflexivity. qed.
 lemma equiv_sym : ∀a,b.a ≡ b → b ≡ a. intros 4;symmetry;apply H;qed.