program p1
use m1, only: s1
use m2, only: s2
call s1()
call s2()
end program p1