;; import lists/fold.scm lists/tree-sort.scm (define list '(9 5 3 7 0 8 6 5 1 4 2)) (write-line (tree-sort list))
