Thanks.

#lang racket  ; A picture
(require 2htdp/image)
(let sierpinski ([n 8])
  (if (zero? n)
      (triangle 2 'solid 'red)
      (let ([t (sierpinski (- n 1))])
        (freeze (above t (beside t t))))))


This is a revision. I don't  nkow if it fits, tho. The call to freeze
can be anywhere around the result if that helps at all.

Robby

On Fri, Jan 14, 2011 at 3:34 PM, Eli Barzilay <e...@barzilay.org> wrote:
> 7 minutes ago, Robby Findler wrote:
>> I've wanted to change the front page to change the 2htdp/image
>> example to use 'freeze' (making the program go from exponential to
>> linear in 'n') too, but I've held off until it was in an actually
>> released release.
>
> It's still minor -- so feel free to send me a patch, and I'll remember
> to apply it when needed.  (I'll make myself a reminder to apply it.)
>
> --
>          ((lambda (x) (x x)) (lambda (x) (x x)))          Eli Barzilay:
>                    http://barzilay.org/                   Maze is Life!
>
_________________________________________________
  For list-related administrative tasks:
  http://lists.racket-lang.org/listinfo/dev

Reply via email to