| 1 | #ifndef GMPFLOAT_H |
|---|
| 2 | #define GMPFLOAT_H |
|---|
| 3 | /**************************************** |
|---|
| 4 | * Computer Algebra System SINGULAR * |
|---|
| 5 | ****************************************/ |
|---|
| 6 | /* $Id: gnumpfl.h,v 1.3 1999-06-24 07:46:49 wenk Exp $ */ |
|---|
| 7 | /* |
|---|
| 8 | * ABSTRACT: computations with GMP floating-point numbers |
|---|
| 9 | */ |
|---|
| 10 | #include "structs.h" |
|---|
| 11 | |
|---|
| 12 | BOOLEAN ngfGreaterZero(number za); |
|---|
| 13 | BOOLEAN ngfGreater(number a, number b); |
|---|
| 14 | BOOLEAN ngfEqual(number a, number b); |
|---|
| 15 | BOOLEAN ngfIsOne(number a); |
|---|
| 16 | BOOLEAN ngfIsMOne(number a); |
|---|
| 17 | BOOLEAN ngfIsZero(number za); |
|---|
| 18 | void ngfNew(number *r); |
|---|
| 19 | number ngfInit(int i); |
|---|
| 20 | int ngfInt(number &n); |
|---|
| 21 | number ngfNeg(number za); |
|---|
| 22 | number ngfInvers(number a); |
|---|
| 23 | number ngfAdd(number la, number li); |
|---|
| 24 | number ngfSub(number la, number li); |
|---|
| 25 | number ngfMult(number a, number b); |
|---|
| 26 | number ngfDiv(number a, number b); |
|---|
| 27 | void ngfPower(number x, int exp, number *lu); |
|---|
| 28 | number ngfCopy(number a); |
|---|
| 29 | char * ngfRead (char *s, number *a); |
|---|
| 30 | void ngfWrite(number &a); |
|---|
| 31 | |
|---|
| 32 | #ifdef LDEBUG |
|---|
| 33 | BOOLEAN ngfDBTest(number a, char *f, int l); |
|---|
| 34 | void ngfDBDelete(number *a, char *f, int l); |
|---|
| 35 | #define ngfDelete(A) nlDBDelete(A,__FILE__,__LINE__) |
|---|
| 36 | #else |
|---|
| 37 | void ngfDelete(number *a); |
|---|
| 38 | #endif |
|---|
| 39 | |
|---|
| 40 | BOOLEAN ngfSetMap(int c, char ** par, int nop, number minpol); |
|---|
| 41 | |
|---|
| 42 | void setGMPFloatDigits( size_t digits ); |
|---|
| 43 | void setGMPFloatPrecBytes( unsigned long int bytes ); |
|---|
| 44 | #endif |
|---|
| 45 | |
|---|
| 46 | |
|---|
| 47 | // local Variables: *** |
|---|
| 48 | // folded-file: t *** |
|---|
| 49 | // compile-command: "make installg" *** |
|---|
| 50 | // End: *** |
|---|
