anchor.diff:  (defpackage :ptrie
     (:export
       ; Predicates
  -    :branchesp :leafp :wordp
  +    :leafp :only-terminal-p :wordp
       
       ; Init and slots
       :make-trie :trie-key :trie-width :trie-branches
  
positive.code: 
  ;;; Sorting
  
  ;; #|TODO|#
  
  
  ;;; Traversal & printing
  
negative.code:     :add-seq :add-seqs
      :find-key :find-seq
      
      ; Sorting
      :sort-trie :sort-trie-branch
      
      ; Printing
      :pprint-trie :print-words
      
      ; Extras
      :trie-prob :test-trie
      
      *print-pretty* *print-circle*)
    (:use :cl))
  
  (in-package :ptrie)
  