lists-t-insertion-sort.scm 151 B

123456789
  1. ;; import lists/insertion-sort.scm
  2. (include "test/supporting/insertion-sort.scm")
  3. (define list
  4. '(9 5 3 7 0 8 6 5 1 4 2))
  5. (print (sort-by < list))