golden hour

/opt/cloudlinux/venv/lib/python3.11/site-packages/numpy/f2py/tests/src/callback

⬆️ Go Up

Upload

File/Folder	Size	Actions
foo.f	1.22 KB	Del OK
gh17797.f90	148 B	Del OK
gh18335.f90	506 B	Del OK

Edit: gh17797.f90

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