La mutua ricorsione implementata in LibreLogo illustrata tramite la curva del dragone.
TO x n
IF n == 0 [ STOP ]
x(n-1)
RIGHT 90
y(n-1)
FORWARD 4
END
TO y n
IF n == 0 [ STOP ]
FORWARD 4
x(n-1)
LEFT 90
y(n-1)
END
x(12)
A colori
I colori evidenziano la struttura ricorsiva della curva
TO x n
IF n==0 [ STOP ]
IF n==5 [ PENCOLOR ANY ] ; colore a caso al livello 5
x(n-1)
RIGHT 90
y(n-1)
FORWARD 10
END
TO y n
IF n==0 [ STOP ]
FORWARD 10
x(n-1)
LEFT 90
y(n-1)
END
PENSIZE 5 ; penna di spessore 5
x(9)
Passo passo
Segui l’evoluzione della curva per n da 1 a 11 (i due colori casuali evidenziano la somiglianza con la precedente e la successiva)
TO x n
IF n==0 [ STOP ]
IF n==9 [ PENCOLOR ANY ]
x(n-1)
RIGHT 90
y(n-1)
FORWARD 10
END
TO y n
IF n==0 [ STOP ]
FORWARD 10
x(n-1)
LEFT 90
y(n-1)
END
PENSIZE 3
x(11) ; cambia: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11