;; import lists/insertion-sort.scm files/words.scm files/count.scm (define file "data/alice-in-wonderland.txt") (define main (for-each write-line (sort-by (comparing < cdr) (with-input-from-file file count-words))))
