Il Linguaggio Fortran 90/95

3.4 Operazioni globali su array 131
Infine, tutti gli elementi di un array possono essere inizializzati con un unico valore, specificando
quest’ultimo nell’istruzione di dichiarazione di tipo. La seguente istruzione, ad esempio,
imposta ad uno tutti gli elementi dell’array vett3:
REAL, DIMENSION(50) :: vett3=1.
3.3.4 Indici fuori range
Ogni elemento di un array è identificato da uno o più indici interi. Il range dei numeri interi che
corrispondono agli elementi dell’array dipende dalla dimensione dell’array così come specificato
nella relativa istruzione di dichiarazione. Ad esempio, per un array reale dichiarato come:
REAL, DIMENSION(5) :: a
gli indici interi 1, 2, 3, 4 e 5 corrispondono agli elementi dell’array. Qualsiasi altro numero
intero, minore di1omaggiore di5, non può essere utilizzato come indice poiché non corrisponde
ad una locazione della memoria riservata all’array. Questi interi sono detti fuori range (out
of bounds). Cosa accade quando un programma faccia uso di un indice fuori range dipende
dallo specifico compilatore. In alcuni casi il programma viene interrotto immediatamente, in
altri casi viene raggiunta la locazione della memoria che sarebbe stata utilizzata se fosse stato
utilizzato quell’indice. Ad esempio, se si utilizzasse l’elemento a(6), essendo a l’array definito
in precedenza, il computer accederebbe alla prima locazione ubicata dopo il confine dell’array
a; dal momento che questa locazione potrebbe essere allocata per scopi totalmente diversi, il
programma potrebbe fallire in maniera molto ”subdola”.
E’ da precisare che alcuni compilatori prevedono un controllo sul programma per verificare
che nessuno tra gli indici utilizzati sia fuori range. Normalmente questi controlli richiedono molto
tempo e rallentano l’esecuzione dei programmi per cui, se il compilatore lo consente, è buona
norma attivare tale controllo in fase di debugging ed escluderlo una volta che il programma sia
stato testato in modo da avere un file eseguibile più ”snello” e veloce.
3.4 Operazioni globali su array
Una importante caratteristica del Fortran 90/95 è la possibilità di eseguire operazioni con
interi array, ossia trattando l’array nel suo complesso come un singolo oggetto, anziché operare
singolarmente su ciascun elemento. Si rimuove così la necessità di lavorare con una serie di cicli
DO innestati che, tipicamente, sono più time-consuming e meno leggibili di operazioni ”globali”.
Affinché possano avere luogo operazioni globali su array è necessario che (per operazioni
binarie) i due array siano compatibili (giova ricordare, a questo proposito, che due array sono
detti compatibili se hanno la stessa forma, anche se non hanno lo stesso range di indici in
ogni dimensione, ed inoltre, che un qualunque array è sempre compatibile con uno scalare).
Le operazioni tra due array compatibili sono sempre eseguite sugli elementi corrispondenti, ed
inoltre tutti gli operatori intrinseci possono essere applicati ad interi array in forma globale con
l’effetto che l’operatore è applicato elemento×elemento.