mirror of
https://github.com/TREX-CoE/Sherman-Morrison.git
synced 2024-11-04 05:03:59 +01:00
13 lines
177 B
Fortran
13 lines
177 B
Fortran
|
program test
|
||
|
|
use iso_c_binding
|
||
|
|
implicit none
|
||
|
|
|
||
|
|
interface
|
||
|
|
subroutine hello() bind(C, name="worker")
|
||
|
|
end subroutine
|
||
|
|
end interface
|
||
|
|
|
||
|
|
call hello()
|
||
|
|
|
||
|
|
end program test
|