/
niceSOFT
/
numpy
Обзор
Документация
Войти
/
niceSOFT
/
numpy
Код
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
main
doc/source/f2py/code/allocarr.f90
16 строк
325 B
Rohit Goswami
MAINT,DOC: Refactor, syntax highlighting for f2py
19 сен 2021, 20:52
Не верифицирован
19 сен 2021, 20:52
156c005
Код
Авторство
О чём код?
module mod real, allocatable, dimension(:,:) :: b contains subroutine foo integer k if (allocated(b)) then print*, "b=[" do k = 1,size(b,1) print*, b(k,1:size(b,2)) enddo print*, "]" else print*, "b is not allocated" endif end subroutine foo end module mod