#lang scheme/base (provide (all-defined-out)) (define total-width 800) (define before-and-after-image-width 18) (define graph-height 200) (define graphs-width (- 800 (* 2 before-and-after-image-width)))