From 6dccc8f0594923c2cdadede9445e07e83810cdbf Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Tue, 15 Feb 2011 11:20:36 -0500 Subject: [PATCH] 5.1 improvement to sierpinski code from robby, can go live now --- collects/meta/web/www/index.rkt | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/collects/meta/web/www/index.rkt b/collects/meta/web/www/index.rkt index b9762e8840..39af7bcd01 100644 --- a/collects/meta/web/www/index.rkt +++ b/collects/meta/web/www/index.rkt @@ -89,11 +89,11 @@ (graphical-example ; --------------------------------------------- @code{#lang racket ; A picture (require 2htdp/image) - (let sierpinski ([n 6]) + (let sierpinski ([n 8]) (if (zero? n) - (triangle 2 'solid 'red) - (let ([next (sierpinski (- n 1))]) - (above next (beside next next)))))} + (triangle 2 'solid 'red) + (let ([t (sierpinski (- n 1))]) + (above t (beside t t)))))} @desc{The @elemcode{2htdp/image} library provides easy-to-use functions for constructing images, and DrRacket can display an image result as easily as it can display a number result. In this case, a