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

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

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

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