Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
graphite
/
id-pr47691.f
blob: 0abbd5562effe183ccd6ef73e44983ee28313a6c [
file
] [
log
] [
blame
]
!
{
dg
-
options
"-O -fgraphite-identity -ffast-math -fno-tree-scev-cprop"
}
dimension b
(
12
,
8
)
do
i
=
1
,
norb
end
do
b
(
i
,
j
)
=
0
call rdrsym
(
b
)
end