/beegfs/hackathon/users/eoseret/qaas_runs_test/178-668-9639/intel/AMG/build/AMG/AMG/seq_mv/csr_matvec.c: 178 - 206
--------------------------------------------------------------------------------

178: #pragma omp parallel for private(i,j,jj,m,tempx) HYPRE_SMP_SCHEDULE
179: #endif
180: 
181:          for (i = 0; i < num_rownnz; i++)
182:          {
183:             m = A_rownnz[i];
[...]
191:             if ( num_vectors==1 )
192:             {
193:                tempx = 0;
194:                for (jj = A_i[m]; jj < A_i[m+1]; jj++)
195:                   tempx +=  A_data[jj] * x_data[A_j[jj]];
196:                y_data[m] += tempx;
197:             }
198:             else
199:                for ( j=0; j<num_vectors; ++j )
200:                {
201:                   tempx = 0;
202:                   for (jj = A_i[m]; jj < A_i[m+1]; jj++) 
203:                      tempx +=  A_data[jj] * x_data[ j*vecstride_x + A_j[jj]*idxstride_x ];
204:                   y_data[ j*vecstride_y + m*idxstride_y] += tempx;
205:                }
206:          }
