Changeset daf8e1 in git

Timestamp:

Sep 23, 2004, 2:50:52 PM (20 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

1baf4f9f23defe16f204a32e64709f7974e922ef

Parents:

74d2017e2056f5e9fdb31c68b3163b7b8f7c2fd7

Message:

*bricken:steps towards sparse matrizes


git-svn-id: file:///usr/local/Singular/svn/trunk@7488 2c84dea3-7e68-4137-9b89-c4e89433aadc

Location:

Singular

Files:

• tgb.cc (modified) (2 diffs)
• tgb.h (modified) (1 diff)

Singular/tgb.cc

@@ -1236 +1236 @@
   return (*node)->n;
 }
-class mac_poly_r{
-public:
-  number coef;
-  mac_poly_r* next;
-  int exp;
-  mac_poly_r():next(NULL){}
-};
+
 //mac_polys exp are smaller iff they are greater by monomial ordering
 //corresponding to solving linear equations notation
@@ -1249 +1243 @@
   int n;
 };
-typedef mac_poly_r* mac_poly;
-  void t2ippa_rec(poly* ip,int* ia, poly_tree_node* k, int &offset){
+
+void t2ippa_rec(poly* ip,int* ia, poly_tree_node* k, int &offset){
     if(!k) return;
     t2ippa_rec(ip,ia,k->l,offset);

Singular/tgb.h

@@ -108 +108 @@
   tgb_matrix(int i, int j);
   ~tgb_matrix();
+  int get_rows();
+  int get_columns();
+  void print();
+  void perm_rows(int i, int j);
+  void set(int i, int j, number n);
+  number get(int i, int j);
+  BOOLEAN is_zero_entry(int i, int j);
+  void free_row(int row, BOOLEAN free_non_zeros=TRUE);
+  int min_col_not_zero_in_row(int row);
+  int next_col_not_zero(int row,int pre);
+  BOOLEAN zero_row(int row);
+  void mult_row(int row,number factor);
+  void add_lambda_times_row(int add_to,int summand,number factor);
+  int non_zero_entries(int row);
+};
+class mac_poly_r{
+public:
+  number coef;
+  mac_poly_r* next;
+  int exp;
+  mac_poly_r():next(NULL){}
+};
+//mac_polys exp are smaller iff they are greater by monomial ordering
+//corresponding to solving linear equations notation
+
+typedef mac_poly_r* mac_poly;
+class tgb_sparse_matrix{
+ private:
+  mac_poly* mp;
+  int columns;
+  int rows;
+  BOOLEAN free_numbers;
+ public:
+  tgb_sparse_matrix(int i, int j);
+  ~tgb_sparse_matrix();
   int get_rows();
   int get_columns();