use_data.f90 « gh25337 « modules « src « tests « f2py « numpy « site-packages « python3.12 « lib « .venv - uiuc-course-graph.git - Unnamed repository; edit this file 'description' to name the repository.

summary refs log tree commit diff

path: root/.venv/lib/python3.12/site-packages/numpy/f2py/tests/src/modules/gh25337/use_data.f90

blob: b3fae8b875d03d75199f4cf06d544edb4aab1a89 (plain)

subroutine shift_a(dim_a, a)
    use data, only: shift
    integer, intent(in) :: dim_a
    real(8), intent(inout), dimension(dim_a) :: a
    a = a + shift
end subroutine shift_a