Sign in
fuchsia
/
third_party
/
cmake
/
refs/tags/v3.1.0-rc2
/
.
/
Tests
/
Fortran
/
test_module_implementation.f90
blob: de3cb574c1f1f9b36b38db38a3c95c20202f0902 [
file
] [
log
] [
blame
]
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