Changeset b19ab84 in git for libpolys/coeffs/rmodulon.cc

Timestamp:

May 10, 2011, 7:05:58 PM (12 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')

Children:

05aa4ba5a9c62c92398b1cd7067b8977ec993bb3

Parents:

bea370bfafc6b719f65e3d21472ecc023533e962

git-author:

Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-05-10 19:05:58+02:00

git-committer:

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

Message:

add some missing routines to coeffs

File:

• libpolys/coeffs/rmodulon.cc (modified) (2 diffs)

libpolys/coeffs/rmodulon.cc

@@ -34 +34 @@
   omFreeSize((ADDRESS)s, l);
 }
+
+static BOOLEAN nrnCoeffsEqual(const coeffs r, n_coeffType n, void * parameter)
+{
+  /* test, if r is an instance of nInitCoeffs(n,parameter) */
+  return (n==n_Zn) && (mpz_cmp(r->modNumber,(mpz_ptr)parameter)==0);
+}
+
 
 /* for initializing function pointers */
@@ -75 +82 @@
   r->cfName        = ndName;
   r->cfCoeffWrite  = nrnCoeffWrite;
+  r->nCoeffIsEqual = nrnCoeffsEqual;
 #ifdef LDEBUG
   r->cfDBTest      = nrnDBTest;