| 19 |
|
#endif |
| 20 |
|
#define FHUGE (1e10) |
| 21 |
|
|
| 22 |
+ |
#define FABSEQ(x1,x2) ((x1)+FTINY > (x2) && (x2)+FTINY > (x1)) |
| 23 |
+ |
#define FRELEQ(x1,x2) ((x1)*(1.+FTINY) >= (x2) && (x2)*(1.+FTINY) >= (x1)) |
| 24 |
+ |
|
| 25 |
+ |
#define VABSEQ(v,w) (FABSEQ((v)[0],(w)[0]) && FABSEQ((v)[1],(w)[1]) \ |
| 26 |
+ |
&& FABSEQ((v)[2],(w)[2])) |
| 27 |
+ |
#define VRELEQ(v,w) (FRELEQ((v)[0],(w)[0]) && FRELEQ((v)[1],(w)[1]) \ |
| 28 |
+ |
&& FRELEQ((v)[2],(w)[2])) |
| 29 |
+ |
|
| 30 |
|
typedef RREAL FVECT[3]; |
| 31 |
|
|
| 32 |
|
#define VCOPY(v1,v2) ((v1)[0]=(v2)[0],(v1)[1]=(v2)[1],(v1)[2]=(v2)[2]) |
