More recent additions, some exercises and huffman encoding chapter
This commit is contained in:
		@@ -108,5 +108,7 @@
 | 
			
		||||
    ((null s1) s2)
 | 
			
		||||
    ((null s2) s1)
 | 
			
		||||
    (t (union-set-tree (union-set-tree (btree-left s1) (btree-right s2))
 | 
			
		||||
		       (adjoin-set-tree s2 (btree-elt s1))))))
 | 
			
		||||
		  s     (adjoin-set-tree s2 (btree-elt s1))))))
 | 
			
		||||
;; yeah, okay. this looks good enough, didn't test it at all, but whatevs.
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user