Il Linguaggio Fortran 90/95

208 Operazioni di I/O interattive
4.9 Istruzioni di I/O con meccanismo namelist
Le istruzioni di I/O con meccanismo namelist rappresentano un metodo abbastanza ”curioso”
di lettura o scrittura di dati da o verso file esterni o dispositivi standard. Specificando una o
più variabili come facenti parte di un gruppo namelist è possibile leggere o scrivere i valori di
ciascuna di esse attraverso un’unica istruzione di I/O.
Un gruppo namelist può essere creato a mezzo di una istruzione NAMELIST la quale si
presenta con la seguente sintassi:
NAMELIST/nome_della_lista/lista_di_variabili
in cui nome_della_lista è il nome che identifica l’intero gruppo, mentrelista_di_variabili
è un elenco di nomi di variabili di tipi predefiniti, definiti dall’utente o di variabili di tipo array.
Non possono, tuttavia, far parte di un gruppo namelist variabili array o stringhe di caratteri che
siano parametri formali con dimensioni non costanti, array automatici o allocabili, puntatori.
L’ordine con il quale le variabili sono elencate nella lista determina l’ordine con cui le stesse
verranno riprodotte in una eventuale istruzione di uscita. Il nome di una stessa variabile
può tranquillamente comparire in più di un gruppo NAMELIST. Infine, sebbene ciò risulterà
chiaro solo dopo la lettura del capitolo dedicato alle unità di programma, si anticipa che se il
gruppo NAMELIST è specificato con l’attributo PUBLIC, nessun componente della lista può avere
l’attributo PRIVATE.
Un esempio di utilizzo dell’istruzione NAMELIST è il seguente:
REAL :: x, val INTEGER, DIMENSION(10) :: indici
NAMELIST/mia_lista/x,val,indici
E’ anche possibile dichiarare diversi gruppi namelist con la stessa istruzione:
NAMELIST/lista_1/variabili_lista_1 [[,] /lista_2/variabili_lista_2,...]
sebbene è sempre raccomandabile scrivere ciascuna istruzione NAMELIST su una linea separata.
Si noti inoltre che se due istruzioni NAMELIST hanno lo stesso nome (ossia se hanno in comune
il termine nome_lista ) allora la seconda lista sarà considerata come una continuazione della
prima, ad esempio le istruzioni:
NAMELIST/mia_lista/x,y,z(3:5) NAMELIST/mia_lista/a,b,c
hanno esattamente lo stesso effetto dell’unica istruzione:
NAMELIST/mia_lista/x,y,z(3:5),a,b,c
Si faccia bene attenzione al fatto che NAMELIST rappresenta una istruzione di specificazione e
pertanto dovrà essere opportunamente collocata all’interno della parte ”dichiarativa” del codice
sorgente, prima cioè di ogni istruzione esecutiva della unità di programma in cui figura.
Le operazioni di I/O con meccanismo namelist sono realizzate con istruzioni READ o WRITE
che si caratterizzano per i seguenti aspetti: