Intel® Fortran Compiler
Build applications that can scale for the future with optimized code designed for Intel® Xeon® and compatible processors.

DO CONCURRENT loop bug?

Trappist
Beginner
79 Views

Hello,

Is this code correct ?

 DO CONCURRENT( I = 1: NI )REDUCE(+:TMP)
     TMP = TMP + FLOAT(I)
     A(I) = TMP
 ENDDO

 

For replacing the origin one,

DO I = 1, NI ! NI = NP*IC
   TMP =
TMP + FLOAT(I)

   A(I) = TMP
ENDDO

 

Wrong , unmatched results, when compiling with -fopenmp option for Intel Fortran! 

 

Thank you for any suggestion!

0 Kudos
0 Replies
Reply