/
opt
/
imh-python
/
lib
/
python3.9
/
site-packages
/
numpy
/
f2py
/
tests
/
src
/
callback
/
/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/src/callback
mkdir
upload
Name
Size
Mode
Actions
foo.f
1254
0644
edit
dl
rm
gh17797.f90
148
0644
edit
dl
rm
gh18335.f90
506
0644
edit
dl
rm
Edit:
/opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/src/callback/gh17797.f90
(148B)
function gh17797(f, y) result(r) external f integer(8) :: r, f integer(8), dimension(:) :: y r = f(0) r = r + sum(y) end function gh17797
Save
cmd:
run