Il Linguaggio Fortran 90/95

136 Array
e tre variabili intere m, n e k aventi valori 3, 7 e 2 rispettivamente, le seguenti espressioni
rappresentano tutte sezioni di array valide:
a(:) ! l’intero array
a(3:9) ! il sottoinsieme (/a(3),a(4),...,a(9)/)
a(m:n+2:) ! identico al precedente
a(8:3:-1) ! il sottoinsieme (/a(3),a(4),...,a(8)/)
a(m+2:) ! il sottoinsieme (/a(5),a(6),...,a(10)/)
a(:n:k) ! il sottoinsieme (/a(1),a(3),...,a(7)/)
a(::3) ! il sottoinsieme (/a(1),a(4),a(7),a(10)/)
a(5::) ! il sottoinsieme (/a(5),a(6),...,a(10)/)
a(m:m) ! il solo elemento a(3)
Allo stesso modo degli array monodimensionali, è possibile definire sezioni anche per array
di rango maggiore di uno. Ad esempio, data la matrice array_2 dichiarata come:
INTEGER, DIMENSION(2:9,-2:1) :: array_2
la sua sezione:
array_2(4:5,-1:0)
rappresenta la seguente ”estratta”:
| array_2(4,-1) array_2(4,0) |
| array_2(5,-1) array_2(5,0) |
Anche per le sezioni di array di rango non unitario non è necessario specificare i valori di tutti
gli indici. Considerata, ad esempio, la matrice array_3 così definita:
INTEGER, DIMENSION(3,4) :: array_3
le seguenti espressioni sono tutte validi esempi di sezioni:
array_3(:,:) ! l’intera matrice
array_3(2,:) ! la seconda riga di array_3
array_3(:,3) ! la terza colonna di array_3
array_3(2,3:4) ! il vettore (/array_3(2,3),array_3(2,4)/)
a(2:2,3:3) ! il solo elemento array_3(2,3)
Come visto finora, le triplette selezionano sezioni ordinate degli elementi di array che devono
essere inclusi nei calcoli aritmetici. Gli indici vettoriali, invece, consentono delle combinazioni
arbitrarie degli elementi di array. Un indice vettoriale è un array monodimensionale (ossia un
vettore) che specifica gli elementi dell’array che devono essere utilizzati nei calcoli aritmetici. Gli
elementi dell’array possono essere specificati in qualsiasi ordine ed inoltre uno stesso elemento
può essere specificato più volte (nel qual caso si parla di sezione di array con elementi ripetuti).
L’array risultante contiene un elemento per ogni indice specificato nel vettore. A titolo di
esempio, si considerino le seguenti istruzioni di dichiarazione di tipo: