1! { dg-options "-O3 -ffast-math" }
2
3      COMMON /NONEQ / UNZOR
4      DO ITS = 1, NTS
5        DO JATOM = 1, NAT
6          IF(IEF.EQ.5.OR.IEF.EQ.8)
7     *       UNZOR = UNZOR + 8
8        ENDDO
9      ENDDO
10      END
11