remove unused SparseMatrix_export_binary_fp

diff --git a/lib/sparse/SparseMatrix.c b/lib/sparse/SparseMatrix.c
index 9fc08f986619ccb177ece310b19c4a03d0f9a104..1d5faa3aed9ef0533bf0a5b474da1c307ba216fb 100644 (file)
--- a/lib/sparse/SparseMatrix.c
+++ b/lib/sparse/SparseMatrix.c
@@ -618,26 +618,6 @@ static void SparseMatrix_export_csr(FILE *f, SparseMatrix A){
 
 }
 
-void SparseMatrix_export_binary_fp(FILE *f, SparseMatrix A){
-
-  fwrite(&(A->m), sizeof(int), 1, f);
-  fwrite(&(A->n), sizeof(int), 1, f);
-  fwrite(&(A->nz), sizeof(int), 1, f);
-  fwrite(&(A->nzmax), sizeof(int), 1, f);
-  fwrite(&(A->type), sizeof(int), 1, f);
-  fwrite(&(A->format), sizeof(int), 1, f);
-  fwrite(&(A->property), sizeof(int), 1, f);
-  fwrite(&(A->size), sizeof(size_t), 1, f);
-  if (A->format == FORMAT_COORD){
-    fwrite(A->ia, sizeof(int), A->nz, f);
-  } else {
-    fwrite(A->ia, sizeof(int), A->m + 1, f);
-  }
-  fwrite(A->ja, sizeof(int), A->nz, f);
-  if (A->size > 0) fwrite(A->a, A->size, A->nz, f);
-
-}
-
 SparseMatrix SparseMatrix_import_binary_fp(FILE *f){
   SparseMatrix A = NULL;
   int m, n, nz, nzmax, type, format, property;

diff --git a/lib/sparse/SparseMatrix.h b/lib/sparse/SparseMatrix.h
index 08c0e840199370b505fa5376eef4e7b6e9877488..5f6b2cbfd96065bb3c8de839b0e658b4990a60fa 100644 (file)
--- a/lib/sparse/SparseMatrix.h
+++ b/lib/sparse/SparseMatrix.h
@@ -59,8 +59,6 @@ void SparseMatrix_export(FILE *f, SparseMatrix A);/* export into MM format excep
 SparseMatrix SparseMatrix_import_binary(char *name);
 SparseMatrix SparseMatrix_import_binary_fp(FILE *f);/* import into a preopenned file */
 
-void SparseMatrix_export_binary_fp(FILE *f, SparseMatrix A);/* export binary into a file preopened */
-
 void SparseMatrix_delete(SparseMatrix A);
 
 SparseMatrix SparseMatrix_add(SparseMatrix A, SparseMatrix B);