test_module_implementation.f90 « FortranModules « Tests - platform/upstream/cmake - Domain: System / Base; Licenses: BSD-3-Clause;

index : platform/upstream/cmake

Domain: System / Base; Licenses: BSD-3-Clause;

Donghun Kwak <dh0128.kwak@samsung.com>, JinWang An <jinwang.an@samsung.com>, Kiseok Chang <kiso.chang@samsung.com>

summary refs log tree commit diff

path: root/Tests/FortranModules/test_module_implementation.f90

blob: de3cb574c1f1f9b36b38db38a3c95c20202f0902 (plain)

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