aboutsummaryrefslogtreecommitdiff
path: root/mathcomp
diff options
context:
space:
mode:
authorLaurence2018-12-11 14:05:20 +0100
committerGitHub2018-12-11 14:05:20 +0100
commitfb590b2927a2677616313fa073eb3ab238082d79 (patch)
treedbea6d09ebd3dc209580986e274b186b2560fb27 /mathcomp
parentb2d25dc356c4a2500d861e7d3eb5a272a3072129 (diff)
parentfb4948fabff8143e1a47e3943cd1fecb75867689 (diff)
Merge pull request #260 from CohenCyril/fix_TFAE
fix TFAE
Diffstat (limited to 'mathcomp')
-rw-r--r--mathcomp/ssreflect/seq.v10
1 files changed, 5 insertions, 5 deletions
diff --git a/mathcomp/ssreflect/seq.v b/mathcomp/ssreflect/seq.v
index 2c9fd64..a574710 100644
--- a/mathcomp/ssreflect/seq.v
+++ b/mathcomp/ssreflect/seq.v
@@ -2800,11 +2800,6 @@ Definition all_iff (P0 : Prop) (Ps : seq Prop) : Prop :=
if Qs is Q :: Qs then all_iff_and (P -> Q) (aux Q Qs)
else P -> P0 : Prop) P0 Ps.
-(* This means "the following are all equivalent: P0, ... Pn" *)
-Notation "[ '<->' P0 ; P1 ; .. ; Pn ]" := (all_iff P0 (P1 :: .. [:: Pn] ..))
- (at level 0, format "[ '<->' '[' P0 ; '/' P1 ; '/' .. ; '/' Pn ']' ]")
- : form_scope.
-
Lemma all_iffLR P0 Ps : all_iff P0 Ps ->
forall m n, nth P0 (P0 :: Ps) m -> nth P0 (P0 :: Ps) n.
Proof.
@@ -2838,6 +2833,11 @@ Arguments all_iffLR {P0 Ps}.
Arguments all_iffP {P0 Ps}.
Coercion all_iffP : all_iff >-> Funclass.
+(* This means "the following are all equivalent: P0, ... Pn" *)
+Notation "[ '<->' P0 ; P1 ; .. ; Pn ]" := (all_iff P0 (P1 :: .. [:: Pn] ..))
+ (at level 0, format "[ '<->' '[' P0 ; '/' P1 ; '/' .. ; '/' Pn ']' ]")
+ : form_scope.
+
Section All2.
Context {T U : Type} (p : T -> U -> bool).