meson/test cases/fortran/2 modules/prog.f90

11 lines
118 B
Fortran
Raw Normal View History

2019-06-20 09:31:56 +08:00
use circle, only: pi
use line, only: length
implicit none
2019-06-20 09:31:56 +08:00
print *,'pi=',pi
2019-06-20 09:31:56 +08:00
length = pi
print *, length
end program