Changeset 895b31c in git for libpolys/polys

Timestamp:

Sep 7, 2011, 9:04:02 PM (13 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

24a614b681d4af53443e0c34996cabb9b422a5b7

Parents:

74efabb42c9d0825e2d00926d5c6ba96801ed521

git-author:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-09-07 21:04:02+02:00

git-committer:

Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 16:12:33+01:00

Message:

ADD: re-enabled _HNF/_LLL

Location:

libpolys/polys

Files:

• clapsing.cc (modified) (5 diffs)
• clapsing.h (modified) (1 diff)

libpolys/polys/clapsing.cc

@@ -1100 +1100 @@
 
 #ifdef HAVE_NTL
-#if 0
+#if 1
 matrix singntl_HNF(matrix  m, const ring s )
 {
@@ -1109 +1109 @@
     return NULL;
   }
-  matrix res=mpNew(r,r);
+   
+  matrix res=mp_New(r,r);
+   
   if (rField_is_Q(s))
   {
@@ -1134 +1136 @@
   return res;
 }
-intvec* singntl_HNF(intvec*  m)
+
+intvec* singntl_HNF(intvec*  m, const ring)
 {
   int r=m->rows();
@@ -1164 +1167 @@
   return mm;
 }
+
 matrix singntl_LLL(matrix  m, const ring s )
 {
   int r=m->rows();
   int c=m->cols();
-  matrix res=mpNew(r,c);
+  matrix res=mp_New(r,c);
   if (rField_is_Q(s))
   {
@@ -1192 +1196 @@
   return res;
 }
-intvec* singntl_LLL(intvec*  m)
+
+intvec* singntl_LLL(intvec*  m, const ring)
 {
   int r=m->rows();

libpolys/polys/clapsing.h

@@ -43 +43 @@
 
 #ifdef HAVE_NTL
+#if 1
 matrix singntl_HNF(matrix A, const ring r);
 intvec* singntl_HNF(intvec* A, const ring r);
 matrix singntl_LLL(matrix A, const ring r);
 intvec* singntl_LLL(intvec* A, const ring r);
+#endif
 #endif