Scheme Turtle 3

Aus ProgrammingWiki

Archivierte Version vom 2010-01-03T09:44:16+00:00. Aktuelle Version

Klassischer Binärbaum mit geklonten Turtles

In diesem Beispiel entsteht der gleiche Baum wie im vorhergehenden. Allerdings wird die jeweils aktive Turtle an jeder Verzweigungsstelle geklont. D.h. der am Stammende jeweils links bzw. recht ansetzende Teilbaum wird von je einer neuen Turtle gezeichnet. Die agierenden Turtles entstehen durch Klonen der Turtle, die den Stamm des betreffenden Baums gezeichnet hat.

(define tree
 (lambda(side turtle) 
  (cond 
    ((< side 20) #t)
    (else  
      (penwidth turtle (+ (/ side 10) 1 ))    
      (forward turtle side)  
      (left turtle 45)  
      (tree (/ side 2) (clone turtle))  
      (right turtle 90)  
      (tree (/ side 2) (clone turtle))  
      (left turtle 45)  
      (backward turtle side)))))

<eval id="4b4062e1c4f96"> (clear canvas) (move turtle 200 190) (tree 100 turtle) </eval>

Ideen dieser Art werden in der Parallelprogrammierung behandelt. In unserem Beispiel findet eine nebenläufige Baumkonstruktion durch zeitlich parallel arbeitender Turtles statt.

Scheme Turtle 4

Scheme Turtle 3

Klassischer Binärbaum mit geklonten Turtles

Suche