// File: Luthaf[P]zeopp/voro++/src/cell.cc
// Function: voro::voronoicell_base::centroid(double&, double&, double&)
void voronoicell_base::centroid(double &cx,double &cy,double &cz) {
	double tvol,vol=0;cx=cy=cz=0;
	int i,j,k,l,m,n;
	double ux,uy,uz,vx,vy,vz,wx,wy,wz;
	for(i=1;i<p;i++) {
		ux=*pts-pts[4*i];
		uy=pts[1]-pts[4*i+1];
		uz=pts[2]-pts[4*i+2];
		for(j=0;j<nu[i];j++) {
			k=ed[i][j];
			if(k>=0) {
				ed[i][j]=-1-k;
				l=cycle_up(ed[i][nu[i]+j],k);
				vx=pts[4*k]-*pts;
				vy=pts[4*k+1]-pts[1];
				vz=pts[4*k+2]-pts[2];
				m=ed[k][l];ed[k][l]=-1-m;
				while(m!=i) {
					n=cycle_up(ed[k][nu[k]+l],m);
					wx=pts[4*m]-*pts;
					wy=pts[4*m+1]-pts[1];
					wz=pts[4*m+2]-pts[2];
					tvol=ux*vy*wz+uy*vz*wx+uz*vx*wy-uz*vy*wx-uy*vx*wz-ux*vz*wy;
					vol+=tvol;
					cx+=(wx+vx-ux)*tvol;
					cy+=(wy+vy-uy)*tvol;
					cz+=(wz+vz-uz)*tvol;
					k=m;l=n;vx=wx;vy=wy;vz=wz;
					m=ed[k][l];ed[k][l]=-1-m;
				}
			}
		}
	}
	reset_edges();
	if(vol>tol_cu) {
		vol=0.125/vol;
		cx=cx*vol+0.5*(*pts);
		cy=cy*vol+0.5*pts[1];
		cz=cz*vol+0.5*pts[2];
	} else cx=cy=cz=0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xa0, %rsp
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq %rdx, -0x18(%rbp)
movq %rcx, -0x20(%rbp)
movq -0x8(%rbp), %rax
movq %rax, -0x98(%rbp)
xorps %xmm0, %xmm0
movsd %xmm0, -0x30(%rbp)
movq -0x20(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movq -0x18(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movq -0x10(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movl $0x1, -0x34(%rbp)
movq -0x98(%rbp), %rcx
movl -0x34(%rbp), %eax
cmpl 0x1c(%rcx), %eax
jge 0xb8c9
movq -0x98(%rbp), %rax
movq 0x40(%rax), %rcx
movsd (%rcx), %xmm0
movq 0x40(%rax), %rcx
movl -0x34(%rbp), %edx
shll $0x2, %edx
movslq %edx, %rdx
subsd (%rcx,%rdx,8), %xmm0
movsd %xmm0, -0x50(%rbp)
movq 0x40(%rax), %rcx
movsd 0x8(%rcx), %xmm0
movq 0x40(%rax), %rcx
movl -0x34(%rbp), %edx
shll $0x2, %edx
addl $0x1, %edx
movslq %edx, %rdx
subsd (%rcx,%rdx,8), %xmm0
movsd %xmm0, -0x58(%rbp)
movq 0x40(%rax), %rcx
movsd 0x10(%rcx), %xmm0
movq 0x40(%rax), %rax
movl -0x34(%rbp), %ecx
shll $0x2, %ecx
addl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movsd %xmm0, -0x60(%rbp)
movl $0x0, -0x38(%rbp)
movq -0x98(%rbp), %rcx
movl -0x38(%rbp), %eax
movq 0x30(%rcx), %rcx
movslq -0x34(%rbp), %rdx
cmpl (%rcx,%rdx,4), %eax
jge 0xb8b9
movq -0x98(%rbp), %rax
movq 0x28(%rax), %rax
movslq -0x34(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x38(%rbp), %rcx
movl (%rax,%rcx,4), %eax
movl %eax, -0x3c(%rbp)
cmpl $0x0, -0x3c(%rbp)
jl 0xb8a9
movq -0x98(%rbp), %rdi
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
subl -0x3c(%rbp), %edx
movq 0x28(%rdi), %rax
movslq -0x34(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x38(%rbp), %rcx
movl %edx, (%rax,%rcx,4)
movq 0x28(%rdi), %rax
movslq -0x34(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movq 0x30(%rdi), %rcx
movslq -0x34(%rbp), %rdx
movl (%rcx,%rdx,4), %ecx
addl -0x38(%rbp), %ecx
movslq %ecx, %rcx
movl (%rax,%rcx,4), %esi
movl -0x3c(%rbp), %edx
callq 0x15f00
movl %eax, %ecx
movq -0x98(%rbp), %rax
movl %ecx, -0x40(%rbp)
movq 0x40(%rax), %rcx
movl -0x3c(%rbp), %edx
shll $0x2, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd (%rcx), %xmm0
movsd %xmm0, -0x68(%rbp)
movq 0x40(%rax), %rcx
movl -0x3c(%rbp), %edx
shll $0x2, %edx
addl $0x1, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd 0x8(%rcx), %xmm0
movsd %xmm0, -0x70(%rbp)
movq 0x40(%rax), %rcx
movl -0x3c(%rbp), %edx
shll $0x2, %edx
addl $0x2, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd 0x10(%rcx), %xmm0
movsd %xmm0, -0x78(%rbp)
movq 0x28(%rax), %rcx
movslq -0x3c(%rbp), %rdx
movq (%rcx,%rdx,8), %rcx
movslq -0x40(%rbp), %rdx
movl (%rcx,%rdx,4), %ecx
movl %ecx, -0x44(%rbp)
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
subl -0x44(%rbp), %edx
movq 0x28(%rax), %rax
movslq -0x3c(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x40(%rbp), %rcx
movl %edx, (%rax,%rcx,4)
movl -0x44(%rbp), %eax
cmpl -0x34(%rbp), %eax
je 0xb8a7
movq -0x98(%rbp), %rdi
movq 0x28(%rdi), %rax
movslq -0x3c(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movq 0x30(%rdi), %rcx
movslq -0x3c(%rbp), %rdx
movl (%rcx,%rdx,4), %ecx
addl -0x40(%rbp), %ecx
movslq %ecx, %rcx
movl (%rax,%rcx,4), %esi
movl -0x44(%rbp), %edx
callq 0x15f00
movl %eax, %ecx
movq -0x98(%rbp), %rax
movl %ecx, -0x48(%rbp)
movq 0x40(%rax), %rcx
movl -0x44(%rbp), %edx
shll $0x2, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd (%rcx), %xmm0
movsd %xmm0, -0x80(%rbp)
movq 0x40(%rax), %rcx
movl -0x44(%rbp), %edx
shll $0x2, %edx
addl $0x1, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd 0x8(%rcx), %xmm0
movsd %xmm0, -0x88(%rbp)
movq 0x40(%rax), %rcx
movl -0x44(%rbp), %edx
shll $0x2, %edx
addl $0x2, %edx
movslq %edx, %rdx
movsd (%rcx,%rdx,8), %xmm0
movq 0x40(%rax), %rcx
subsd 0x10(%rcx), %xmm0
movsd %xmm0, -0x90(%rbp)
movsd -0x50(%rbp), %xmm0
mulsd -0x70(%rbp), %xmm0
movsd -0x90(%rbp), %xmm2
movsd -0x58(%rbp), %xmm1
mulsd -0x78(%rbp), %xmm1
mulsd -0x80(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x60(%rbp), %xmm1
mulsd -0x68(%rbp), %xmm1
movsd -0x88(%rbp), %xmm2
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x60(%rbp), %xmm0
mulsd -0x70(%rbp), %xmm0
movsd -0x80(%rbp), %xmm2
movq %xmm0, %rcx
movabsq $-0x8000000000000000, %rdx # imm = 0x8000000000000000
xorq %rdx, %rcx
movq %rcx, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x58(%rbp), %xmm1
mulsd -0x68(%rbp), %xmm1
movsd -0x90(%rbp), %xmm2
movq %xmm1, %rcx
movabsq $-0x8000000000000000, %rdx # imm = 0x8000000000000000
xorq %rdx, %rcx
movq %rcx, %xmm1
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x50(%rbp), %xmm0
mulsd -0x78(%rbp), %xmm0
movsd -0x88(%rbp), %xmm2
movq %xmm0, %rcx
movabsq $-0x8000000000000000, %rdx # imm = 0x8000000000000000
xorq %rdx, %rcx
movq %rcx, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x28(%rbp)
movsd -0x28(%rbp), %xmm0
addsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x80(%rbp), %xmm0
addsd -0x68(%rbp), %xmm0
subsd -0x50(%rbp), %xmm0
movsd -0x28(%rbp), %xmm2
movq -0x10(%rbp), %rcx
movsd (%rcx), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, (%rcx)
movsd -0x88(%rbp), %xmm0
addsd -0x70(%rbp), %xmm0
subsd -0x58(%rbp), %xmm0
movsd -0x28(%rbp), %xmm2
movq -0x18(%rbp), %rcx
movsd (%rcx), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, (%rcx)
movsd -0x90(%rbp), %xmm0
addsd -0x78(%rbp), %xmm0
subsd -0x60(%rbp), %xmm0
movsd -0x28(%rbp), %xmm2
movq -0x20(%rbp), %rcx
movsd (%rcx), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, (%rcx)
movl -0x44(%rbp), %ecx
movl %ecx, -0x3c(%rbp)
movl -0x48(%rbp), %ecx
movl %ecx, -0x40(%rbp)
movsd -0x80(%rbp), %xmm0
movsd %xmm0, -0x68(%rbp)
movsd -0x88(%rbp), %xmm0
movsd %xmm0, -0x70(%rbp)
movsd -0x90(%rbp), %xmm0
movsd %xmm0, -0x78(%rbp)
movq 0x28(%rax), %rcx
movslq -0x3c(%rbp), %rdx
movq (%rcx,%rdx,8), %rcx
movslq -0x40(%rbp), %rdx
movl (%rcx,%rdx,4), %ecx
movl %ecx, -0x44(%rbp)
movl $0xffffffff, %edx       # imm = 0xFFFFFFFF
subl -0x44(%rbp), %edx
movq 0x28(%rax), %rax
movslq -0x3c(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x40(%rbp), %rcx
movl %edx, (%rax,%rcx,4)
jmp 0xb62a
jmp 0xb8a9
jmp 0xb8ab
movl -0x38(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x38(%rbp)
jmp 0xb4fc
jmp 0xb8bb
movl -0x34(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x34(%rbp)
jmp 0xb476
movq -0x98(%rbp), %rdi
callq 0x15f40
movq -0x98(%rbp), %rax
movsd -0x30(%rbp), %xmm0
ucomisd 0x50(%rax), %xmm0
jbe 0xb990
movq -0x98(%rbp), %rax
movsd 0x4bd35(%rip), %xmm0    # 0x57630
divsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x30(%rbp)
movq -0x10(%rbp), %rcx
movsd (%rcx), %xmm0
movsd -0x30(%rbp), %xmm2
movq 0x40(%rax), %rcx
movsd 0x4a712(%rip), %xmm1    # 0x56030
mulsd (%rcx), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x10(%rbp), %rcx
movsd %xmm0, (%rcx)
movq -0x18(%rbp), %rcx
movsd (%rcx), %xmm0
movsd -0x30(%rbp), %xmm2
movq 0x40(%rax), %rcx
movsd 0x4a6e5(%rip), %xmm1    # 0x56030
mulsd 0x8(%rcx), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x18(%rbp), %rcx
movsd %xmm0, (%rcx)
movq -0x20(%rbp), %rcx
movsd (%rcx), %xmm0
movsd -0x30(%rbp), %xmm2
movq 0x40(%rax), %rax
movsd 0x4a6b7(%rip), %xmm1    # 0x56030
mulsd 0x10(%rax), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x20(%rbp), %rax
movsd %xmm0, (%rax)
jmp 0xb9b1
movq -0x20(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movq -0x18(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movq -0x10(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
addq $0xa0, %rsp
popq %rbp
retq
nopw (%rax,%rax)