t-insertion-sort.scm 108 B

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