/[escript]/trunk/paso/src/Pattern_coupling.c
ViewVC logotype

Diff of /trunk/paso/src/Pattern_coupling.c

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

revision 2763 by artak, Thu Nov 19 05:22:45 2009 UTC revision 2764 by artak, Thu Nov 19 23:48:05 2009 UTC
# Line 436  void Paso_Pattern_greedy_diag(Paso_Spars Line 436  void Paso_Pattern_greedy_diag(Paso_Spars
436            
437      while (Paso_Util_isAny(n,mis_marker,IS_AVAILABLE)) {      while (Paso_Util_isAny(n,mis_marker,IS_AVAILABLE)) {
438           k=0;           k=0;
439           #pragma omp parallel for private(i,j,k) schedule(static)          
440           for (i=0;i<n;++i) {           for (i=0;i<n;++i) {
441             if(mis_marker[i]==IS_AVAILABLE) {             if(mis_marker[i]==IS_AVAILABLE) {
442                  if(k==0) {                  if(k==0) {
# Line 461  void Paso_Pattern_greedy_diag(Paso_Spars Line 461  void Paso_Pattern_greedy_diag(Paso_Spars
461                            
462           }           }
463                            
          #pragma omp parallel for private(i,iptr,j,rsum) schedule(static)  
464          for (i=0;i<n;++i) {          for (i=0;i<n;++i) {
465              if(AvADJ[i]) {              if(AvADJ[i]) {
466                  rsum=0;                  rsum=0;

Legend:
Removed from v.2763  
changed lines
  Added in v.2764

  ViewVC Help
Powered by ViewVC 1.1.26