Una procedura che disegna l'approssimazione n-esima di F. I parametri del disegno sono: XStart, YStart, usati per definire Base[f] = approssimazione 0 di F; Size = smallSize, ..., LargeSize, per scegliere la dimensione della figura; Color, per sceglierne il colore (uno di quelli elencati dalla procedura ListAllColors); Bkg, per scegliere il colore dello sfondo; PointRadius, per scegliere la dimensione dei punti (espressa in frazioni del disegno: di solito è 0.008 = 8 millesimi). Infine Approx indica il valore n dell'approssimazione, e RuleNumber il numero delle componenti di F.
Fissiamo i valori per smallSize, ..., LargeSize. Attenzione: in certe versioni di Mathematica dovrete scegliere valori più grandi oppure più piccoli.
![[Graphics:../Images/index_gr_107.gif]](../Images/index_gr_107.gif)
Useremo procedura Title per scrivere i titoli dei nostri disegni.
![[Graphics:../Images/index_gr_108.gif]](../Images/index_gr_108.gif)
Useremo due procedure DrawBgk, Draw per disegnare (rispettivamente, con sfondo di colore fisso o variabile) il risultato finale, ovvero la figura F.
![[Graphics:../Images/index_gr_109.gif]](../Images/index_gr_109.gif)
![[Graphics:../Images/index_gr_110.gif]](../Images/index_gr_110.gif)
![[Graphics:../Images/index_gr_111.gif]](../Images/index_gr_111.gif)
Ci potrebbe anche servire una procedura ShowFractData, che stampi la descrizione numerica dei sistemi di riferimento {, ...,
} associati alla somiglianza tra F e le sue copie
, ...,
.
![[Graphics:../Images/index_gr_116.gif]](../Images/index_gr_116.gif)
Infine, aggiungiamo una procedura ShowFractRule, che stampa i passi numero 0,1,2,3 della costruzione di F, per darci un'idea di come tale costruzione procede. Le componenti di approssimazione 0 di F vengono rappresentate temporaneamente da freccie. Al termine della stampa viene ristabilita la scelta originaria "Base" per le componenti di approssimazione 0.
![[Graphics:../Images/index_gr_117.gif]](../Images/index_gr_117.gif)
Combinando le procedure definite finora, ne definiamo una che stampa la descrizione numerica di {, ...,
}, quindi i passi numero 0,1,2,3 della costruzione di F, infine l'approssimazione di ordine Approx di F.
![[Graphics:../Images/index_gr_120.gif]](../Images/index_gr_120.gif)
Infine, aggiungiamo una procedura che ristampa in versione ridotta l'ultimo disegno fatto. Ci servirà quando vorremo riassumere il lavoro di una sezione.
![[Graphics:../Images/index_gr_121.gif]](../Images/index_gr_121.gif)