Il Linguaggio Fortran 90/95

318 Array Processing
6.5 Array allocabili
Nel paragrafo precedente si è visto come gli array automatici possano fornire una soluzione
al problema della creazione di array temporanei le cui dimensioni possano essere determinate
soltanto durante l’esecuzione del programma. Una soluzione più ”completa” è fornita, però, dagli
allocatable array. Questi ultimi sono più flessibili degli array automatici poiché le operazioni
di allocazione e di deallocazione dei loro elementi avvengono sotto il completo controllo del
programmatore (per gli array automatici, invece, lo spazio in memoria è sempre allocato all’atto
della chiamata di procedura, ed è sempre rilasciato all’uscita dalla procedura).
L’uso degli array allocabili consiste, generalmente, di tre fasi:
1. L’array allocabile è specificato in una istruzione di dichiarazione di tipo.
2. Lo spazio in memoria è dinamicamente allocato per i suoi elementi in una istruzione di
allocazione separata, dopodiché l’array può essere normalmente usato.
3. Quando l’array non è più necessario, lo spazio per i suoi elementi viene rilasciato attraverso
una speciale istruzione di deallocazione.
Una volta che per esso sia stato allocato dello spazio in memoria, un array allocabile può essere
utilizzato come un comune array: i suoi elementi possono essere assegnati e riferiti, o anche
passati come parametri attuali in istruzioni di chiamata di procedura. Inoltre un array allocabile
non può essere dichiarato come parametro formale di una procedura.
Un allocatable array è dichiarato in una istruzione di dichiarazione di tipo che includa un
attributo ALLOCATABLE. Tuttavia, dal momento che le sue dimensioni non sono note all’atto
della dichiarazione, il limite di ciascuno dei suoi indici va sostituito con il simbolo dei due
punti:
tipo, ALLOCATABLE, DIMENSION(: [, :, ...]) :: nome_array
(il rango, chiaramente, è noto dal numero di ricorrenze del simbolo dei due punti).
Si noti come l’istruzione di dichiarazione di tipo per un array allocabile sia molto simile
a quella di un array fittizio di forma presunta. Tuttavia, l’analogia è soltanto formale poiché
mentre un assumed-shape array deve essere un parametro formale di una procedura e non può
essere dichiarato con l’attributo ALLOCATABLE, l’esatto contrario vale per un allocatable array.
Così come per altri attributi, anche l’attributo ALLOCATABLE può essere sostituito da una
istruzione ALLOCATABLE separata:
tipo :: nome_array
ALLOCATABLE :: nome_array(: [, :, ...])
E’ sempre preferibile, tuttavia, dichiarare un array allocabile con l’attributo ALLOCATABLE piuttosto
che a mezzo dell’istruzione ALLOCATE per ragioni di chiarezza e concisione: è sempre
opportuno fare in modo, quando possibile, che tutte le informazioni circa una stessa entità
siano contenute in un’unica istruzione.