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

Diff of /trunk/paso/src/SystemMatrix_saveMM.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 is saved to Matrix Market format      */  /* Paso: SystemMatrix is saved to Matrix Market format      */
21    
22  /************************************************************************************/  /****************************************************************************/
23    
24  /* Copyrights by ACcESS Australia 2003,2004 */  /* Copyrights by ACcESS Australia 2003,2004 */
25  /* Author: davies@access.edu.au */  /* Author: davies@access.edu.au */
26    
27  /************************************************************************************/  /****************************************************************************/
28    
29  #include "SystemMatrix.h"  #include "SystemMatrix.h"
30  #include "mmio.h"  #include "mmio.h"
31    
32  void Paso_SystemMatrix_saveMM(Paso_SystemMatrix * A_p, char * fileName_p) {  void Paso_SystemMatrix_saveMM(Paso_SystemMatrix* A_p, char* fileName_p)
33     if (A_p->mpi_info->size > 1) {  {
34        Esys_setError(IO_ERROR, "Paso_SystemMatrix_saveMM: Only single processor supported.");      if (A_p->mpi_info->size > 1) {
35     } else {          Esys_setError(IO_ERROR, "Paso_SystemMatrix_saveMM: Only single processor supported.");
36         paso::SparseMatrix_saveMM(A_p->mainBlock,fileName_p);      } else {
37     }          A_p->mainBlock->saveMM(fileName_p);
38        }
39  }  }
40    

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

  ViewVC Help
Powered by ViewVC 1.1.26