dynamic.f90 227 B

123456789101112131415161718
  1. module dynamic
  2. implicit none
  3. private
  4. public :: hello
  5. interface hello
  6. module procedure say
  7. end interface hello
  8. contains
  9. subroutine say
  10. print *, "Hello, hello..."
  11. end subroutine say
  12. end module dynamic