https://gcc.gnu.org/bugzilla/show_bug.cgi?id=81304
--- Comment #3 from janus at gcc dot gnu.org --- Note that the bogus warning goes away when using scalar reduction variables: program bogus_warning integer :: i real :: Dx_min, Dx_max !$omp parallel do default(shared) private(i) reduction(min: Dx_min) reduction(max: Dx_max) do i = 1,16 end do !$omp end parallel do end