Il Linguaggio Fortran 90/95

220 Unità di Programma
[prefisso] FUNCTION nome_function[(lista di argomenti)]
tipo nome_function
[istruzioni di definizione e dichiarazione di variabili]
[istruzioni eseguibili]
nome_function = espressione
[CONTAINS
procedure interne]
END [FUNCTION [nome_function]]
in cui lo specificatore opzionale prefisso può essere PURE, ELEMENTAL o RECURSIVE.
La function deve iniziare con l’istruzioneFUNCTION e terminare con l’istruzioneEND FUNCTION.
Il nome della function deve essere specificato nell’istruzione FUNCTION mentre è facoltativo
nell’istruzione END FUNCTION.
Per eseguire una funzione basta specificarne il nome all’interno di un’espressione dell’unità
chiamante. L’esecuzione della funzione termina quando viene raggiunta l’istruzione END
FUNCTION. Il valore restituito dalla function viene inserito nell’espressione dell’unità chiamante
che contiene il suo nome.
Il nome di una funzione deve apparire sul lato sinistro di almeno un’istruzione di assegnazione.
Il valore che viene assegnato a nome_function , quando la funzione restituisce il controllo
all’unità chiamante, è il valore della funzione.
La lista degli argomenti può essere vuota nel caso in cui la funzione può svolgere i suoi
calcoli senza argomenti di input. Tuttavia, le parentesi che contengono la lista degli argomenti
sono obbligatorie anche se la lista è vuota.
Poiché una funzione restituisce un valore, è sempre necessario assegnarle un tipo. Se è
utilizzata l’istruzione IMPLICIT NONE il tipo di dati della funzione deve essere dichiarato sia
nella procedura che nelle unità chiamanti. Viceversa, se l’istruzione IMPLICIT NONE non è
utilizzata, alla funzione saranno applicate le convenzioni standard del Fortran per i tipi di dati
predefiniti.
5.2.3 Argomenti attuali e argomenti fittizi
Le procedure sono utilizzate per assolvere a compiti ben precisi. L’attivazione di una procedura
e la sua esecuzione presuppongono uno scambio di informazioni tra l’unità chiamante e la
procedura. Il modo più comune per rendere dei dati disponibili ad una procedura è di passarli
attraverso una lista di argomenti all’atto della chiamata di procedura.
Una lista di argomenti è semplicemente un insieme di variabili o di espressioni (o anche
nomi di procedure). Gli argomenti di una istruzione di chiamata sono detti argomenti attuali,
mentre quelli corrispondenti nell’istruzione di dichiarazione della procedura sono chiamati argomenti
fittizi. Gli argomenti attuali e quelli fittizi vengono detti argomenti associati: essi si
corrispondono per posizione, cioè il primo argomento attuale corrisponde al primo argomento
fittizio, il secondo argomento attuale al secondo argomento fittizio, e così via. Oltre al numero,
anche il tipo di dati e il rango degli argomenti attuali e fittizi devono corrispondere esattamente.
Non è, invece, necessario che essi si corrispondano anche per nome.