do-generate.rkt
#lang racket/base

(require "generate.rkt"
         racket/cmdline)

(command-line
 #:args (filename)
 (generate filename))