Il Linguaggio Fortran 90/95

1.3 Istruzioni di dichiarazione di tipo 19
OPTIONAL
PARAMETER
POINTER
PRIVATE
PUBLIC
SAVE
TARGET
E’ anche possibile dichiarare un attributo separatamente come istruzione. In ogni caso è
possibile specificare ogni attributo soltanto una volta per uno stesso oggetto.
Il simbolo dei due punti (”::”) è obbligatorio soltanto se l’istruzione di dichiarazione include
una lista di attributi oppure se presenta un’espressione di inizializzazione, in tutti gli altri casi
il suo uso è opzionale.
Esempi di istruzioni di dichiarazione di tipo sono le seguenti:
REAL :: a
LOGICAL, DIMENSION (5,5) :: mask1, mask2
COMPLEX :: cube_root=(-0.5,0.867)
INTEGER, PARAMETER :: short=SELECTED_INT_KIND(4)
REAL(KIND(0.0D0)) :: a1
REAL(KIND=2) :: b=3
COMPLEX(KIND=KIND(0.0D0)) :: c
INTEGER(short) :: i, j, k
TYPE(member) :: george
Dunque, una dichiarazione esplicita può specificare degli attributi per gli oggetti della lista,
oltre che il loro tipo. Questi attributi descrivono la natura della variabile e in che modo
essa sarà usata. In effetti, una istruzione di dichiarazione può essere o orientata alle entità
(entity-oriented) oppure orientata agli attributi (attribute-oriented). Nel primo caso il tipo
di un oggetto e tutti i suoi attributi sono specificati in un’unica istruzione, nel secondo caso
ogni attributo è specificato in una istruzione separata che elenca tutti gli oggetti aventi
quell’attributo.
Prima di proseguire nello studio degli elementi fondamentali del linguaggio, è bene chiarire
la differenza fra dichiarazione e definizione di un oggetto:
• Una dichiarazione specifica il tipo, gli attributi ed eventuali altre proprietà di un oggetto
(tutte quelle elencate in precedenza erano istruzioni di dichiarazione).
• Una definizione fornisce il valore dell’oggetto.
La seguente istruzione è un ulteriore esempio di istruzione di dichiarazione esplicita di tipo:
REAL :: x
La variabile x così dichiarata può essere definita in una istruzione di assegnazione come questa:
x = 25.44