module first
  interface inner
  end interface inner
end module first

module second
  REAL :: C = 1
end module second