I would like to get the address of an array pointer. The prototype codes are as following:
integer, allocatable :: i(:)
print *, "The address of a is ", loc(a)
print *, "The address of a%i is", loc(a%i) ! I expect the same address as a.
end program main
My final target is to get the address of "a" with type(foo) through the address of "a%i", since "i" is the first part of type(foo).
Thanks in advance!