compalg.rkt cleanup
compalg.rkt cleanup