summaryrefslogtreecommitdiff
path: root/numpy/f2py/docs/usersguide/callback2.pyf
diff options
context:
space:
mode:
Diffstat (limited to 'numpy/f2py/docs/usersguide/callback2.pyf')
-rw-r--r--numpy/f2py/docs/usersguide/callback2.pyf19
1 files changed, 19 insertions, 0 deletions
diff --git a/numpy/f2py/docs/usersguide/callback2.pyf b/numpy/f2py/docs/usersguide/callback2.pyf
new file mode 100644
index 000000000..3d77eed24
--- /dev/null
+++ b/numpy/f2py/docs/usersguide/callback2.pyf
@@ -0,0 +1,19 @@
+! -*- f90 -*-
+python module __user__routines
+ interface
+ function fun(i) result (r)
+ integer :: i
+ real*8 :: r
+ end function fun
+ end interface
+end python module __user__routines
+
+python module callback2
+ interface
+ subroutine foo(f,r)
+ use __user__routines, f=>fun
+ external f
+ real*8 intent(out) :: r
+ end subroutine foo
+ end interface
+end python module callback2