/[escript]/trunk/paso/src/SystemMatrix_setValues.cpp
ViewVC logotype

Diff of /trunk/paso/src/SystemMatrix_setValues.cpp

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

revision 4828 by caltinay, Mon Mar 24 05:42:42 2014 UTC revision 4829 by caltinay, Thu Apr 3 04:02:53 2014 UTC
# Line 15  Line 15 
15  *****************************************************************************/  *****************************************************************************/
16    
17    
18  /************************************************************************************/  /****************************************************************************/
19    
20  /* Paso: SystemMatrix :                                       */  /* Paso: SystemMatrix :                                       */
21  /*  sets the values of the system matrix to a value           */  /*  sets the values of the system matrix to a value           */
22    
23  /************************************************************************************/  /****************************************************************************/
24    
25  /* Author: Lutz Gross, l.gross@uq.edu.au */  /* Author: Lutz Gross, l.gross@uq.edu.au */
26    
27  /************************************************************************************/  /****************************************************************************/
28    
29  #include "Paso.h"  #include "Paso.h"
30  #include "SystemMatrix.h"  #include "SystemMatrix.h"
31    
32  /************************************************************************************/  /****************************************************************************/
33    
34  void  Paso_SystemMatrix_setValues(Paso_SystemMatrix* in,double value) {  void  Paso_SystemMatrix_setValues(Paso_SystemMatrix* in,double value)
35    {
36    if (in!=NULL) {      if (in!=NULL) {
37        paso::SparseMatrix_setValues(in->mainBlock, value);          in->mainBlock->setValues(value);
38        paso::SparseMatrix_setValues(in->col_coupleBlock, value);          in->col_coupleBlock->setValues(value);
39        paso::SparseMatrix_setValues(in->row_coupleBlock, value);          in->row_coupleBlock->setValues(value);
40        in->is_balanced=FALSE;          in->is_balanced = false;
41    }      }
42  }  }

Legend:
Removed from v.4828  
changed lines
  Added in v.4829

  ViewVC Help
Powered by ViewVC 1.1.26