a.f90 150 B

1234567
  1. MODULE externalMod
  2. !
  3. CONTAINS
  4. SUBROUTINE printExtModGreeting
  5. WRITE(*,*) "Greetings from Module externalMod"
  6. END SUBROUTINE
  7. END MODULE