test/example_packages/program_with_module/app/main.f90


1
2
3
4
5
6
7
8
9
10

module greet_m
  implicit none
  character(*), parameter :: greeting = 'Hello, fpm!' 
end module greet_m

program program_with_module
  use greet_m, only: greeting
  implicit none
  print *, greeting
end program program_with_module