// File: mouda[P]LTE_random_access-simulate/specialfunctions.cpp
// Function: alglib_impl::fromchebyshev(alglib_impl::ae_vector*, long, alglib_impl::ae_vector*, alglib_impl::ae_state*)
void fromchebyshev(/* Real    */ ae_vector* a,
     ae_int_t n,
     /* Real    */ ae_vector* b,
     ae_state *_state)
{
    ae_int_t i;
    ae_int_t k;
    double e;
    double d;

    ae_vector_clear(b);

    ae_vector_set_length(b, n+1, _state);
    for(i=0; i<=n; i++)
    {
        b->ptr.p_double[i] = 0;
    }
    d = 0;
    i = 0;
    do
    {
        k = i;
        do
        {
            e = b->ptr.p_double[k];
            b->ptr.p_double[k] = 0;
            if( i<=1&&k==i )
            {
                b->ptr.p_double[k] = 1;
            }
            else
            {
                if( i!=0 )
                {
                    b->ptr.p_double[k] = 2*d;
                }
                if( k>i+1 )
                {
                    b->ptr.p_double[k] = b->ptr.p_double[k]-b->ptr.p_double[k-2];
                }
            }
            d = e;
            k = k+1;
        }
        while(k<=n);
        d = b->ptr.p_double[i];
        e = 0;
        k = i;
        while(k<=n)
        {
            e = e+b->ptr.p_double[k]*a->ptr.p_double[k];
            k = k+2;
        }
        b->ptr.p_double[i] = e;
        i = i+1;
    }
    while(i<=n);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x40, %rsp
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq %rdx, -0x18(%rbp)
movq %rcx, -0x20(%rbp)
movq -0x18(%rbp), %rdi
callq 0x3b6f0
movq -0x18(%rbp), %rdi
movq -0x10(%rbp), %rsi
addq $0x1, %rsi
movq -0x20(%rbp), %rdx
callq 0x3b620
movq $0x0, -0x28(%rbp)
movq -0x28(%rbp), %rax
cmpq -0x10(%rbp), %rax
jg 0x116da
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x28(%rbp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movq -0x28(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x28(%rbp)
jmp 0x116ae
xorps %xmm0, %xmm0
movsd %xmm0, -0x40(%rbp)
movq $0x0, -0x28(%rbp)
movq -0x28(%rbp), %rax
movq %rax, -0x30(%rbp)
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
cmpq $0x1, -0x28(%rbp)
jg 0x11748
movq -0x30(%rbp), %rax
cmpq -0x28(%rbp), %rax
jne 0x11748
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd 0x438c7(%rip), %xmm0    # 0x55008
movsd %xmm0, (%rax,%rcx,8)
jmp 0x117b7
cmpq $0x0, -0x28(%rbp)
je 0x1176d
movsd 0x43c71(%rip), %xmm0    # 0x553c8
mulsd -0x40(%rbp), %xmm0
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movq -0x30(%rbp), %rax
movq -0x28(%rbp), %rcx
addq $0x1, %rcx
cmpq %rcx, %rax
jle 0x117b5
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
subq $0x2, %rcx
subsd (%rax,%rcx,8), %xmm0
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
jmp 0x117b7
movsd -0x38(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x30(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x30(%rbp)
movq -0x30(%rbp), %rax
cmpq -0x10(%rbp), %rax
jle 0x116f2
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x28(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movsd %xmm0, -0x40(%rbp)
xorps %xmm0, %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x28(%rbp), %rax
movq %rax, -0x30(%rbp)
movq -0x30(%rbp), %rax
cmpq -0x10(%rbp), %rax
jg 0x1184d
movsd -0x38(%rbp), %xmm1
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq -0x8(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x30(%rbp), %rax
addq $0x2, %rax
movq %rax, -0x30(%rbp)
jmp 0x11801
movsd -0x38(%rbp), %xmm0
movq -0x18(%rbp), %rax
movq 0x28(%rax), %rax
movq -0x28(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movq -0x28(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x28(%rbp)
movq -0x28(%rbp), %rax
cmpq -0x10(%rbp), %rax
jle 0x116ea
addq $0x40, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)