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

 FUNCTION TEST_MODULE_FUNCTION(A,B)
   REAL :: TEST_MODULE_FUNCTION
   REAL, INTENT(IN) :: A
   REAL, INTENT(IN) :: B
   TEST_MODULE_FUNCTION = A + B
 END FUNCTION TEST_MODULE_FUNCTION
	FUNCTION TEST_MODULE_FUNCTION(A,B)
	REAL :: TEST_MODULE_FUNCTION
	REAL, INTENT(IN) :: A
	REAL, INTENT(IN) :: B
	TEST_MODULE_FUNCTION = A + B
	END FUNCTION TEST_MODULE_FUNCTION