Open
Description
In the following module example, declaring implicit none
to detect implicit types for variables like "x" generates the following error message for the dummy procedure f: "No matching declaration found for argument "f"". Also, if the type declaration of "x" is uncommented then the warning message "Variable "x" masks variable in parent scope" appears, for variable "x" in the interface.
module test
implicit none
contains
subroutine foo(f)
interface
function f(x)
real, intent(in) :: x
real :: f
end function
end interface
!real :: x
x = 1.
print*, f(x)
end subroutine
end module
Metadata
Metadata
Assignees
Labels
No labels