Il Linguaggio Fortran 90/95

3.6 Sezioni di array 135
il cui scopo è risolvere un sistema di equazioni lineari del tipo triangolare inferiore del tipo:
a11x1 = b1
a21x1 + a22x2 = b2
· · ·
an1x1 + an2x2 + · · ·annxn = bn
Evidentemente si è in presenza di un array di ampiezza nulla quando l’indice i assume il suo
valore finale n.
3.6 Sezioni di array
Oltre che singoli elementi di array o interi array, nelle istruzioni di assegnazione e nelle operazioni
aritmetiche è possibile utilizzare anche un sottoinsieme o sezione di array. Una sezione
di array viene specificata sostituendo un indice di array con una tripletta di indici o con un
indice vettoriale. Il formato generale di una tripletta di indici è il seguente:
indice_1:indice_2:passo
dove indice_1 è il primo indice da includere nella sezione di array, indice_2 è l’ultimo indice
mentre passo è l’incremento dell’indice nell’insieme dei dati dell’array. Una tripletta di indici
opera in modo molto simile a un ciclo DO implicito. La tripletta specifica così l’insieme ordinato
di tutti gli indici che iniziano da indice_1 e finiscono con indice_2 con un incremento pari
a passo.
Si consideri, a titolo di esempio, il seguente array:
INTEGER, DIMENSION(10) :: vett=(/1,2,3,4,5,6,7,8,9,10/)
La sezione di array:
vett(1:10:2)
sarà un array contenente soltanto gli elementi vett(1), vett(3), vett(5), vett(7), vett(9).
Le triplette di indici possono essere scritte nelle seguenti forme alternative:
• Se manca indice_1, il primo indice della tripletta viene automaticamente posto uguale
al primo indice dell’array.
• Se manca indice_2, il secondo indice della tripletta viene automaticamente posto uguale
all’ultimo indice dell’array.
• Se manca passo, l’incremento della tripletta viene automaticamente posto uguale a uno.
Ad esempio, dato un array a definito come:
REAL, DIMENSION(10) :: a