一个小程序 求问

integer function getint()
implicit none
@ logical valid
character*10::string
integer i
@ valid=.true.
do while(valid)
write(*,*) "input"
read (*,"(A10)") string
valid=.false.
do i=1,len_trim(string)
if(string(i:i)<'0'.or.string(i:i)>'9') then
valid=.true.
exit
end if
end do
end do
read(string,*) getint
return
end
和
integer function getint()
implicit none
@ logical::valid=.true.
character*10::string
integer i
do while(valid)
write(*,*) "input"
read (*,"(A10)") string
valid=.false.
do i=1,len_trim(string)
if(string(i:i)<'0'.or.string(i:i)>'9') then
valid=.true.
exit
end if
end do
end do
read(string,*) getint
return
end
打‘@符号’的地方，两个函数有什么不同？运行结果不一样 谢谢【只是程序一部分】