disk.rkt
#lang racket/base
(require "sort.rkt")
(provide (all-from-out "sort.rkt"))