Changeset 312083 in git

Timestamp:

Jan 8, 2014, 5:22:45 PM (10 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

997a5b282af0b323c9bb89271696d95981d58835

Parents:

9351bbb04b6e0929df3ea03400aa1dba233a27b3

Message:

chg: cleanup janet.*

Location:

Singular

Files:

• janet.cc (modified) (6 diffs)
• janet.h (modified) (1 diff)

Singular/janet.cc

@@ -51 +51 @@
 #define pow_(x) jDeg((x),currRing)
 
+#if 0
 void Debug()
 {
@@ -77 +78 @@
   PrintS("===================================\n");
 }
+#endif
 
 int ReducePolyLead(Poly *x,Poly *y)
@@ -269 +271 @@
       }
 #else
-      if (count>500)
+      if (count>50)
       {
         kBucketClear(p->root_b,&p->root,&p->root_l);
@@ -801 +803 @@
 }
 
+#if 0
 void ForEach(TreeM *t,poly_function disp)
 {
   go_right(t->root,disp);
 }
+#endif
 
 void DestroyTree(NodeM *G)
@@ -975 +979 @@
 static Poly *h/*,*f*/;
 
+#if 0
 void insert_in_G(Poly *x)
 {
  insert_(&G,x);
 }
+#endif
 
 void T2G();
 
+#if 0
 void Q2TG()
 {
@@ -997 +1004 @@
   }
 }
+#endif
 
 int ComputeBasis(jList *_lT,jList *_lQ)

Singular/janet.h

@@ -55 +55 @@
 void DestroyTree(NodeM *);
 NodeM* create();
-void ForEach(TreeM *,poly_function);
+//void ForEach(TreeM *,poly_function);
 void ControlProlong(Poly *);
 Poly* is_div_(TreeM *root, poly item);