// File: mouda[P]LTE_random_access-simulate/ap.cpp
// Function: alglib_impl::ae_v_cdotproduct(alglib_impl::ae_complex const*, long, char const*, alglib_impl::ae_complex const*, long, char const*, long)
ae_complex ae_v_cdotproduct(const ae_complex *v0, ae_int_t stride0, const char *conj0, const ae_complex *v1, ae_int_t stride1, const char *conj1, ae_int_t n)
{
    double rx = 0, ry = 0; 
    ae_int_t i;
    ae_bool bconj0 = !((conj0[0]=='N') || (conj0[0]=='n'));
    ae_bool bconj1 = !((conj1[0]=='N') || (conj1[0]=='n'));
    ae_complex result;
    if( bconj0 && bconj1 )
    {
        double v0x, v0y, v1x, v1y;
        for(i=0; i<n; i++, v0+=stride0, v1+=stride1)
        {
            v0x = v0->x;
            v0y = -v0->y;
            v1x = v1->x;
            v1y = -v1->y;
            rx += v0x*v1x-v0y*v1y;
            ry += v0x*v1y+v0y*v1x;
        }
    }
    if( !bconj0 && bconj1 )
    {
        double v0x, v0y, v1x, v1y;
        for(i=0; i<n; i++, v0+=stride0, v1+=stride1)
        {
            v0x = v0->x;
            v0y = v0->y;
            v1x = v1->x;
            v1y = -v1->y;
            rx += v0x*v1x-v0y*v1y;
            ry += v0x*v1y+v0y*v1x;
        }
    }
    if( bconj0 && !bconj1 )
    {
        double v0x, v0y, v1x, v1y;
        for(i=0; i<n; i++, v0+=stride0, v1+=stride1)
        {
            v0x = v0->x;
            v0y = -v0->y;
            v1x = v1->x;
            v1y = v1->y;
            rx += v0x*v1x-v0y*v1y;
            ry += v0x*v1y+v0y*v1x;
        }
    }
    if( !bconj0 && !bconj1 )
    {
        double v0x, v0y, v1x, v1y;
        for(i=0; i<n; i++, v0+=stride0, v1+=stride1)
        {
            v0x = v0->x;
            v0y = v0->y;
            v1x = v1->x;
            v1y = v1->y;
            rx += v0x*v1x-v0y*v1y;
            ry += v0x*v1y+v0y*v1x;
        }
    }
    result.x = rx;
    result.y = ry;
    return result;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x68, %rsp
movq 0x10(%rbp), %rax
movq %rdi, -0x18(%rbp)
movq %rsi, -0x20(%rbp)
movq %rdx, -0x28(%rbp)
movq %rcx, -0x30(%rbp)
movq %r8, -0x38(%rbp)
movq %r9, -0x40(%rbp)
xorps %xmm0, %xmm0
movsd %xmm0, -0x48(%rbp)
xorps %xmm0, %xmm0
movsd %xmm0, -0x50(%rbp)
movq -0x28(%rbp), %rax
movsbl (%rax), %ecx
movb $0x1, %al
cmpl $0x4e, %ecx
movb %al, -0xe1(%rbp)
je 0x3fafb
movq -0x28(%rbp), %rax
movsbl (%rax), %eax
cmpl $0x6e, %eax
sete %al
movb %al, -0xe1(%rbp)
movb -0xe1(%rbp), %al
xorb $-0x1, %al
andb $0x1, %al
movb %al, -0x59(%rbp)
movq -0x40(%rbp), %rax
movsbl (%rax), %ecx
movb $0x1, %al
cmpl $0x4e, %ecx
movb %al, -0xe2(%rbp)
je 0x3fb2f
movq -0x40(%rbp), %rax
movsbl (%rax), %eax
cmpl $0x6e, %eax
sete %al
movb %al, -0xe2(%rbp)
movb -0xe2(%rbp), %al
xorb $-0x1, %al
andb $0x1, %al
movb %al, -0x5a(%rbp)
testb $0x1, -0x59(%rbp)
je 0x3fc60
testb $0x1, -0x5a(%rbp)
je 0x3fc60
movq $0x0, -0x58(%rbp)
movq -0x58(%rbp), %rax
cmpq 0x10(%rbp), %rax
jge 0x3fc5e
movq -0x18(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x68(%rbp)
movq -0x18(%rbp), %rax
movsd 0x8(%rax), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd %xmm0, -0x70(%rbp)
movq -0x30(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x78(%rbp)
movq -0x30(%rbp), %rax
movsd 0x8(%rax), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd %xmm0, -0x80(%rbp)
movsd -0x68(%rbp), %xmm0
movsd -0x78(%rbp), %xmm2
movsd -0x70(%rbp), %xmm1
mulsd -0x80(%rbp), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x48(%rbp)
movsd -0x68(%rbp), %xmm0
movsd -0x80(%rbp), %xmm2
movsd -0x70(%rbp), %xmm1
mulsd -0x78(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x50(%rbp), %xmm0
movsd %xmm0, -0x50(%rbp)
movq -0x58(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x58(%rbp)
movq -0x20(%rbp), %rax
shlq $0x4, %rax
addq -0x18(%rbp), %rax
movq %rax, -0x18(%rbp)
movq -0x38(%rbp), %rax
shlq $0x4, %rax
addq -0x30(%rbp), %rax
movq %rax, -0x30(%rbp)
jmp 0x3fb58
jmp 0x3fc60
testb $0x1, -0x59(%rbp)
jne 0x3fd91
testb $0x1, -0x5a(%rbp)
je 0x3fd91
movq $0x0, -0x58(%rbp)
movq -0x58(%rbp), %rax
cmpq 0x10(%rbp), %rax
jge 0x3fd8f
movq -0x18(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x88(%rbp)
movq -0x18(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0x90(%rbp)
movq -0x30(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x98(%rbp)
movq -0x30(%rbp), %rax
movsd 0x8(%rax), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd %xmm0, -0xa0(%rbp)
movsd -0x88(%rbp), %xmm0
movsd -0x98(%rbp), %xmm2
movsd -0x90(%rbp), %xmm1
mulsd -0xa0(%rbp), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x48(%rbp)
movsd -0x88(%rbp), %xmm0
movsd -0xa0(%rbp), %xmm2
movsd -0x90(%rbp), %xmm1
mulsd -0x98(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x50(%rbp), %xmm0
movsd %xmm0, -0x50(%rbp)
movq -0x58(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x58(%rbp)
movq -0x20(%rbp), %rax
shlq $0x4, %rax
addq -0x18(%rbp), %rax
movq %rax, -0x18(%rbp)
movq -0x38(%rbp), %rax
shlq $0x4, %rax
addq -0x30(%rbp), %rax
movq %rax, -0x30(%rbp)
jmp 0x3fc7c
jmp 0x3fd91
testb $0x1, -0x59(%rbp)
je 0x3fec2
testb $0x1, -0x5a(%rbp)
jne 0x3fec2
movq $0x0, -0x58(%rbp)
movq -0x58(%rbp), %rax
cmpq 0x10(%rbp), %rax
jge 0x3fec0
movq -0x18(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0xa8(%rbp)
movq -0x18(%rbp), %rax
movsd 0x8(%rax), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd %xmm0, -0xb0(%rbp)
movq -0x30(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0xb8(%rbp)
movq -0x30(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0xc0(%rbp)
movsd -0xa8(%rbp), %xmm0
movsd -0xb8(%rbp), %xmm2
movsd -0xb0(%rbp), %xmm1
mulsd -0xc0(%rbp), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x48(%rbp)
movsd -0xa8(%rbp), %xmm0
movsd -0xc0(%rbp), %xmm2
movsd -0xb0(%rbp), %xmm1
mulsd -0xb8(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x50(%rbp), %xmm0
movsd %xmm0, -0x50(%rbp)
movq -0x58(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x58(%rbp)
movq -0x20(%rbp), %rax
shlq $0x4, %rax
addq -0x18(%rbp), %rax
movq %rax, -0x18(%rbp)
movq -0x38(%rbp), %rax
shlq $0x4, %rax
addq -0x30(%rbp), %rax
movq %rax, -0x30(%rbp)
jmp 0x3fdad
jmp 0x3fec2
testb $0x1, -0x59(%rbp)
jne 0x3ffdc
testb $0x1, -0x5a(%rbp)
jne 0x3ffdc
movq $0x0, -0x58(%rbp)
movq -0x58(%rbp), %rax
cmpq 0x10(%rbp), %rax
jge 0x3ffda
movq -0x18(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0xc8(%rbp)
movq -0x18(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0xd0(%rbp)
movq -0x30(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0xd8(%rbp)
movq -0x30(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0xe0(%rbp)
movsd -0xc8(%rbp), %xmm0
movsd -0xd8(%rbp), %xmm2
movsd -0xd0(%rbp), %xmm1
mulsd -0xe0(%rbp), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x48(%rbp)
movsd -0xc8(%rbp), %xmm0
movsd -0xe0(%rbp), %xmm2
movsd -0xd0(%rbp), %xmm1
mulsd -0xd8(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
addsd -0x50(%rbp), %xmm0
movsd %xmm0, -0x50(%rbp)
movq -0x58(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x58(%rbp)
movq -0x20(%rbp), %rax
shlq $0x4, %rax
addq -0x18(%rbp), %rax
movq %rax, -0x18(%rbp)
movq -0x38(%rbp), %rax
shlq $0x4, %rax
addq -0x30(%rbp), %rax
movq %rax, -0x30(%rbp)
jmp 0x3fede
jmp 0x3ffdc
movsd -0x48(%rbp), %xmm0
movsd %xmm0, -0x10(%rbp)
movsd -0x50(%rbp), %xmm0
movsd %xmm0, -0x8(%rbp)
movsd -0x10(%rbp), %xmm0
movsd -0x8(%rbp), %xmm1
addq $0x68, %rsp
popq %rbp
retq