Ð¤Ð°Ð¹Ð»Ð¾Ð²Ñ‹Ð¹ Ð¼ÐµÐ½ÐµÐ´Ð¶ÐµÑ€

Ð¤Ð°Ð¹Ð»Ð¾Ð²Ñ‹Ð¹ Ð¼ÐµÐ½ÐµÐ´Ð¶ÐµÑ€ - Ð ÐµÐ´Ð°ÐºÑ‚Ð¸Ñ€Ð¾Ð²Ð°Ñ‚ÑŒ - /opt/imh-python/lib/python3.9/site-packages/numpy/f2py/tests/src/crackfortran/data_stmts.f90

ÐÐ°Ð·Ð°Ð´
! gh-23276 module cmplxdat implicit none integer :: i, j real :: x, y real, dimension(2) :: z complex(kind=8), target :: medium_ref_index complex(kind=8), target :: ref_index_one, ref_index_two complex(kind=8), dimension(2) :: my_array real(kind=8), dimension(3) :: my_real_array = (/1.0d0, 2.0d0, 3.0d0/) data i, j / 2, 3 / data x, y / 1.5, 2.0 / data z / 3.5, 7.0 / data medium_ref_index / (1.d0, 0.d0) / data ref_index_one, ref_index_two / (13.0d0, 21.0d0), (-30.0d0, 43.0d0) / data my_array / (1.0d0, 2.0d0), (-3.0d0, 4.0d0) / end module cmplxdat

| ver. 1.1 | | . | PHP 8.3.30 | Ð“ÐµÐ½ÐµÑ€Ð°Ñ†Ð¸Ñ ÑÑ‚Ñ€Ð°Ð½Ð¸Ñ†Ñ‹: 0 | proxy | phpinfo | ÐÐ°ÑÑ‚Ñ€Ð¾Ð¹ÐºÐ°