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

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

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

revision 1552 by gross, Thu May 8 08:52:41 2008 UTC revision 1562 by gross, Wed May 21 13:04:40 2008 UTC
# Line 54  void Paso_SystemMatrix_nullifyRowsAndCol Line 54  void Paso_SystemMatrix_nullifyRowsAndCol
54              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->mainBlock,mask_row,mask_col,main_diagonal_value);              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->mainBlock,mask_row,mask_col,main_diagonal_value);
55              remote_values=Paso_SystemMatrix_finishColCollect(A);              remote_values=Paso_SystemMatrix_finishColCollect(A);
56              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->col_coupleBlock,mask_row,remote_values,0.);              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->col_coupleBlock,mask_row,remote_values,0.);
57              remote_values=Paso_SystemMatrix_finishRowCollect(A);              /* remote_values=Paso_SystemMatrix_finishRowCollect(A);
58              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->row_coupleBlock,remote_values,mask_col,0.);              Paso_SparseMatrix_nullifyRowsAndCols_CSR_BLK1(A->row_coupleBlock,remote_values,mask_col,0.);
59                */
60           }           }
61         }         }
62       } else {       } else {
# Line 72  void Paso_SystemMatrix_nullifyRowsAndCol Line 73  void Paso_SystemMatrix_nullifyRowsAndCol
73              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->mainBlock,mask_row,mask_col,main_diagonal_value);              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->mainBlock,mask_row,mask_col,main_diagonal_value);
74              remote_values=Paso_SystemMatrix_finishColCollect(A);              remote_values=Paso_SystemMatrix_finishColCollect(A);
75              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->col_coupleBlock,mask_row,remote_values,0.);              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->col_coupleBlock,mask_row,remote_values,0.);
76                /*
77              remote_values=Paso_SystemMatrix_finishRowCollect(A);              remote_values=Paso_SystemMatrix_finishRowCollect(A);
78              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->row_coupleBlock,remote_values,mask_col,0.);              Paso_SparseMatrix_nullifyRowsAndCols_CSR(A->row_coupleBlock,remote_values,mask_col,0.);
79                */
80           }           }
81         }         }
82       }       }

Legend:
Removed from v.1552  
changed lines
  Added in v.1562

  ViewVC Help
Powered by ViewVC 1.1.26