// File: melop[P]admixem/./spline.h
// Function: (anonymous namespace)::tk::band_matrix::r_solve(std::vector<double, std::allocator<double>> const&) const
std::vector<double> band_matrix::r_solve(const std::vector<double>& b) const
{
    assert( this->dim()==(int)b.size() );
    std::vector<double> x(this->dim());
    int j_stop;
    double sum;
    for(int i=this->dim()-1; i>=0; i--) {
        sum=0;
        j_stop=std::min(this->dim()-1,i+this->num_upper());
        for(int j=i+1; j<=j_stop; j++) sum += this->operator()(i,j)*x[j];
        x[i]=( b[i] - sum ) / this->operator()(i,i);
    }
    return x;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xa0, %rsp
movq %rdi, -0x68(%rbp)
movq %rdi, %rax
movq %rax, -0x60(%rbp)
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq %rdx, -0x18(%rbp)
movq -0x10(%rbp), %rdi
movq %rdi, -0x58(%rbp)
callq 0x288c0
movl %eax, -0x4c(%rbp)
movq -0x18(%rbp), %rdi
callq 0x2a780
movq %rax, %rcx
movl -0x4c(%rbp), %eax
cmpl %ecx, %eax
jne 0x28fe7
jmp 0x29006
leaq 0x4ec71(%rip), %rdi     # 0x77c5f
leaq 0x4ea13(%rip), %rsi     # 0x77a08
movl $0xef, %edx
leaq 0x4ee9d(%rip), %rcx     # 0x77e9e
callq 0x8300
movq -0x58(%rbp), %rdi
movb $0x0, -0x19(%rbp)
callq 0x288c0
cltq
movq %rax, -0x78(%rbp)
leaq -0x1a(%rbp), %rdi
movq %rdi, -0x70(%rbp)
callq 0x2eb50
movq -0x68(%rbp), %rdi
movq -0x78(%rbp), %rsi
movq -0x70(%rbp), %rdx
callq 0x2eb70
jmp 0x29039
leaq -0x1a(%rbp), %rdi
callq 0x2ebe0
movq -0x58(%rbp), %rdi
callq 0x288c0
subl $0x1, %eax
movl %eax, -0x3c(%rbp)
cmpl $0x0, -0x3c(%rbp)
jl 0x29180
movq -0x58(%rbp), %rdi
xorps %xmm0, %xmm0
movsd %xmm0, -0x38(%rbp)
callq 0x288c0
movq -0x58(%rbp), %rdi
subl $0x1, %eax
movl %eax, -0x40(%rbp)
movl -0x3c(%rbp), %eax
movl %eax, -0x7c(%rbp)
callq 0x28940
movl %eax, %ecx
movl -0x7c(%rbp), %eax
addl %ecx, %eax
movl %eax, -0x44(%rbp)
leaq -0x40(%rbp), %rdi
leaq -0x44(%rbp), %rsi
callq 0x30ac0
movl (%rax), %eax
movl %eax, -0x30(%rbp)
movl -0x3c(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x48(%rbp)
movl -0x48(%rbp), %eax
cmpl -0x30(%rbp), %eax
jg 0x29115
movq -0x58(%rbp), %rdi
movl -0x3c(%rbp), %esi
movl -0x48(%rbp), %edx
callq 0x29240
movq -0x68(%rbp), %rdi
movsd %xmm0, -0x88(%rbp)
movslq -0x48(%rbp), %rsi
callq 0x2eb30
movsd -0x88(%rbp), %xmm0
movsd (%rax), %xmm2
movsd -0x38(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x38(%rbp)
movl -0x48(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x48(%rbp)
jmp 0x290a6
movq %rax, %rcx
movl %edx, %eax
movq %rcx, -0x28(%rbp)
movl %eax, -0x2c(%rbp)
leaq -0x1a(%rbp), %rdi
callq 0x2ebe0
jmp 0x291a0
movq -0x18(%rbp), %rdi
movslq -0x3c(%rbp), %rsi
callq 0x2ec00
movq -0x58(%rbp), %rdi
movsd (%rax), %xmm0
subsd -0x38(%rbp), %xmm0
movsd %xmm0, -0x98(%rbp)
movl -0x3c(%rbp), %esi
movl -0x3c(%rbp), %edx
callq 0x29240
movq -0x68(%rbp), %rdi
movaps %xmm0, %xmm1
movsd -0x98(%rbp), %xmm0
divsd %xmm1, %xmm0
movsd %xmm0, -0x90(%rbp)
movslq -0x3c(%rbp), %rsi
callq 0x2eb30
movsd -0x90(%rbp), %xmm0
movsd %xmm0, (%rax)
movl -0x3c(%rbp), %eax
addl $-0x1, %eax
movl %eax, -0x3c(%rbp)
jmp 0x29051
movb $0x1, -0x19(%rbp)
testb $0x1, -0x19(%rbp)
jne 0x29193
movq -0x68(%rbp), %rdi
callq 0x2aff0
movq -0x60(%rbp), %rax
addq $0xa0, %rsp
popq %rbp
retq
movq -0x28(%rbp), %rdi
callq 0x8860
nopl (%rax)