test_module_main.f90 102 B

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