Il Linguaggio Fortran 90/95

1.8 Tipi di dati derivati 63
1.8 Tipi di dati derivati
Una caratteristica molto utile del Fortran 90 è la possibilità di definire tipi di dati derivati
simili alle strutture del linguaggio C ed ai record del Pascal. Un tipo di dati derivato è un
oggetto contenente una combinazione di dati di natura diversa presenti in numero qualsiasi.
Ogni componente può essere di un tipo di dati intrinseco o può essere, a sua volta, un elemento
di un altro tipo di dati derivato.
Un tipo di dati derivato è definito da una sequenza di istruzioni di dichiarazione preceduta da
una istruzioneTYPE e terminata da una istruzioneEND TYPE. Tra queste istruzioni si collocano le
definizioni dei componenti del tipo di dati derivato. L’espressione generale di questa operazione
di ”assemblaggio” è la seguente:
TYPE nome_tipo
componente_1
...
componente_n
END TYPE [nome_tipo]
mentre la definizione di una variabile di questo tipo di dati avviene con una istruzione del tipo:
TYPE(nome_tipo) var_1 [, var_2, ...]
Ciascun componente di un tipo di dati derivato è detto struttura e può essere ”assegnato”
ed usato indipendente dagli altri come se fosse una comune variabile. Ogni componente è reso
accessibile attraverso il selettore di componente che consiste nel nome della variabile seguito
dal simbolo di percentuale (%) seguito, a sua volta, dal nome del componente:
var%componente
sicché l’assegnazione di un valore ad un oggetto definito dall’utente può avvenire in maniera
selettiva componente×componente:
var%componente_1 = valore_1
var%componente_2 = valore_2
...
In questo modo, naturalmente, l’ordine in cui vengono specificati i componenti può essere del
tutto casuale ed inoltre non è necessario specificare tutti i componenti dell’oggetto, con l’ovvio
risultato che il valore di un componente non assegnato rimane inalterato. L’assegnazione,
però, può avvenire anche in forma ”globale” secondo il meccanismo noto come costruttore di
struttura che consiste nello specificare tra parentesi tonde la lista dei valori di tutti i componenti
(rigorosamente nell’ordine in cui essi sono elencati nella definizione del tipo) subito dopo il nome
del tipo:
nome_tipo(valore_1,valore_2,...)
L’esempio che segue mostra come sia semplice definire un tipo di dati e dichiarare un oggetto
di un tale tipo: