diff options
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). |