To all:
I have the following program:
module test
integer ::x(4)
end module
use test,y=>x
namelist /a/y
y=(/1,2,3,4/)
write(*,nml=a)
end
1- Is it standard conforming ?
I also tested the code using two compilers:
The first compiler gives the following result
&A
Y = 1, 2, 3, 4
/
The second:
&A
X= 1, 2, 3, 4
/
The difference between the two is that the first one
uses the local name as the namelist variable name while
the second retains the original name. Which is correct ?
Best regards,
Jean Vezina
|