summaryrefslogtreecommitdiffstats
path: root/Tests/Fortran/test_module_implementation.f90
blob: de3cb574c1f1f9b36b38db38a3c95c20202f0902 (plain)
1
2
3
4
5
6
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