Mercurial Mercurial > repos > isabelle / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
src/HOL/Library/Tree.thy
changeset 62160 ff20b44b2fc8
parent 61585 a9599d3d7610
child 62202 e5bc7cbb0bcc 
--- a/src/HOL/Library/Tree.thy	Wed Jan 13 00:12:43 2016 +0100
+++ b/src/HOL/Library/Tree.thy	Wed Jan 13 09:38:16 2016 +0100
@@ -7,8 +7,8 @@
 begin
 
 datatype 'a tree =
-  Leaf ("\<langle>\<rangle>") |
-  Node (left: "'a tree") (val: 'a) (right: "'a tree") ("\<langle>_, _, _\<rangle>")
+  is_Leaf: Leaf ("\<langle>\<rangle>") |
+  Node (left: "'a tree") (val: 'a) (right: "'a tree") ("(1\<langle>_,/ _,/ _\<rangle>)")
   where
     "left Leaf = Leaf"
   | "right Leaf = Leaf"
isabelle