/dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | get_array.f90 | 31 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 84 do i_sgn2 = -1, 1, 2 99 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 101 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 120 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 170 do i_sgn2 = -1, 1, 2 185 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 187 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 206 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 256 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | sendget_array.f90 | 31 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 84 do i_sgn2 = -1, 1, 2 99 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 100 = b(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) 120 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 170 do i_sgn2 = -1, 1, 2 185 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 186 = b(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) 206 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 256 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | get_array.f90 | 31 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 84 do i_sgn2 = -1, 1, 2 99 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 101 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 120 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 170 do i_sgn2 = -1, 1, 2 185 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 187 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 206 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 256 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | get_array.f90 | 31 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 84 do i_sgn2 = -1, 1, 2 99 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 101 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 120 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 170 do i_sgn2 = -1, 1, 2 185 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 187 c(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 206 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 256 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | sendget_array.f90 | 31 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 84 do i_sgn2 = -1, 1, 2 99 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 100 = b(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) 120 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 170 do i_sgn2 = -1, 1, 2 185 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 186 = b(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) 206 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 256 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gnat_util/gcc-6-20180516/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gfortran.dg/coarray/ |
H A D | send_array.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 99 do i_sgn2 = -1, 1, 2 120 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 134 ", ", j,":",j_e,":",j_s*i_sgn2 156 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 227 do i_sgn2 = -1, 1, 2 248 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 262 ", ", j,":",j_e,":",j_s*i_sgn2 284 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 354 do i_sgn2 = -1, 1, 2 [all …]
|
/dports/lang/opencoarrays/OpenCoarrays-2.9.0/src/tests/unit/send-get/ |
H A D | send_array_test.f90 | 24 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 96 do i_sgn2 = -1, 1, 2 117 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 131 ", ", j,":",j_e,":",j_s*i_sgn2 152 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 221 do i_sgn2 = -1, 1, 2 242 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 256 ", ", j,":",j_e,":",j_s*i_sgn2 277 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 346 do i_sgn2 = -1, 1, 2 [all …]
|
H A D | get_array_test.f90 | 30 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 112 do i_sgn2 = -1, 1, 2 150 … a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) = caf(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2)[num_images()] 180 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 249 do i_sgn2 = -1, 1, 2 270 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & 284 ", ", j,":",j_e,":",j_s*i_sgn2 305 integer :: i_sgn1, i_sgn2, i, i_e, i_s, j, j_e, j_s local 374 do i_sgn2 = -1, 1, 2 395 a(i:i_e:i_s*i_sgn1, j:j_e:j_s*i_sgn2) & [all …]
|