// File: mouda[P]LTE_random_access-simulate/alglibinternal.cpp
// Function: alglib_impl::safesolve_cbasicsolveandupdate(alglib_impl::ae_complex, alglib_impl::ae_complex, double, double, double, double*, alglib_impl::ae_complex*, alglib_impl::ae_state*)
static ae_bool safesolve_cbasicsolveandupdate(ae_complex alpha,
     ae_complex beta,
     double lnmax,
     double bnorm,
     double maxgrowth,
     double* xnorm,
     ae_complex* x,
     ae_state *_state)
{
    double v;
    ae_bool result;

    x->x = 0;
    x->y = 0;

    result = ae_false;
    if( ae_c_eq_d(alpha,0) )
    {
        return result;
    }
    if( ae_c_neq_d(beta,0) )
    {
        
        /*
         * alpha*x[i]=beta
         */
        v = ae_log(ae_c_abs(beta, _state), _state)-ae_log(ae_c_abs(alpha, _state), _state);
        if( ae_fp_greater(v,lnmax) )
        {
            return result;
        }
        *x = ae_c_div(beta,alpha);
    }
    else
    {
        
        /*
         * alpha*x[i]=0
         */
        *x = ae_complex_from_d(0);
    }
    
    /*
     * update NrmX, test growth limit
     */
    *xnorm = ae_maxreal(*xnorm, ae_c_abs(*x, _state), _state);
    if( ae_fp_greater(*xnorm,maxgrowth*bnorm) )
    {
        return result;
    }
    result = ae_true;
    return result;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x110, %rsp            # imm = 0x110
movsd %xmm0, -0x18(%rbp)
movsd %xmm1, -0x10(%rbp)
movsd %xmm2, -0x28(%rbp)
movsd %xmm3, -0x20(%rbp)
movsd %xmm4, -0x30(%rbp)
movsd %xmm5, -0x38(%rbp)
movsd %xmm6, -0x40(%rbp)
movq %rdi, -0x48(%rbp)
movq %rsi, -0x50(%rbp)
movq %rdx, -0x58(%rbp)
movq -0x50(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, (%rax)
movq -0x50(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, 0x8(%rax)
movb $0x0, -0x61(%rbp)
movq -0x18(%rbp), %rax
movq %rax, -0x78(%rbp)
movq -0x10(%rbp), %rax
movq %rax, -0x70(%rbp)
movsd -0x78(%rbp), %xmm0
movsd -0x70(%rbp), %xmm1
xorps %xmm2, %xmm2
callq 0x3f730
testb $0x1, %al
jne 0x2f34d
jmp 0x2f35a
movb -0x61(%rbp), %al
andb $0x1, %al
movb %al, -0x1(%rbp)
jmp 0x2f577
movq -0x28(%rbp), %rax
movq %rax, -0x88(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x80(%rbp)
movsd -0x88(%rbp), %xmm0
movsd -0x80(%rbp), %xmm1
xorps %xmm2, %xmm2
callq 0x3f7a0
testb $0x1, %al
jne 0x2f38b
jmp 0x2f4b5
movq -0x28(%rbp), %rax
movq %rax, -0x98(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0x90(%rbp)
movq -0x58(%rbp), %rdi
movsd -0x98(%rbp), %xmm0
movsd -0x90(%rbp), %xmm1
callq 0x3f2b0
movq -0x58(%rbp), %rdi
callq 0x3cd70
movsd %xmm0, -0x100(%rbp)
movq -0x18(%rbp), %rax
movq %rax, -0xa8(%rbp)
movq -0x10(%rbp), %rax
movq %rax, -0xa0(%rbp)
movq -0x58(%rbp), %rdi
movsd -0xa8(%rbp), %xmm0
movsd -0xa0(%rbp), %xmm1
callq 0x3f2b0
movq -0x58(%rbp), %rdi
callq 0x3cd70
movaps %xmm0, %xmm1
movsd -0x100(%rbp), %xmm0
subsd %xmm1, %xmm0
movsd %xmm0, -0x60(%rbp)
movsd -0x60(%rbp), %xmm0
movsd -0x30(%rbp), %xmm1
callq 0x3c4c0
testb $0x1, %al
jne 0x2f42c
jmp 0x2f439
movb -0x61(%rbp), %al
andb $0x1, %al
movb %al, -0x1(%rbp)
jmp 0x2f577
movq -0x28(%rbp), %rax
movq %rax, -0xc8(%rbp)
movq -0x20(%rbp), %rax
movq %rax, -0xc0(%rbp)
movq -0x18(%rbp), %rax
movq %rax, -0xd8(%rbp)
movq -0x10(%rbp), %rax
movq %rax, -0xd0(%rbp)
movsd -0xc8(%rbp), %xmm0
movsd -0xc0(%rbp), %xmm1
movsd -0xd8(%rbp), %xmm2
movsd -0xd0(%rbp), %xmm3
callq 0x3f5d0
movsd %xmm0, -0xb8(%rbp)
movsd %xmm1, -0xb0(%rbp)
movq -0x50(%rbp), %rax
movq -0xb8(%rbp), %rcx
movq %rcx, (%rax)
movq -0xb0(%rbp), %rcx
movq %rcx, 0x8(%rax)
jmp 0x2f4e6
xorps %xmm0, %xmm0
callq 0x3f1b0
movsd %xmm0, -0xe8(%rbp)
movsd %xmm1, -0xe0(%rbp)
movq -0x50(%rbp), %rax
movq -0xe8(%rbp), %rcx
movq %rcx, (%rax)
movq -0xe0(%rbp), %rcx
movq %rcx, 0x8(%rax)
movq -0x48(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x108(%rbp)
movq -0x50(%rbp), %rax
movq (%rax), %rcx
movq %rcx, -0xf8(%rbp)
movq 0x8(%rax), %rax
movq %rax, -0xf0(%rbp)
movq -0x58(%rbp), %rdi
movsd -0xf8(%rbp), %xmm0
movsd -0xf0(%rbp), %xmm1
callq 0x3f2b0
movaps %xmm0, %xmm1
movsd -0x108(%rbp), %xmm0
movq -0x58(%rbp), %rdi
callq 0x3ca70
movq -0x48(%rbp), %rax
movsd %xmm0, (%rax)
movq -0x48(%rbp), %rax
movsd (%rax), %xmm0
movsd -0x40(%rbp), %xmm1
mulsd -0x38(%rbp), %xmm1
callq 0x3c4c0
testb $0x1, %al
jne 0x2f561
jmp 0x2f56b
movb -0x61(%rbp), %al
andb $0x1, %al
movb %al, -0x1(%rbp)
jmp 0x2f577
movb $0x1, -0x61(%rbp)
movb -0x61(%rbp), %al
andb $0x1, %al
movb %al, -0x1(%rbp)
movb -0x1(%rbp), %al
andb $0x1, %al
addq $0x110, %rsp            # imm = 0x110
popq %rbp
retq
nopw %cs:(%rax,%rax)