diff options
| author | affeldt-aist | 2020-04-10 15:31:34 +0200 |
|---|---|---|
| committer | GitHub | 2020-04-10 15:31:34 +0200 |
| commit | bdb7ba0daeb2ea8487dfc12578a2d69f44a39751 (patch) | |
| tree | e16111e1a759416906f84557c7a7e5f940616bb1 /mathcomp/test_suite | |
| parent | 74089ef84dca48c11cae79f7f49a7060160c0000 (diff) | |
| parent | b4673a3f6d06a4ff38789fd82f33dd517186eb44 (diff) | |
Merge pull request #471 from math-comp/all2_guard_cond
Make `all2` better wrt the guard condition
Diffstat (limited to 'mathcomp/test_suite')
| -rw-r--r-- | mathcomp/test_suite/test_guard.v | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/mathcomp/test_suite/test_guard.v b/mathcomp/test_suite/test_guard.v new file mode 100644 index 0000000..1e93a2c --- /dev/null +++ b/mathcomp/test_suite/test_guard.v @@ -0,0 +1,6 @@ +From mathcomp Require Import all_ssreflect. + +Inductive tree := Node { children : seq tree }. + +Fixpoint eq_tree (x y : tree) {struct x} : bool := + all2 eq_tree (children x) (children y). |
