25 lines
895 B
C
25 lines
895 B
C
|
|
||
|
|
#ifndef __platmath_h__
|
||
|
|
#define __platmath_h__
|
||
|
|
|
||
|
|
// Beware the use of these functions! They cannot be guaranteed to be
|
||
|
|
// supported on any platform.
|
||
|
|
double GetDouble(LispObject* aInteger);
|
||
|
|
LispObject* Double(LispEnvironment& aEnvironment,double aValue);
|
||
|
|
|
||
|
|
LispObject* PlatArcSin(LispEnvironment& aEnvironment,LispObject* int1, LispInt aPrecision);
|
||
|
|
LispObject* PlatLn(LispEnvironment& aEnvironment,LispObject* int1, LispInt aPrecision);
|
||
|
|
LispObject* PlatPower(LispEnvironment& aEnvironment,LispObject* int1, LispObject* int2,
|
||
|
|
LispInt aPrecision);
|
||
|
|
|
||
|
|
LispObject* PlatDiv(LispEnvironment& aEnvironment,LispObject* int1, LispObject* int2,LispInt aPrecision);
|
||
|
|
|
||
|
|
LispObject* PlatIsPrime(LispEnvironment& aEnvironment,LispObject* int1, LispInt aPrecision);
|
||
|
|
|
||
|
|
// table lookup for small prime numbers
|
||
|
|
unsigned primes_table_check(unsigned long p);
|
||
|
|
unsigned primes_table_range();
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|