(require racket/system)
(void (system "mzc -k all.ss"))