title: Translation of Scheme code for Sierpinski carpet
body: <p>I found code for generating Sierpinski carpet at <a href="http://rosettacode.org/wiki/Sierpinski_carpet#Scheme" rel="nofollow">http://rosettacode.org/wiki/Sierpinski_carpet#Scheme</a> - but it won't run in the DrRacket environment or WeScheme. Could someone provide solutions for either environments?</p>