Sign in
gnu
/
gcc
/
a6d3012b274f38b20e2a57162106f625746af6c6
/
.
/
gcc
/
testsuite
/
gfortran.dg
/
graphite
/
id-22.f
blob: 4b943f1b58be8b9f1e5fc0509c87d2d7be7141ae [
file
] [
log
] [
blame
]
!
{
dg
-
options
"-O3 -ffast-math"
}
COMMON
/
NONEQ
/
UNZOR
DO ITS
=
1
,
NTS
DO JATOM
=
1
,
NAT
IF
(
IEF
.
EQ
.
5.OR
.
IEF
.
EQ
.
8
)
*
UNZOR
=
UNZOR
+
8
ENDDO
ENDDO
END