OpenMP: efficiency in reduction in large array

Thanks @PierU and @JohnCampbell ! I will see into my code and smooth them!