📁 File Manager Pro
v10.0.3 | PHP: 8.2.31
Server: LiteSpeed
2026-06-28 22:36:38
📂
/ (Root)
/
opt
/
cloudlinux
/
venv
/
lib
/
python3.11
/
site-packages
/
numpy
/
f2py
/
tests
/
src
/
crackfortran
📍 /opt/cloudlinux/venv/lib/python3.11/site-packages/numpy/f2py/tests/src/crackfortran
🔄 Refresh
✏️
Editing: gh15035.f
Read Only
subroutine subb(k) real(8), intent(inout) :: k(:) k=k+1 endsubroutine subroutine subc(w,k) real(8), intent(in) :: w(:) real(8), intent(out) :: k(size(w)) k=w+1 endsubroutine function t0(value) character value character t0 t0 = value endfunction
💾 Save Changes
❌ Cancel