9 lines
178 B
Fortran
9 lines
178 B
Fortran
15 years ago
|
module bindings
|
||
|
|
use types
|
||
|
|
use hello
|
||
|
|
contains
|
||
|
|
subroutine pyfoo(a)
|
||
|
|
integer(kind=8) :: a
|
||
|
|
call foo(to_intdim(a))
|
||
|
|
end subroutine pyfoo
|
||
|
|
end module bindings
|