6.1.27 %LOC в качестве правого операнда

Обычно %LOC разрешено только в списках параметров. Однако встроенная функция LOC делает то же самое и может использоваться в правой части присваиваний. Для совместимости GNU Fortran поддерживает использование %LOC как псевдонима встроенной LOC с -std=legacy. При включенной этой функции следующие два примера эквивалентны:

integer :: i, l
l = %loc(i)
call sub(l)

integer :: i
call sub(%loc(i))