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.
Useremo procedura Title per scrivere i titoli dei nostri disegni.
Useremo due procedure DrawBgk, Draw per disegnare (rispettivamente, con sfondo di colore fisso o variabile) il risultato finale, ovvero la figura F.
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 , ..., .
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.
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.
Infine, aggiungiamo una procedura che ristampa in versione ridotta l'ultimo disegno fatto. Ci servirà quando vorremo riassumere il lavoro di una sezione.