source: git/kernel/numbers.h @ 899741

spielwiese
Last change on this file since 899741 was e8a0aa, checked in by Hans Schönemann <hannes@…>, 16 years ago
*hannes: nlInpAdd git-svn-id: file:///usr/local/Singular/svn/trunk@10950 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 3.7 KB
Line 
1#ifndef NUMBERS_H
2#define NUMBERS_H
3/****************************************
4*  Computer Algebra System SINGULAR     *
5****************************************/
6/* $Id: numbers.h,v 1.15 2008-08-06 13:55:42 Singular Exp $ */
7/*
8* ABSTRACT: interface to coefficient aritmetics
9*/
10#include "structs.h"
11
12#define n_Copy(n, r)          (r)->cf->cfCopy(n,r)
13#define n_Delete(n, r)        (r)->cf->cfDelete(n,r)
14#define n_Mult(n1, n2, r)     (r)->cf->nMult(n1, n2)
15#define n_Add(n1, n2, r)      (r)->cf->nAdd(n1, n2)
16#define n_IsZero(n, r)        (r)->cf->nIsZero(n)
17#define n_Equal(n1, n2, r)    (r)->cf->nEqual(n1, n2)
18#define n_Neg(n, r)           (r)->cf->nNeg(n)
19#define n_Sub(n1, n2, r)      (r)->cf->nSub(n1, n2)
20//#define n_GetChar(r)          ((r)->cf->nChar)
21#define n_GetChar(r)          ((r)->ch)
22#define n_Init(i, r)          (r)->cf->nInit(i)
23#define n_IsOne(n, r)         (r)->cf->nIsOne(n)
24#define n_IsMOne(n, r)        (r)->cf->nIsMOne(n)
25#define n_GreaterZero(n, r)   (r)->cf->nGreaterZero(n)
26#define n_Write(n, r)         (r)->cf->nWrite(n)
27#define n_Normalize(n, r)     (r)->cf->nNormalize(n)
28#define n_Gcd(a, b, r)        (r)->cf->nGcd(a,b,r)
29#define n_IntDiv(a, b, r)     (r)->cf->nIntDiv(a,b)
30#define n_Div(a, b, r)        (r)->cf->nDiv(a,b)
31#define n_ExactDiv(a, b, r)   (r)->cf->nExactDiv(a,b)
32#define n_Test(a,r)           (r)->cf->nDBTest(a,__FILE__,__LINE__)
33
34#define n_InpMult(a, b, r)    (r)->cf->nInpMult(a,b,r)
35#define n_Power(a, b, res, r) (r)->cf->nPower(a,b,res)
36#define n_Size(n,r)           (r)->cf->nSize(n)
37
38#define n_New(n, r)           (r)->cf->nNew(n)
39
40/* variables */
41extern unsigned short fftable[];
42
43/* prototypes */
44extern numberfunc nMult, nSub ,nAdd ,nDiv, nIntDiv, nIntMod, nExactDiv;
45extern void    (*nNew)(number * a);
46extern number  (*nInit)(int i);
47extern number  (*nPar)(int i);
48extern int     (*nParDeg)(number n);
49extern int     (*nSize)(number n);
50extern int     (*nInt)(number &n);
51#ifdef HAVE_RINGS
52extern int     (*nDivComp)(number a,number b);
53extern BOOLEAN (*nIsUnit)(number a);
54extern number  (*nGetUnit)(number a);
55extern number  (*nExtGcd)(number a, number b, number *s, number *t);
56#endif
57// always use in the form    n=nNeg(n) !
58extern number  (*nNeg)(number a);
59extern number  (*nInvers)(number a);
60extern number  (*nCopy)(number a);
61extern number  (*nRePart)(number a);
62extern number  (*nImPart)(number a);
63extern void    (*nWrite)(number &a);
64extern const char *  (*nRead)(const char * s, number * a);
65extern void    (*nNormalize)(number &a);
66extern BOOLEAN (*nGreater)(number a,number b),
67#ifdef HAVE_RINGS
68               (*nDivBy)(number a,number b),
69#endif
70               (*nEqual)(number a,number b),
71               (*nIsZero)(number a),
72               (*nIsOne)(number a),
73               (*nIsMOne)(number a),
74               (*nGreaterZero)(number a);
75extern void    (*nPower)(number a, int i, number * result);
76extern number (*nGcd)(number a, number b, const ring r);
77extern number (*nLcm)(number a, number b, const ring r);
78
79extern number nNULL; /* the 0 as constant */
80
81extern void    (*n__Delete)(number * a, const ring r);
82#define nTest(a) (1)
83#define nDelete(A) (currRing)->cf->cfDelete(A,currRing)
84#define nGetDenom(N) (currRing->cf->n_GetDenom((N),currRing))
85
86#define nSetMap(R) (currRing->cf->cfSetMap(R,currRing))
87extern char *  (*nName)(number n);
88
89void nDummy1(number* d);
90void ndDelete(number* d, const ring r);
91void nDummy2(number &d);
92number ndGcd(number a, number b, const ring);
93number ndCopy(number a);
94void   ndInpMult(number &a, number b, const ring r);
95number ndInpAdd(number &a, number b, const ring r);
96
97#ifdef LDEBUG
98void nDBDummy1(number* d,char *f, int l);
99#endif
100#define nGetChar() n_GetChar(currRing)
101
102void nInitChar(ring r);
103void nKillChar(ring r);
104void nSetChar(ring r);
105
106#define nDivBy0 "div by 0"
107#endif
Note: See TracBrowser for help on using the repository browser.