mirror of
https://github.com/TREX-CoE/Sherman-Morrison.git
synced 2024-08-25 14:41:45 +02: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
|