Changeset 1629ab in git for kernel/longalg.h

Timestamp:

Aug 14, 2009, 7:14:30 PM (15 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

a2787db38eefc1420adf5a8707671c1901ead89f

Parents:

1a76b926417798b97d4f503af69e8a461bb9ce4a

Message:

*hannes: cleanup longalg


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

File:

• kernel/longalg.h (modified) (3 diffs)

kernel/longalg.h

@@ -4 +4 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: longalg.h,v 1.14 2009-08-07 13:55:21 Singular Exp $ */
+/* $Id: longalg.h,v 1.15 2009-08-14 17:14:30 Singular Exp $ */
 /*
 * ABSTRACT:   algebraic numbers
@@ -22 +22 @@
 };
 
-extern int naNumbOfPar;             /* maximal number of parameters */
+extern napoly naMinimalPoly;
+extern ring nacRing;
 
-extern napoly naMinimalPoly;
 
 void naSetChar(int p, ring r);
@@ -72 +72 @@
 #define napNeg(p)              (p_Neg(p,currRing->algring))
 #define napVariables           naNumbOfPar
-#define napNext(p)             pNext(p)
-#define napIter(p)             pIter(p)
 #define napGetCoeff(p)         pGetCoeff(p)
 #define napGetExp(p,i)         (p_GetExp(p,i,currRing->algring))
 #define napGetExpFrom(p,i,r)   (p_GetExp(p,i,r->algring))
 #define napSetExp(p,i,e)       (p_SetExp(p,i,e,currRing->algring))
-#define napDelete(p)           p_Delete(p, currRing->algring)
 #define napNew()               (p_Init(currRing->algring))
 #define napAdd(p1,p2)          (p_Add_q(p1,p2,currRing->algring))