#lang racket (require "hw2.rkt") (define prg '( (define RED "stroke:red") (define GREEN "stroke:green") (define (start x y) (if (< x y) (line 0 0 100 100 RED) (line 0 0 100 100 GREEN) ) ) )) (display (execute 200 200 prg '(start 1 0)))