6.2.2 Переменные выражения FORMAT

Выражение переменной FORMAT — это оператор форматирования, который включает угловые скобки, окружающие выражение Fortran: FORMAT(I<N>). GNU Fortran не поддерживает это устаревшее расширение. Эффект выражений переменной формата можно воспроизвести, используя более мощную (и стандартную) комбинацию внутреннего вывода и форматов строк. Например, замените фрагмент кода подобный этому:

WRITE(6,20) INT1
20   FORMAT(I<N+1>)

следующим:

c     Variable declaration
      CHARACTER(LEN=20) FMT
c
c     Other code here...
c
      WRITE(FMT,'("(I", I0, ")")') N+1
      WRITE(6,FMT) INT1

или с помощью:

c     Variable declaration
      CHARACTER(LEN=20) FMT
c
c     Other code here...
c
      WRITE(FMT,*) N+1
      WRITE(6,"(I" // ADJUSTL(FMT) // ")") INT1