Changeset e9f4c9 in git

Timestamp:

Feb 28, 2006, 1:02:53 PM (17 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

e65be8e4791b3fcf14f73211d2e46ed7c136bb9e

Parents:

3aed2f52758ed2b5d3810ffd15d6208c17828ea4

Message:

*bricken: slim_nsize exported


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

Location:

kernel

Files:

• tgb.cc (modified) (4 diffs)
• tgb_internal.h (modified) (2 diffs)

kernel/tgb.cc

@@ -5 +5 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: tgb.cc,v 1.76 2006-02-24 12:57:38 bricken Exp $ */
+/* $Id: tgb.cc,v 1.77 2006-02-28 12:02:52 bricken Exp $ */
 /*
 * ABSTRACT: slimgb and F4 implementation
@@ -39 +39 @@
 //static const BOOLEAN up_to_radical=TRUE;
 
-static int slim_nsize(number n, ring r) {
+int slim_nsize(number n, ring r) {
     if (rField_is_Zp(r)){
         return 1;
@@ -145 +145 @@
   
   
-int QlogSizeNew(number n){
+int QlogSize(number n){
     
     if (SR_HDL(n) & SR_INT){
@@ -165 +165 @@
 }
 
-inline int QlogSize(number bigint){
-    return QlogSizeNew(bigint);
-  }
+
 #ifdef LEN_VAR3
 inline int pSLength(poly p,int l)

kernel/tgb_internal.h

@@ -5 +5 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: tgb_internal.h,v 1.31 2006-02-24 12:58:19 bricken Exp $ */
+/* $Id: tgb_internal.h,v 1.32 2006-02-28 12:02:53 bricken Exp $ */
 /*
  * ABSTRACT: tgb internal .h file
@@ -208 +208 @@
 static poly kBucketGcd(kBucket* b, ring r);
 static void multi_reduction(red_object* los, int & losl, slimgb_alg* c);
-
+int slim_nsize(number n, ring r);
 sorted_pair_node* quick_pop_pair(slimgb_alg* c);
 sorted_pair_node* top_pair(slimgb_alg* c);