Il codice RETRAG serve per generare automaticamente una triangolazione
di un dominio di forma circolare.
Il codice suddivide il cerchio di raggio R in corone circolari.
Il primo cerchio interno ha un raggio preassegnato r, e i successivi
stanno tra di loro in un rapporto .
Ciascuna circonferenza viene suddivisa in un numero prefissato NL di
lati.
Il programma procede poi alla triangolazione completa del dominio.
Ad esempio, in Figura 10 si riporta un triangolazione di un
cerchio di raggio R=1, avendo posto il raggio della prima
circonferenza interna , il rapporto tra due raggi
successivi
e il
numero di lati per ciascuna circonferenza NL=13.
Figure 10: Triangolazione di un dominio circolare generata
automaticamente dal programma RETRAG
Il programma RETRAG accetta come dati di input in ordine il raggio
della prima circonferenza interna r, il raggio della circonferenza
esterna R, il rapporto tra le circonferenze e il numero di
suddivisioni di ciascuna circonferenza NL.
La lettura avviene in formato libero.