3 subroutine s243(ntimes
,ld
,n
,ctime
,dtime
,a
,b
,c
,d
,e
,aa
,bb
,cc
)
5 integer ntimes
,ld
,n
,i
,nl
6 real a(n
),b(n
),c(n
),d(n
),e(n
),aa(ld
,n
),bb(ld
,n
),cc(ld
,n
)
7 real t1
,t2
,chksum
,ctime
,dtime
,cs1d
8 b(:n
-1)= b(:n
-1)+(c(:n
-1)+e(:n
-1))*d(:n
-1)
9 a(:n
-1)= b(:n
-1)+a(2:n
)*d(:n
-1)
13 ! Currently only the first loop gets vectorized.
14 ! For the second loop vectorization fails because of
15 ! "affine-affine test failed: missing iteration counts."
16 ! See PR 32377 for more details.
18 ! { dg-final { scan-tree-dump-times "vectorized 2 loops" 1 "vect" { xfail *-*-* } } }
19 ! { dg-final { cleanup-tree-dump "vect" } }