/[escript]/branches/domexper/dudley/src/Util.c
ViewVC logotype

Diff of /branches/domexper/dudley/src/Util.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 3086 by jfenwick, Thu Aug 5 05:07:58 2010 UTC revision 3114 by jfenwick, Fri Aug 27 05:26:25 2010 UTC
# Line 416  index_t Dudley_Util_getMaxInt(dim_t dim, Line 416  index_t Dudley_Util_getMaxInt(dim_t dim,
416           out_local=out;           out_local=out;
417           #pragma omp for private(i,j) schedule(static)           #pragma omp for private(i,j) schedule(static)
418           for (j=0;j<N;j++) {           for (j=0;j<N;j++) {
419               for (i=0;i<dim;i++) out_local=MAX(out_local,values[INDEX2(i,j,dim)]);               for (i=0;i<dim;i++)
420    {
421    //printf("%d,%d,%d[%d] %d\n",i,j,dim,INDEX2(i,j,dim),  values[INDEX2(i,j,dim)]);
422    out_local=MAX(out_local,values[INDEX2(i,j,dim)]);
423    
424    }
425           }           }
426           #pragma omp critical           #pragma omp critical
427           out=MAX(out_local,out);           out=MAX(out_local,out);

Legend:
Removed from v.3086  
changed lines
  Added in v.3114

  ViewVC Help
Powered by ViewVC 1.1.26