doc-src/Tutorial/Datatype/triesels
author berghofe
Mon, 03 Feb 2003 11:06:06 +0100
changeset 13800 16136d2da0db
parent 5851 15ce4c1c8313
permissions -rw-r--r--
Moved find_intros_goal from goals.ML to pure_thy.ML
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
5851
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     1
consts value :: ('a,'v)trie => 'v option
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     2
       alist :: "('a,'v)trie => ('a * ('a,'v)trie)list"
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     3
primrec "value(Trie ov al) = ov"
15ce4c1c8313 New section on advanced datatypes.
nipkow
parents:
diff changeset
     4
primrec "alist(Trie ov al) = al"