module a
contains
* subroutine wrong
subroutine RIGHT
* subroutine wrong
real ChangeMe
end subroutine RIGHT
end module a
module a
contains
* subroutine wrong
subroutine RIGHT
* subroutine wrong
real ChangeMe
end subroutine RIGHT
end module a