28 lines
		
	
	
		
			909 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			28 lines
		
	
	
		
			909 B
		
	
	
	
		
			Factor
		
	
	
USING: help.syntax help.markup trees.avl assocs ;
 | 
						|
 | 
						|
HELP: AVL{
 | 
						|
{ $syntax "AVL{ { key value }... }" }
 | 
						|
{ $values { "key" "a key" } { "value" "a value" } }
 | 
						|
{ $description "Literal syntax for an AVL tree." } ;
 | 
						|
 | 
						|
HELP: <avl>
 | 
						|
{ $values { "tree" avl } }
 | 
						|
{ $description "Creates an empty AVL tree" } ;
 | 
						|
 | 
						|
HELP: >avl
 | 
						|
{ $values { "assoc" assoc } { "avl" avl } }
 | 
						|
{ $description "Converts any " { $link assoc } " into an AVL tree." } ;
 | 
						|
 | 
						|
HELP: avl
 | 
						|
{ $class-description "This is the class for AVL trees. These conform to the assoc protocol and have efficient (logarithmic time) storage and retrieval operations." } ;
 | 
						|
 | 
						|
ARTICLE: { "avl" "intro" } "AVL trees"
 | 
						|
"This is a library for AVL trees, with logarithmic time storage and retrieval operations. These trees conform to the assoc protocol."
 | 
						|
{ $subsection avl }
 | 
						|
{ $subsection <avl> }
 | 
						|
{ $subsection >avl }
 | 
						|
{ $subsection POSTPONE: AVL{ } ;
 | 
						|
 | 
						|
IN: trees.avl
 | 
						|
ABOUT: { "avl" "intro" }
 |