LOC — Returns the address of a variable¶

LOC(X)¶

LOC(X) returns the address of X as an integer.

Parameters: X – Variable of any type.
Returns: The return value is of type INTEGER, with a KIND corresponding to the size (in bytes) of a memory address on the target machine.

Syntax:

RESULT = LOC(X)

Example:

program test_loc
  integer :: i
  real :: r
  i = loc(r)
  print *, i
end program test_loc