Sign in
gem5
/
public
/
gem5-resources
/
8ccd059d5dcaaeffe15cd93c17f1e76e92907662
/
.
/
src
/
parsec
/
disk-image
/
parsec
/
parsec-benchmark
/
pkgs
/
tools
/
cmake
/
src
/
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