songsenand
/
cgal
mirror of https://github.com/CGAL/cgal
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

update predicate source

This commit is contained in:
Sébastien Loriot 2025-04-23 11:07:19 +02:00
parent 8cacb534a5
commit f21e9b18ba
1 changed files with 35 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

70
NewKernel_d/include/CGAL/NewKernel_d/orientationC5.h
View File

@ -1,6 +1,3 @@
typedef double RT; typedef double RT;
RT RT
@ -11,36 +8,35 @@ determinant(
RT a30, RT a31, RT a32, RT a33, RT a34, RT a30, RT a31, RT a32, RT a33, RT a34,
RT a40, RT a41, RT a42, RT a43, RT a44) RT a40, RT a41, RT a42, RT a43, RT a44)
{ {
// First compute the det2x2 RT m01 = a10*a01 - a00*a11;
const RT m01 = a10*a01 - a00*a11; RT m02 = a20*a01 - a00*a21;
const RT m02 = a20*a01 - a00*a21; RT m03 = a30*a01 - a00*a31;
const RT m03 = a30*a01 - a00*a31; RT m04 = a40*a01 - a00*a41;
const RT m04 = a40*a01 - a00*a41; RT m12 = a20*a11 - a10*a21;
const RT m12 = a20*a11 - a10*a21; RT m13 = a30*a11 - a10*a31;
const RT m13 = a30*a11 - a10*a31; RT m14 = a40*a11 - a10*a41;
const RT m14 = a40*a11 - a10*a41; RT m23 = a30*a21 - a20*a31;
const RT m23 = a30*a21 - a20*a31; RT m24 = a40*a21 - a20*a41;
const RT m24 = a40*a21 - a20*a41; RT m34 = a40*a31 - a30*a41;
const RT m34 = a40*a31 - a30*a41;
// Now compute the minors of rank 3 RT m012 = m12*a02 - m02*a12 + m01*a22;
const RT m012 = m12*a02 - m02*a12 + m01*a22; RT m013 = m13*a02 - m03*a12 + m01*a32;
const RT m013 = m13*a02 - m03*a12 + m01*a32; RT m014 = m14*a02 - m04*a12 + m01*a42;
const RT m014 = m14*a02 - m04*a12 + m01*a42; RT m023 = m23*a02 - m03*a22 + m02*a32;
const RT m023 = m23*a02 - m03*a22 + m02*a32; RT m024 = m24*a02 - m04*a22 + m02*a42;
const RT m024 = m24*a02 - m04*a22 + m02*a42; RT m034 = m34*a02 - m04*a32 + m03*a42;
const RT m034 = m34*a02 - m04*a32 + m03*a42; RT m123 = m23*a12 - m13*a22 + m12*a32;
const RT m123 = m23*a12 - m13*a22 + m12*a32; RT m124 = m24*a12 - m14*a22 + m12*a42;
const RT m124 = m24*a12 - m14*a22 + m12*a42; RT m134 = m34*a12 - m14*a32 + m13*a42;
const RT m134 = m34*a12 - m14*a32 + m13*a42; RT m234 = m34*a22 - m24*a32 + m23*a42;
const RT m234 = m34*a22 - m24*a32 + m23*a42;
// Now compute the minors of rank 4 RT m0123 = m123*a03 - m023*a13 + m013*a23 - m012*a33;
const RT m0123 = m123*a03 - m023*a13 + m013*a23 - m012*a33; RT m0124 = m124*a03 - m024*a13 + m014*a23 - m012*a43;
const RT m0124 = m124*a03 - m024*a13 + m014*a23 - m012*a43; RT m0134 = m134*a03 - m034*a13 + m014*a33 - m013*a43;
const RT m0134 = m134*a03 - m034*a13 + m014*a33 - m013*a43; RT m0234 = m234*a03 - m034*a23 + m024*a33 - m023*a43;
const RT m0234 = m234*a03 - m034*a23 + m024*a33 - m023*a43; RT m1234 = m234*a13 - m134*a23 + m124*a33 - m123*a43;
const RT m1234 = m234*a13 - m134*a23 + m124*a33 - m123*a43;
// Now compute the minors of rank 5 RT m01234 = m1234*a04 - m0234*a14 + m0134*a24 - m0124*a34 + m0123*a44;
const RT m01234 = m1234*a04 - m0234*a14 + m0134*a24 - m0124*a34 + m0123*a44;
return m01234; return m01234;
} }
@ -53,6 +49,11 @@ orientationC5(RT p0, RT p1, RT p2, RT p3, RT p4,
RT s0, RT s1, RT s2, RT s3, RT s4, RT s0, RT s1, RT s2, RT s3, RT s4,
RT t0, RT t1, RT t2, RT t3, RT t4, RT t0, RT t1, RT t2, RT t3, RT t4,
RT u0, RT u1, RT u2, RT u3, RT u4) RT u0, RT u1, RT u2, RT u3, RT u4)
group p0 q0 r0 s0 t0 u0;
group p1 q1 r1 s1 t1 u1;
group p2 q2 r2 s2 t2 u2;
group p3 q3 r3 s3 t3 u3;
group p4 q4 r4 s4 t4 u4;
{ {
RT pq0 = q0 - p0; RT pq0 = q0 - p0;
RT pq1 = q1 - p1; RT pq1 = q1 - p1;
@ -85,6 +86,5 @@ orientationC5(RT p0, RT p1, RT p2, RT p3, RT p4,
pt0, pt1, pt2, pt3, pt4, pt0, pt1, pt2, pt3, pt4,
pu0, pu1, pu2, pu3, pu4); pu0, pu1, pu2, pu3, pu4);
if (det > 0) return 1; return sign(det);
if (det < 0) return -1;
} }