// File: Kingsford-Group[P]ghost2/include/Eigen/src/Core/products/GeneralBlockPanelKernel.h
// Function: Eigen::internal::gemm_pack_rhs<double, long, 4, 0, false, false>::operator()(double*, double const*, long, long, long, long, long)
EIGEN_DONT_INLINE void gemm_pack_rhs<Scalar, Index, nr, ColMajor, Conjugate, PanelMode>
  ::operator()(Scalar* blockB, const Scalar* rhs, Index rhsStride, Index depth, Index cols, Index stride, Index offset)
{
  EIGEN_ASM_COMMENT("EIGEN PRODUCT PACK RHS COLMAJOR");
  EIGEN_UNUSED_VARIABLE(stride)
  EIGEN_UNUSED_VARIABLE(offset)
  eigen_assert(((!PanelMode) && stride==0 && offset==0) || (PanelMode && stride>=depth && offset<=stride));
  conj_if<NumTraits<Scalar>::IsComplex && Conjugate> cj;
  Index packet_cols = (cols/nr) * nr;
  Index count = 0;
  for(Index j2=0; j2<packet_cols; j2+=nr)
  {
    // skip what we have before
    if(PanelMode) count += nr * offset;
    const Scalar* b0 = &rhs[(j2+0)*rhsStride];
    const Scalar* b1 = &rhs[(j2+1)*rhsStride];
    const Scalar* b2 = &rhs[(j2+2)*rhsStride];
    const Scalar* b3 = &rhs[(j2+3)*rhsStride];
    for(Index k=0; k<depth; k++)
    {
                blockB[count+0] = cj(b0[k]);
                blockB[count+1] = cj(b1[k]);
      if(nr==4) blockB[count+2] = cj(b2[k]);
      if(nr==4) blockB[count+3] = cj(b3[k]);
      count += nr;
    }
    // skip what we have after
    if(PanelMode) count += nr * (stride-offset-depth);
  }

  // copy the remaining columns one at a time (nr==1)
  for(Index j2=packet_cols; j2<cols; ++j2)
  {
    if(PanelMode) count += offset;
    const Scalar* b0 = &rhs[(j2+0)*rhsStride];
    for(Index k=0; k<depth; k++)
    {
      blockB[count] = cj(b0[k]);
      count += 1;
    }
    if(PanelMode) count += (stride-offset-depth);
  }
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0xa0, %rsp
movq 0x18(%rbp), %rax
movq 0x10(%rbp), %rax
movq %rdi, -0x8(%rbp)
movq %rsi, -0x10(%rbp)
movq %rdx, -0x18(%rbp)
movq %rcx, -0x20(%rbp)
movq %r8, -0x28(%rbp)
movq %r9, -0x30(%rbp)
leaq 0x10(%rbp), %rdi
callq 0x56c70
leaq 0x18(%rbp), %rdi
callq 0x56c70
cmpq $0x0, 0x10(%rbp)
jne 0xa8be3
movb $0x1, %al
cmpq $0x0, 0x18(%rbp)
movb %al, -0x91(%rbp)
je 0xa8bed
xorl %eax, %eax
movb %al, -0x91(%rbp)
jmp 0xa8bed
movb -0x91(%rbp), %al
testb $0x1, %al
jne 0xa8bf9
jmp 0xa8bfb
jmp 0xa8c1a
leaq 0x2cffd(%rip), %rdi     # 0xd5bff
leaq 0x2d051(%rip), %rsi     # 0xd5c5a
movl $0x4c6, %edx            # imm = 0x4C6
leaq 0x2d07f(%rip), %rcx     # 0xd5c94
callq 0x104a0
movq -0x30(%rbp), %rax
movl $0x4, %ecx
cqto
idivq %rcx
shlq $0x2, %rax
movq %rax, -0x40(%rbp)
movq $0x0, -0x48(%rbp)
movq $0x0, -0x50(%rbp)
movq -0x50(%rbp), %rax
cmpq -0x40(%rbp), %rax
jge 0xa8dab
movq -0x18(%rbp), %rax
movq -0x50(%rbp), %rcx
addq $0x0, %rcx
imulq -0x20(%rbp), %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x58(%rbp)
movq -0x18(%rbp), %rax
movq -0x50(%rbp), %rcx
addq $0x1, %rcx
imulq -0x20(%rbp), %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x60(%rbp)
movq -0x18(%rbp), %rax
movq -0x50(%rbp), %rcx
addq $0x2, %rcx
imulq -0x20(%rbp), %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x68(%rbp)
movq -0x18(%rbp), %rax
movq -0x50(%rbp), %rcx
addq $0x3, %rcx
imulq -0x20(%rbp), %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x70(%rbp)
movq $0x0, -0x78(%rbp)
movq -0x78(%rbp), %rax
cmpq -0x28(%rbp), %rax
jge 0xa8d98
movq -0x58(%rbp), %rsi
movq -0x78(%rbp), %rax
shlq $0x3, %rax
addq %rax, %rsi
leaq -0x31(%rbp), %rdi
callq 0xab0d0
movsd (%rax), %xmm0
movq -0x10(%rbp), %rax
movq -0x48(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movq -0x60(%rbp), %rsi
movq -0x78(%rbp), %rax
shlq $0x3, %rax
addq %rax, %rsi
leaq -0x31(%rbp), %rdi
callq 0xab0d0
movsd (%rax), %xmm0
movq -0x10(%rbp), %rax
movq -0x48(%rbp), %rcx
movsd %xmm0, 0x8(%rax,%rcx,8)
movq -0x68(%rbp), %rsi
movq -0x78(%rbp), %rax
shlq $0x3, %rax
addq %rax, %rsi
leaq -0x31(%rbp), %rdi
callq 0xab0d0
movsd (%rax), %xmm0
movq -0x10(%rbp), %rax
movq -0x48(%rbp), %rcx
movsd %xmm0, 0x10(%rax,%rcx,8)
movq -0x70(%rbp), %rsi
movq -0x78(%rbp), %rax
shlq $0x3, %rax
addq %rax, %rsi
leaq -0x31(%rbp), %rdi
callq 0xab0d0
movsd (%rax), %xmm0
movq -0x10(%rbp), %rax
movq -0x48(%rbp), %rcx
movsd %xmm0, 0x18(%rax,%rcx,8)
movq -0x48(%rbp), %rax
addq $0x4, %rax
movq %rax, -0x48(%rbp)
movq -0x78(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x78(%rbp)
jmp 0xa8cc6
jmp 0xa8d9a
movq -0x50(%rbp), %rax
addq $0x4, %rax
movq %rax, -0x50(%rbp)
jmp 0xa8c40
movq -0x40(%rbp), %rax
movq %rax, -0x80(%rbp)
movq -0x80(%rbp), %rax
cmpq -0x30(%rbp), %rax
jge 0xa8e5a
movq -0x18(%rbp), %rax
movq -0x80(%rbp), %rcx
addq $0x0, %rcx
imulq -0x20(%rbp), %rcx
shlq $0x3, %rcx
addq %rcx, %rax
movq %rax, -0x88(%rbp)
movq $0x0, -0x90(%rbp)
movq -0x90(%rbp), %rax
cmpq -0x28(%rbp), %rax
jge 0xa8e47
movq -0x88(%rbp), %rsi
movq -0x90(%rbp), %rax
shlq $0x3, %rax
addq %rax, %rsi
leaq -0x31(%rbp), %rdi
callq 0xab0d0
movsd (%rax), %xmm0
movq -0x10(%rbp), %rax
movq -0x48(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movq -0x48(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x48(%rbp)
movq -0x90(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x90(%rbp)
jmp 0xa8deb
jmp 0xa8e49
movq -0x80(%rbp), %rax
addq $0x1, %rax
movq %rax, -0x80(%rbp)
jmp 0xa8db3
addq $0xa0, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)
nopl (%rax)