diff --git a/theories/base.v b/theories/base.v index 7b5ae81c80bc5ae7ce2c5b53fa22ae3193312976..78af51fb72d6f289b49a381d41c0d6def62da1cb 100644 --- a/theories/base.v +++ b/theories/base.v @@ -642,12 +642,12 @@ Class SubsetEq A := subseteq: relation A. Instance: Params (@subseteq) 2. Infix "⊆" := subseteq (at level 70) : C_scope. Notation "(⊆)" := subseteq (only parsing) : C_scope. -Notation "( X ⊆ )" := (subseteq X) (only parsing) : C_scope. -Notation "( ⊆ X )" := (λ Y, Y ⊆ X) (only parsing) : C_scope. +Notation "( X ⊆)" := (subseteq X) (only parsing) : C_scope. +Notation "(⊆ X )" := (λ Y, Y ⊆ X) (only parsing) : C_scope. Notation "X ⊈ Y" := (¬X ⊆ Y) (at level 70) : C_scope. Notation "(⊈)" := (λ X Y, X ⊈ Y) (only parsing) : C_scope. -Notation "( X ⊈ )" := (λ Y, X ⊈ Y) (only parsing) : C_scope. -Notation "( ⊈ X )" := (λ Y, Y ⊈ X) (only parsing) : C_scope. +Notation "( X ⊈)" := (λ Y, X ⊈ Y) (only parsing) : C_scope. +Notation "(⊈ X )" := (λ Y, Y ⊈ X) (only parsing) : C_scope. Infix "⊆*" := (Forall2 (⊆)) (at level 70) : C_scope. Notation "(⊆*)" := (Forall2 (⊆)) (only parsing) : C_scope. Infix "⊆**" := (Forall2 (⊆*)) (at level 70) : C_scope. @@ -662,12 +662,12 @@ Hint Extern 0 (_ ⊆** _) => reflexivity. Infix "⊂" := (strict (⊆)) (at level 70) : C_scope. Notation "(⊂)" := (strict (⊆)) (only parsing) : C_scope. -Notation "( X ⊂ )" := (strict (⊆) X) (only parsing) : C_scope. -Notation "( ⊂ X )" := (λ Y, Y ⊂ X) (only parsing) : C_scope. -Notation "X ⊄ Y" := (¬X ⊂ Y) (at level 70) : C_scope. +Notation "( X ⊂)" := (strict (⊆) X) (only parsing) : C_scope. +Notation "(⊂ X )" := (λ Y, Y ⊂ X) (only parsing) : C_scope. +Notation "X ⊄ Y" := (¬X ⊂ Y) (at level 70) : C_scope. Notation "(⊄)" := (λ X Y, X ⊄ Y) (only parsing) : C_scope. -Notation "( X ⊄ )" := (λ Y, X ⊄ Y) (only parsing) : C_scope. -Notation "( ⊄ X )" := (λ Y, Y ⊄ X) (only parsing) : C_scope. +Notation "( X ⊄)" := (λ Y, X ⊄ Y) (only parsing) : C_scope. +Notation "(⊄ X )" := (λ Y, Y ⊄ X) (only parsing) : C_scope. Notation "X ⊆ Y ⊆ Z" := (X ⊆ Y ∧ Y ⊆ Z) (at level 70, Y at next level) : C_scope. Notation "X ⊆ Y ⊂ Z" := (X ⊆ Y ∧ Y ⊂ Z) (at level 70, Y at next level) : C_scope.