1 subroutine matrix_multiply(a
,b
,c
,n
)
3 real(8), dimension(n
,n
) :: a
,b
,c
5 ! The following code is disabled for the moment.
8 end subroutine matrix_multiply
10 ! Disabled for now as it requires delinearization.
11 ! { dg-final { scan-tree-dump-times "number of SCoPs: 1" 1 "graphite" { xfail *-*-* } } }