1 | #ifndef RMODULON_H |
---|
2 | #define RMODULON_H |
---|
3 | /**************************************** |
---|
4 | * Computer Algebra System SINGULAR * |
---|
5 | ****************************************/ |
---|
6 | /* $Id: rmodulon.h,v 1.5 2008-01-30 13:03:41 wienand Exp $ */ |
---|
7 | /* |
---|
8 | * ABSTRACT: numbers modulo n |
---|
9 | */ |
---|
10 | #ifdef HAVE_RINGMODN |
---|
11 | #include "structs.h" |
---|
12 | |
---|
13 | #ifndef NATNUMBER |
---|
14 | #define NATNUMBER unsigned long |
---|
15 | #endif |
---|
16 | |
---|
17 | BOOLEAN nrnGreaterZero (number k); |
---|
18 | number nrnMult (number a, number b); |
---|
19 | number nrnInit (int i); |
---|
20 | int nrnInt (number &n); |
---|
21 | number nrnAdd (number a, number b); |
---|
22 | number nrnSub (number a, number b); |
---|
23 | void nrnPower (number a, int i, number * result); |
---|
24 | BOOLEAN nrnIsZero (number a); |
---|
25 | BOOLEAN nrnIsOne (number a); |
---|
26 | BOOLEAN nrnIsMOne (number a); |
---|
27 | BOOLEAN nrnIsUnit (number a); |
---|
28 | number nrnGetUnit (number a); |
---|
29 | number nrnDiv (number a, number b); |
---|
30 | number nrnIntDiv (number a,number b); |
---|
31 | number nrnNeg (number c); |
---|
32 | number nrnInvers (number c); |
---|
33 | BOOLEAN nrnGreater (number a, number b); |
---|
34 | BOOLEAN nrnDivBy (number a, number b); |
---|
35 | int nrnComp (number a, number b); |
---|
36 | BOOLEAN nrnEqual (number a, number b); |
---|
37 | number nrnLcm (number a,number b, ring r); |
---|
38 | number nrnGcd (number a,number b,ring r); |
---|
39 | number nrnExtGcd (number a, number b, number *s, number *t); |
---|
40 | nMapFunc nrnSetMap (ring src, ring dst); |
---|
41 | void nrnWrite (number &a); |
---|
42 | char * nrnRead (char *s, number *a); |
---|
43 | char * nrnName (number n); |
---|
44 | #ifdef LDEBUG |
---|
45 | BOOLEAN nrnDBTest (number a, char *f, int l); |
---|
46 | #endif |
---|
47 | void nrnSetExp(int c, ring r); |
---|
48 | void nrnInitExp(int c, ring r); |
---|
49 | |
---|
50 | #endif |
---|
51 | #endif |
---|