/[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 2550 by jfenwick, Mon Jul 20 06:20:06 2009 UTC revision 2551 by gross, Thu Jul 23 09:19:15 2009 UTC
# Line 178  void Paso_Pattern_RS(Paso_SparseMatrix* Line 178  void Paso_Pattern_RS(Paso_SparseMatrix*
178              if(A->val[iptr]<=threshold) {              if(A->val[iptr]<=threshold) {
179                 if(j!=i) {                 if(j!=i) {
180                  Paso_IndexList_insertIndex(&(index_list[i]),j);                  Paso_IndexList_insertIndex(&(index_list[i]),j);
181                  /*Paso_IndexList_insertIndex(&(index_list[j]),i);*/                  Paso_IndexList_insertIndex(&(index_list[j]),i);
182                  }                  }
183              }              }
184          }          }
# Line 197  void Paso_Pattern_RS(Paso_SparseMatrix* Line 197  void Paso_Pattern_RS(Paso_SparseMatrix*
197    
198      /*Paso_Pattern_mis(out,mis_marker);*/      /*Paso_Pattern_mis(out,mis_marker);*/
199      Paso_Pattern_greedy(out,mis_marker);      Paso_Pattern_greedy(out,mis_marker);
200        Paso_Pattern_free(out);
201  }  }
202    
203  void Paso_Pattern_Aggregiation(Paso_SparseMatrix* A, index_t* mis_marker, double theta)  void Paso_Pattern_Aggregiation(Paso_SparseMatrix* A, index_t* mis_marker, double theta)

Legend:
Removed from v.2550  
changed lines
  Added in v.2551

  ViewVC Help
Powered by ViewVC 1.1.26