remove unused 'MATRIX_HERMITIAN' flag

This property is sometimes set on matrices but then never read.

diff --git a/cmd/tools/matrix_market.c b/cmd/tools/matrix_market.c
index 7e1c19ef4cd5e89f13b54c31c3831eabfde3779e..d727f72a3dbfcf4ecf2faf7eec3c7ffd41a5d953 100644 (file)
--- a/cmd/tools/matrix_market.c
+++ b/cmd/tools/matrix_market.c
@@ -242,8 +242,6 @@ SparseMatrix SparseMatrix_import_matrix_market(FILE * f)
        SparseMatrix_set_pattern_symmetric(A);
     } else if (mm_is_skew(matcode)) {
        SparseMatrix_set_skew(A);
-    } else if (mm_is_hermitian(matcode)) {
-       SparseMatrix_set_hemitian(A);
     }
 
 

diff --git a/lib/sparse/SparseMatrix.c b/lib/sparse/SparseMatrix.c
index f4efd6a0fa8d26e2b0f42617b602672263a09daf..93d80774eb30d94b8437bfb30be28644d1901f93 100644 (file)
--- a/lib/sparse/SparseMatrix.c
+++ b/lib/sparse/SparseMatrix.c
@@ -1626,7 +1626,6 @@ SparseMatrix SparseMatrix_remove_upper(SparseMatrix A){/* remove diag and upper
   clear_flag(A->property, MATRIX_PATTERN_SYMMETRIC);
   clear_flag(A->property, MATRIX_SYMMETRIC);
   clear_flag(A->property, MATRIX_SKEW);
-  clear_flag(A->property, MATRIX_HERMITIAN);
   return A;
 }
 

diff --git a/lib/sparse/SparseMatrix.h b/lib/sparse/SparseMatrix.h
index 56066f74cb7b6222150aaddf532d1839c160fd37..1090ef2725221670776216de953eba0751e259cd 100644 (file)
--- a/lib/sparse/SparseMatrix.h
+++ b/lib/sparse/SparseMatrix.h
@@ -21,7 +21,7 @@ extern "C" {
 #define SYMMETRY_EPSILON 0.0000001
 enum {FORMAT_CSC, FORMAT_CSR, FORMAT_COORD};
 enum {UNMASKED = -10, MASKED = 1};
-enum {MATRIX_PATTERN_SYMMETRIC = 1<<0, MATRIX_SYMMETRIC = 1<<1, MATRIX_SKEW = 1<<2, MATRIX_HERMITIAN = 1<<3, MATRIX_UNDIRECTED = 1<<4};
+enum {MATRIX_PATTERN_SYMMETRIC = 1<<0, MATRIX_SYMMETRIC = 1<<1, MATRIX_SKEW = 1<<2, MATRIX_UNDIRECTED = 1<<4};
 enum {BIPARTITE_RECT = 0, BIPARTITE_PATTERN_UNSYM, BIPARTITE_UNSYM, BIPARTITE_ALWAYS};
 
 
@@ -112,7 +112,6 @@ SparseMatrix SparseMatrix_from_dense(int m, int n, double *x);
 #define SparseMatrix_set_symmetric(A) set_flag((A)->property, MATRIX_SYMMETRIC)
 #define SparseMatrix_set_pattern_symmetric(A) set_flag((A)->property, MATRIX_PATTERN_SYMMETRIC)
 #define SparseMatrix_set_skew(A) set_flag((A)->property, MATRIX_SKEW)
-#define SparseMatrix_set_hemitian(A) set_flag((A)->property, MATRIX_HERMITIAN)
 
 
 #define SparseMatrix_known_undirected(A) test_flag((A)->property, MATRIX_UNDIRECTED)