diff options
author | 2015-01-25 14:42:51 +0100 | |
---|---|---|
committer | 2015-01-25 14:42:51 +0100 | |
commit | 7cfc4e5146be5666419451bdd516f1f3f264d24a (patch) | |
tree | e4197645da03dc3c7cc84e434cc31d0a0cca7056 /test-suite/bugs/closed/shouldsucceed/2089.v | |
parent | 420f78b2caeaaddc6fe484565b2d0e49c66888e5 (diff) |
Imported Upstream version 8.5~beta1+dfsg
Diffstat (limited to 'test-suite/bugs/closed/shouldsucceed/2089.v')
-rw-r--r-- | test-suite/bugs/closed/shouldsucceed/2089.v | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/test-suite/bugs/closed/shouldsucceed/2089.v b/test-suite/bugs/closed/shouldsucceed/2089.v deleted file mode 100644 index aebccc94..00000000 --- a/test-suite/bugs/closed/shouldsucceed/2089.v +++ /dev/null @@ -1,17 +0,0 @@ -Inductive even (x: nat): nat -> Prop := - | even_base: even x O - | even_succ: forall n, odd x n -> even x (S n) - -with odd (x: nat): nat -> Prop := - | odd_succ: forall n, even x n -> odd x (S n). - -Scheme even_ind2 := Minimality for even Sort Prop - with odd_ind2 := Minimality for odd Sort Prop. - -Combined Scheme even_odd_ind from even_ind2, odd_ind2. - -Check (even_odd_ind :forall (x : nat) (P P0 : nat -> Prop), - P 0 -> - (forall n : nat, odd x n -> P0 n -> P (S n)) -> - (forall n : nat, even x n -> P n -> P0 (S n)) -> - (forall n : nat, even x n -> P n) /\ (forall n : nat, odd x n -> P0 n)). |