diff options
| author | Gaëtan Gilbert | 2020-12-08 10:33:42 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2020-12-08 10:33:42 +0100 |
| commit | f4af5d4b09f262ef6388a2c0eeed85bf9b7ab3f9 (patch) | |
| tree | b2ec6bdef7f4642b2ff04ecd4176938a05a4cbbf /test-suite/output | |
| parent | bec752e2c354ad0cf939f875586a4db2189bd471 (diff) | |
Congruence: don't replace error messages by "congruence failed"
Fix #13595
Diffstat (limited to 'test-suite/output')
| -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. |