Current File : //usr/lib64/python2.7/site-packages/numpy/distutils/tests/f2py_f90_ext/include/body.f90

  subroutine bar13(a)
    !f2py intent(out) a
    integer a
    a = 13
  end subroutine bar13