diff options
author | Jasper Hugunin <jasperh@cs.washington.edu> | 2017-12-18 21:51:25 +0900 |
---|---|---|
committer | Jasper Hugunin <jasperh@cs.washington.edu> | 2018-01-17 14:59:11 +0900 |
commit | 2d8dcd741d229c4de57ccce9f3ab09b808ccfc94 (patch) | |
tree | 1f1b510add53ed24ffd403a6f1e03f1095dfad5f /test-suite/bugs/opened | |
parent | 8ea2a8307a8d96f8275ebbd9bd4cbd1f6b0a00c6 (diff) |
Let dtauto recognize '@sigT A (fun _ => B)' as a conjunction
Diffstat (limited to 'test-suite/bugs/opened')
-rw-r--r-- | test-suite/bugs/opened/6393.v | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/bugs/opened/6393.v b/test-suite/bugs/opened/6393.v new file mode 100644 index 000000000..8d5d09233 --- /dev/null +++ b/test-suite/bugs/opened/6393.v @@ -0,0 +1,11 @@ +(* These always worked. *) +Goal prod True True. firstorder. Qed. +Goal True -> @sigT True (fun _ => True). firstorder. Qed. +Goal prod True True. dtauto. Qed. +Goal prod True True. tauto. Qed. + +(* These should work. *) +Goal @sigT True (fun _ => True). dtauto. Qed. +(* These should work, but don't *) +(* Goal @sigT True (fun _ => True). firstorder. Qed. *) +(* Goal @sigT True (fun _ => True). tauto. Qed. *) |