diff options
| author | coqbot-app[bot] | 2020-12-08 16:35:45 +0000 |
|---|---|---|
| committer | GitHub | 2020-12-08 16:35:45 +0000 |
| commit | 6cac4e19e883b798a4439d3a2c0189dafbce82b1 (patch) | |
| tree | 211d96f616ef51e458b3f05aa64b3555ba2d01ce /test-suite | |
| parent | eed93daca185e08a042f26886e30a50b1d60bbac (diff) | |
| parent | f4af5d4b09f262ef6388a2c0eeed85bf9b7ab3f9 (diff) | |
Merge PR #13597: Congruence: don't replace error messages by "congruence failed"
Reviewed-by: ejgallego
Ack-by: PierreCorbineau
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/output/bug_13595.out | 4 | ||||
| -rw-r--r-- | test-suite/output/bug_13595.v | 8 |
2 files changed, 12 insertions, 0 deletions
diff --git a/test-suite/output/bug_13595.out b/test-suite/output/bug_13595.out new file mode 100644 index 0000000000..2423b77b55 --- /dev/null +++ b/test-suite/output/bug_13595.out @@ -0,0 +1,4 @@ +The command has indeed failed with message: +Tactic failure: Goal is solvable by congruence but some arguments are missing. + Try "congruence with ((Triple a _ _)) ((Triple d c _))", + replacing metavariables by arbitrary terms. diff --git a/test-suite/output/bug_13595.v b/test-suite/output/bug_13595.v new file mode 100644 index 0000000000..27a9ebe15d --- /dev/null +++ b/test-suite/output/bug_13595.v @@ -0,0 +1,8 @@ +Inductive Cube:Set :=| Triple: nat -> nat -> nat -> Cube. + +Theorem incomplete :forall a b c d : nat,Triple a = Triple b->Triple d c = Triple d b->a = c. +Proof. + Fail congruence. + intros. + congruence with ((Triple a a a)) ((Triple d c a)). +Qed. |