Triangoli+di+Sierpinski



per triangolosierp :dim :min se :dim < :min [stop] ripeti 3 [a :dim d 120 triangolosierp :dim/2 :min] fine

tarta.apparecchia sfondonero spessore 1 rosso1 cominciaxy -200 -200 asdir 30 spessore 2 triangolosierp 400 20 nastarta tarta.primo.piano sfondo.conserva.come "Sierpinski.400.20