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

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

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

revision 1388 by trankine, Fri Jan 11 07:45:58 2008 UTC revision 1552 by gross, Thu May 8 08:52:41 2008 UTC
# Line 67  void  Paso_SystemMatrix_MatrixVector(dou Line 67  void  Paso_SystemMatrix_MatrixVector(dou
67                Paso_SparseMatrix_MatrixVector_CSR_OFFSET1(alpha,A->mainBlock,in,beta,out);                Paso_SparseMatrix_MatrixVector_CSR_OFFSET1(alpha,A->mainBlock,in,beta,out);
68             }             }
69       } else {       } else {
          Paso_SystemMatrix_allocBuffer(A);  
70           if (Paso_noError()) {           if (Paso_noError()) {
71              Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(alpha,A,in,beta,out);              Paso_SystemMatrix_MatrixVector_CSR_OFFSET0(alpha,A,in,beta,out);
72           }           }
          Paso_SystemMatrix_freeBuffer(A);  
73       }       }
74    }    }
75  }  }
# Line 90  void  Paso_SystemMatrix_MatrixVector_CSR Line 88  void  Paso_SystemMatrix_MatrixVector_CSR
88    /* finish exchange */    /* finish exchange */
89    remote_values=Paso_SystemMatrix_finishCollect(A);    remote_values=Paso_SystemMatrix_finishCollect(A);
90    /* process couple block */    /* process couple block */
91    Paso_SparseMatrix_MatrixVector_CSR_OFFSET0(alpha,A->coupleBlock,remote_values,1.,out);    Paso_SparseMatrix_MatrixVector_CSR_OFFSET0(alpha,A->col_coupleBlock,remote_values,1.,out);
92  }  }

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

  ViewVC Help
Powered by ViewVC 1.1.26