# HG changeset patch # User paulson # Date 1596537903 -3600 # Node ID 3f8e6c0166ac0d644640f76f6b9e3fa3b55e8be8 # Parent 2030eacf3a723dda2d94b6da8e43fcf4bda1ff7d# Parent b6065cbbf5e29aa281122f2f40d0c980c9cf1641 merged diff -r b6065cbbf5e2 -r 3f8e6c0166ac src/HOL/Data_Structures/Tree2.thy --- a/src/HOL/Data_Structures/Tree2.thy Mon Aug 03 11:46:19 2020 +0100 +++ b/src/HOL/Data_Structures/Tree2.thy Tue Aug 04 11:45:03 2020 +0100 @@ -36,4 +36,7 @@ lemma set_inorder[simp]: "set (inorder t) = set_tree t" by (induction t) auto +lemma length_inorder[simp]: "length (inorder t) = size t" +by (induction t) auto + end