Sherman-Morrison/mwe/main.f90

13 lines
177 B
Fortran
Raw Normal View History

program test
use iso_c_binding
implicit none
interface
subroutine hello() bind(C, name="worker")
end subroutine
end interface
call hello()
end program test