pywafo/wafo/source/test_f90/hello_interface.f90

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