/
niceSOFT
/
numpy
Обзор
Документация
Войти
/
niceSOFT
/
numpy
Код
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
doc/source/f2py/code/myroutine.f90
10 строк
202 B
melissawm
Responding to review comments
05 янв 2022, 20:13
05 янв 2022, 20:13
9867da9
Код
Авторство
О чём код?
subroutine s(n, m, c, x) implicit none integer, intent(in) :: n, m real(kind=8), intent(out), dimension(n,m) :: x real(kind=8), intent(in) :: c(:) x = 0.0d0 x(1, 1) = c(1) end subroutine s