Il Linguaggio Fortran 90/95

14 Tipi ed espressioni
Nella forma sorgente libera, le colonne non sono più riservate sicché le istruzioni Fortran
possono partire da un punto qualsiasi di una linea. Una linea sorgente può contenere fino ad
un massimo di 132 caratteri.
I nomi degli identificatori consistono in stringhe di caratteri con lunghezza variabile da 1 a
31 elementi, l’unica restrizione essendo rappresentata dal fatto che il primo carattere del nome
deve essere una lettera.
Come detto in precedenza, il Fortran non è un linguaggio case-sensitive per cui l’uso di
caratteri minuscoli o maiuscoli è, tranne che negli oggetti stringa, indifferente. Tuttavia, la
scelta di usare, a seconda dei casi, nomi maiuscoli o minuscoli può servire a migliorare la
leggibilità di un programma.
I commenti sono rappresentati da tutto quanto segue, su di una linea, un punto esclamativo.
Un commento può cominciare in un punto qualsiasi di una riga di programma, con l’effetto che
la parte seguente della linea è del tutto ignorata dal compilatore:
! Lunghezza di una barra metallica
REAL :: length1 ! lunghezza iniziale in mm (a temperatura ambiente)
REAL :: length2 ! lunghezza finale in mm (dopo il raffreddamento)
Una riga di programma può essere prolungata su una o più linee di continuazione appendendo
un ampersand (&) ad ogni riga ”da continuare”. Anche una riga di continuazione può
cominciare con un ampersand, nel qual caso l’istruzione riprende a partire dal primo carattere
che segue il carattere &; in caso contrario, tutti i caratteri sulla linea fanno parte della linea
di continuazione, inclusi gli spazi bianchi iniziali. Ciò è da tener presente quando le istruzioni
continuate coinvolgono stringhe di caratteri. Quanto detto è ben descritto dai seguenti esempi:
log_gamma = f + (y-0.5)*log(y) - y + 0.91893853320 + &
(((-0.00059523810*z + 0.00079365079)*z - &
0.00277777778)*z + 0.08333333333)/y
WRITE(*,*) "Seconda Università degli Studi di Napoli&
& Dipartimento di Ingegneria Aerospaziale"
Una singola riga di programma può contenere istruzioni multiple. In questi casi deve essere
utilizzato il simbolo di punto e virgola ”;” come separatore delle singole istruzioni, come nel
seguente esempio:
a = 2; b = 7; c = 3
Una riga di programma può essere ”etichettata” mediante una stringa numerica. Ciò fa in modo
che questa riga possa essere ”riferita” da una istruzione in un punto qualsiasi della stessa unità
di programma. Istruzioni etichettate sono, essenzialmente, le istruzioni FORMAT ed il ”target”
delle istruzioniGOTO. Le etichette (label) consistono in un ”campo numerico”, ossia una stringa di
caratteri numerici. Gli unici vincoli da rispettare sono rappresentati dal fatto che una etichetta
non può essere preceduta, sulla sua riga di appartenenza, da alcun carattere diverso dallo spazio
bianco, e la sua lunghezza non può eccedere le cinque cifre (in altre parole una etichetta può