// File: /workspace/github_cpp_makefile_star2_O1/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
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq 0x58(%rsp), %rax
orq 0x50(%rsp), %rax
jne 0x4240d
movq %r8, %rdi
leaq 0x3(%r9), %rax
testq %r9, %r9
cmovnsq %r9, %rax
movq %rax, (%rsp)
andq $-0x4, %rax
cmpq $0x4, %r9
movq %rsi, 0x8(%rsp)
jl 0x423ad
addq $0x18, %rsi
movq %rsi, 0x10(%rsp)
leaq (%rcx,%rcx,2), %rsi
leaq (%rdx,%rsi,8), %rbx
movq %rcx, %r14
shlq $0x5, %r14
movq %rcx, %r15
shlq $0x4, %r15
addq %rdx, %r15
leaq (%rdx,%rcx,8), %r12
xorl %esi, %esi
movq %rdx, %r13
xorl %ebp, %ebp
testq %rdi, %rdi
jle 0x42396
movq 0x10(%rsp), %r8
leaq (%r8,%rsi,8), %r10
movq %rdi, %r8
xorl %r11d, %r11d
movsd (%r13,%r11,2), %xmm0
movsd %xmm0, -0x18(%r10,%r11,8)
movsd (%r12,%r11,2), %xmm0
movsd %xmm0, -0x10(%r10,%r11,8)
movsd (%r15,%r11,2), %xmm0
movsd %xmm0, -0x8(%r10,%r11,8)
movsd (%rbx,%r11,2), %xmm0
movsd %xmm0, (%r10,%r11,8)
addq $0x4, %r11
decq %r8
jne 0x42356
addq %r11, %rsi
addq $0x4, %rbp
addq %r14, %rbx
addq %r14, %r15
addq %r14, %r12
addq %r14, %r13
cmpq %rax, %rbp
jl 0x42342
jmp 0x423af
xorl %esi, %esi
cmpq %r9, %rax
movq 0x8(%rsp), %r11
jge 0x423fe
movq (%rsp), %r8
sarq $0x2, %r8
imulq %rcx, %r8
shlq $0x5, %r8
addq %r8, %rdx
shlq $0x3, %rcx
testq %rdi, %rdi
jle 0x423f3
leaq (%r11,%rsi,8), %r10
xorl %r8d, %r8d
movsd (%rdx,%r8,8), %xmm0
movsd %xmm0, (%r10,%r8,8)
incq %r8
cmpq %r8, %rdi
jne 0x423dc
addq %r8, %rsi
incq %rax
addq %rcx, %rdx
cmpq %r9, %rax
jne 0x423d0
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x1b32f(%rip), %rdi     # 0x5d743
leaq 0x1b383(%rip), %rsi     # 0x5d79e
leaq 0x1b3b6(%rip), %rcx     # 0x5d7d8
movl $0x4c6, %edx            # imm = 0x4C6
callq 0xd340