Кто разбирается в OMP, нужно найти ошибку

void parallelSearch(){
#pragma omp parallel shared(pMax, piMax, pjMax, pMin, piMin, pjMin, pSum, pAver) 
{
int localMax = -1, localIMax = 0, localJMax = 0;
int localMin = 30000, localIMin = 0, localJMin = 0;
int localSum=0;
#pragma omp for private(localMax, localMin, localSum, localIMax, localJMax, localIMin)
 
for(m=0; m<GridSize; m++)
for(n=0; n<GridSize; n++)
for (i=n*BlockSize;i<(n+1)*BlockSize; i++) 
for (j=m*BlockSize;j<(m+1)*BlockSize; j++) 
 
{
 
if (mass[i][j] > localMax) {
localMax = mass[i][j];
localIMax = i;
localJMax = j;
 
}
if (mass[i][j] < localMin) {
localMin = mass[i][j];
localIMin = i;
localJMin = j;
 
}
 
 
localSum = localSum + mass[i][j];
 
}
 
#pragma omp critical
{
if (localMax > pMax) {
pMax = localMax;
piMax = localIMax;
pjMax = localJMax;
}
 
if (localMin < pMin) {
pMin = localMin;
piMin = localIMin;
pjMin = localJMin;
}
pSum = pSum + localSum; }
}
pAver = pSum / mtrxSize;
}