Changeset e9039a7 in git for libpolys/coeffs/ffields.cc

Timestamp:

Sep 27, 2011, 12:41:03 PM (13 years ago)

Author:

Burcin Erocal <burcin@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

31c731745883c6d2ee7aba0e448c9320087d095a

Parents:

37e36e946ee174d951bb2e0fbae1283480ace5f6

git-author:

Burcin Erocal <burcin@erocal.org>2011-09-27 12:41:03+02:00

git-committer:

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

Message:

Print number of elements of GF's instead of characteristic.

Implement nCoeffIsEqual for n_GF coefficient domains.

File:

• libpolys/coeffs/ffields.cc (modified) (3 diffs)

libpolys/coeffs/ffields.cc

@@ -763 +763 @@
   //r->cfKillChar=nfKillChar;
   r->cfSetChar= NULL;
-  //r->nCoeffIsEqual=nfCoeffsEqual;
+  r->nCoeffIsEqual=nfCoeffIsEqual;
 
   r->cfMult  = nfMult;
@@ -864 +864 @@
 void    nfCoeffWrite  (const coeffs r)
 {
-  Print("//   # ground field : %d\n",r->m_nfCharP);
+  // m_nfCharQ = p^k where p is the characteristic (r->CharP) and k is GFDegree
+  Print("//   # ground field : %d\n",r->m_nfCharQ);
   Print("//   primitive element : %s\n", r->m_nfParameter);
   StringSetS("//   minpoly        : ");
@@ -870 +871 @@
 }
 
+BOOLEAN nfCoeffIsEqual (const coeffs r, n_coeffType n, void * parameter)
+{
+
+  if (n==n_GF) {
+    GFInfo* p = (GFInfo *)(parameter);
+    int c = pow (p->GFChar, p->GFDegree);
+    if (c == r->m_nfCharQ)
+      return TRUE;
+  }
+  return FALSE;
+}