Your IP : 216.73.216.74


Current Path : /usr/local/python-3.13/lib/python3.13/site-packages/numpy/f2py/tests/src/modules/gh25337/
Upload File :
Current File : //usr/local/python-3.13/lib/python3.13/site-packages/numpy/f2py/tests/src/modules/gh25337/data.f90

module data
   real(8) :: shift
contains
   subroutine set_shift(in_shift)
      real(8), intent(in) :: in_shift
      shift = in_shift
   end subroutine set_shift
end module data