The POINTER function gets the memory address of a variable, substring, array reference, or external subprogram.
Syntax
POINTER (item)
item is INTENT(IN) and can be of any type. It is the name for which to return an address. If item is a function, it must have the EXTERNAL attribute.
The result is of type INTEGER. It is the address of item.
Example
real :: a,b(10) write(*,*) pointer(a) ! writes the memory write(*,*) pointer(b) ! address of each of write(*,*) pointer(b(2)) ! these variables end