blob: 5a591c6123f6e26be9cbce8a5ad67ed26c26b5cf (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
module hello_test
use greet_m, only: make_greeting
implicit none
private
public :: run_test
contains
subroutine run_test
print *, make_greeting("from test")
end subroutine run_test
end module hello_test
|