Your IP : 216.73.216.74

Current Path : /usr/local/python-3.13/lib/python3.13/site-packages/numpy/f2py/tests/src/routines/
Upload File :
Current File : //usr/local/python-3.13/lib/python3.13/site-packages/numpy/f2py/tests/src/routines/subrout.f

      SUBROUTINE SUBROUT(A,B,C)
      REAL*8 A, B, C
      C = A + B
      END SUBROUTINE