From 7a6054e2ba9f0c2441968eae68aff729c8de364e Mon Sep 17 00:00:00 2001 From: Matthias Felleisen Date: Fri, 28 Dec 2012 10:00:13 -0500 Subject: [PATCH] make first interaction more BSL-ish --- collects/teachpack/2htdp/scribblings/image-guide.scrbl | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/collects/teachpack/2htdp/scribblings/image-guide.scrbl b/collects/teachpack/2htdp/scribblings/image-guide.scrbl index 0159931679..82243041dc 100644 --- a/collects/teachpack/2htdp/scribblings/image-guide.scrbl +++ b/collects/teachpack/2htdp/scribblings/image-guide.scrbl @@ -163,9 +163,12 @@ This kind of rectangle is useful when putting rectangles next to each other and avoiding extra thick lines on the interior. For example, consider building a grid like this: -@image-interaction[(let* ([s (rectangle 20 20 "outline" "black")] - [r (beside s s s s s s)]) - (above r r r r r r))] +@image-interaction[ +(define s (square 20 'outline 'black)) +(define r (beside s s s s s s s s s s)) +(define q (above r r r r r r r r r r)) +q +] The reason interior lines in this grid are the same thickness as the lines around the edge is because the rectangles overlap with each other.