Tests/FortranModules/ModulesViaSubdirTargetObjectsLink/use.f90 - third_party/github.com/Kitware/CMake - Git at Google

 module lib

 use m1, only : pi

 implicit none

 contains

 pure real function func()
 func = pi()
 end function

 end module
	module lib

	use m1, only : pi

	implicit none

	contains

	pure real function func()
	func = pi()
	end function

	end module