
C file signatures.f
real*8 function hw1(r1, r2)
Cf2py intent(c) hw1
real*8 r1, r2
Cf2py intent(c) r1, r2
end
subroutine hw2(r1, r2)
Cf2py intent(c) hw2
real*8 r1, r2
Cf2py intent(c) r1, r2
end
subroutine hw3(r1, r2, s)
Cf2py intent(c) hw3
real*8 r1, r2, s
Cf2py intent(c) r1, r2
Cf2py intent(out) s
end