5.1.3 Расширения для списков имён
GNU Fortran полностью поддерживает стандарт Fortran 95 для ввода/вывода списков имён, включая квалификаторы массивов, подстроки и полностью квалифицированные производные типы. Вывод из записи списка имён совместим со чтением списка имён. Вывод содержит все имена в верхнем регистре и отступы до колонки 1 после имени списка имён. Разрешены два расширения:
Использование старого стиля ‘$’ вместо ‘&’
$MYNML X(:)%Y(2) = 1.0 2.0 3.0 CH(1:4) = "abcd" $END
Следует отметить, что по умолчанию разделителем является ‘/’, а не ‘&END’.
Запрос списка имён при вводе со стандартного ввода. После хотя бы одного пробела, ввод ‘?’ отправляет в стандартный вывод имя списка имён и имена переменных в списке имён:
? &mynml x x%y ch &end
Ввод ‘=?’ выводит список имён в стандартный вывод, как если бы WRITE(*,NML = mynml) был вызван:
=? &MYNML X(1)%Y= 0.000000 , 1.000000 , 0.000000 , X(2)%Y= 0.000000 , 2.000000 , 0.000000 , X(3)%Y= 0.000000 , 3.000000 , 0.000000 , CH=abcd, /
Для облегчения этого диалога, когда ввод происходит со стандартного ввода, сообщения об ошибках отправляются в стандартный поток ошибок, и выполнение продолжается, даже если IOSTAT установлен.
Разрешено использование расширенного списка имён. Это вызывает ошибку, если используется -std=f95.
PROGRAM test_print REAL, dimension (4) :: x = (/1.0, 2.0, 3.0, 4.0/) NAMELIST /mynml/ x PRINT mynml END PROGRAM test_print
Разрешены расширенные чтения списков имён. Это вызывает ошибку, если используется -std=f95. В следующем примере первому элементу массива будет присвоено значение 0.00, а двум последующим элементам — значения 1.00 и 2.00.
&MYNML X(1,1) = 0.00 , 1.00 , 2.00 /
При записи списка имён, если не указан DELIM=, по умолчанию для разграничения строковых значений используется двойная кавычка. Если используется -std=F95, F2003 или F2008 и т.д., статус разделителя устанавливается в ‘none’. Использование кавычек по умолчанию гарантирует, что списки имён с строковыми значениями могут быть успешно повторно прочитаны.
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.
https://gcc.gnu.org/onlinedocs/gcc-14.2.0/gfortran/Extensions-to-namelist.html