aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/success/Inversion.v2
-rw-r--r--test-suite/success/autointros.v4
-rw-r--r--test-suite/success/destruct.v2
3 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/success/Inversion.v b/test-suite/success/Inversion.v
index e8a68c11db..5091b44c1c 100644
--- a/test-suite/success/Inversion.v
+++ b/test-suite/success/Inversion.v
@@ -115,7 +115,7 @@ inversion H.
Fixpoint prodn (n : nat) :=
match n with
- | O => unit
+ | O => unit
| (S m) => prod (prodn m) nat
end.
diff --git a/test-suite/success/autointros.v b/test-suite/success/autointros.v
index 71054e1415..0a0812711c 100644
--- a/test-suite/success/autointros.v
+++ b/test-suite/success/autointros.v
@@ -9,7 +9,7 @@ with odd : nat -> Prop :=
Lemma foo {n : nat} (E : even n) : even (S (S n))
with bar {n : nat} (O : odd n) : odd (S (S n)).
-Proof. destruct E. constructor. constructor. apply even_odd. apply (bar _ H).
- destruct O. repeat constructor. apply odd_even. apply (foo _ H).
+Proof. destruct E. constructor. constructor. apply even_odd. apply (bar _ H).
+ destruct O. repeat constructor. apply odd_even. apply (foo _ H).
Defined.
diff --git a/test-suite/success/destruct.v b/test-suite/success/destruct.v
index 7adcc8de30..8013e1d38e 100644
--- a/test-suite/success/destruct.v
+++ b/test-suite/success/destruct.v
@@ -67,7 +67,7 @@ Abort.
Variable A0:Type.
Variable P:A0->Type.
Require Import JMeq.
-Goal forall a b (p:P a) (q:P b),
+Goal forall a b (p:P a) (q:P b),
forall H:a = b, eq_rect a P p b H = q -> JMeq (existT _ a p) (existT _ b q).
intros.
destruct H.