test_module_main.f90 131 B

1234
  1. PROGRAM MAINF90
  2. USE TEST_MODULE, only : TEST_MODULE_FUNCTION
  3. PRINT *,'Sum is',TEST_MODULE_FUNCTION(1., 2.)
  4. END PROGRAM MAINF90