user: What is the c source code of the assembly code below?

```asm
<dsyrk_codegen_6>:
  endbr64
  push   %r15
  lea    0x8(%rdi),%rax
  mov    %rdi,%r9
  mov    %rsi,%rdx
  push   %r14
  mov    %rsi,%r11
  xor    %r14d,%r14d
  xor    %r15d,%r15d
  push   %r13
  push   %r12
  mov    $0x1c,%r12d
  push   %rbp
  xor    %ebp,%ebp
  push   %rbx
  mov    %rsi,-0x18(%rsp)
  mov    %rax,-0x10(%rsp)
L39:
  mov    %r12d,%r13d
  mov    -0x10(%rsp),%rsi
  mov    -0x18(%rsp),%rbx
  mov    %r12d,%r10d
  and    $0xfffffffe,%r13d
  shr    %r10d
  xor    %edi,%edi
  lea    0x0(%r13,%rbp,1),%r8d
  sub    %r14,%rsi
  sub    $0x8,%r14
  lea    (%r8,%r15,1),%eax
  lea    (%rbx,%rax,8),%rcx
  jmp    L163
  nopl   (%rax)
L69:
  cmp    $0x1b,%ebp
  je     L1
  movupd -0x8(%rsi),%xmm2
  movapd %xmm0,%xmm1
  movupd (%rdx),%xmm3
  unpcklpd %xmm1,%xmm1
  mulpd  %xmm1,%xmm2
  addpd  %xmm3,%xmm2
  movups %xmm2,(%rdx)
  cmp    $0x1,%r10d
  jbe    L112
  movupd 0x8(%rsi),%xmm2
  movupd 0x10(%rdx),%xmm4
  mulpd  %xmm1,%xmm2
  addpd  %xmm4,%xmm2
  movups %xmm2,0x10(%rdx)
  cmp    $0x2,%r10d
  je     L112
  movupd 0x18(%rsi),%xmm2
  movupd 0x20(%rdx),%xmm5
  mulpd  %xmm1,%xmm2
  addpd  %xmm5,%xmm2
  movups %xmm2,0x20(%rdx)
  cmp    $0x3,%r10d
  je     L112
  movupd 0x28(%rsi),%xmm2
  movupd 0x30(%rdx),%xmm6
  mulpd  %xmm1,%xmm2
  addpd  %xmm6,%xmm2
  movups %xmm2,0x30(%rdx)
  cmp    $0x4,%r10d
  je     L112
  movupd 0x38(%rsi),%xmm2
  movupd 0x40(%rdx),%xmm7
  mulpd  %xmm1,%xmm2
  addpd  %xmm7,%xmm2
  movups %xmm2,0x40(%rdx)
  cmp    $0x5,%r10d
  je     L112
  movupd 0x48(%rsi),%xmm2
  movupd 0x50(%rdx),%xmm7
  mulpd  %xmm1,%xmm2
  addpd  %xmm7,%xmm2
  movups %xmm2,0x50(%rdx)
  cmp    $0x6,%r10d
  je     L112
  movupd 0x58(%rsi),%xmm2
  movupd 0x60(%rdx),%xmm6
  mulpd  %xmm1,%xmm2
  addpd  %xmm6,%xmm2
  movups %xmm2,0x60(%rdx)
  cmp    $0x7,%r10d
  je     L112
  movupd 0x68(%rsi),%xmm2
  movupd 0x70(%rdx),%xmm5
  mulpd  %xmm1,%xmm2
  addpd  %xmm5,%xmm2
  movups %xmm2,0x70(%rdx)
  cmp    $0x8,%r10d
  je     L112
  movupd 0x78(%rsi),%xmm2
  movupd 0x80(%rdx),%xmm4
  mulpd  %xmm1,%xmm2
  addpd  %xmm4,%xmm2
  movups %xmm2,0x80(%rdx)
  cmp    $0x9,%r10d
  je     L112
  movupd 0x88(%rsi),%xmm2
  movupd 0x90(%rdx),%xmm7
  mulpd  %xmm1,%xmm2
  addpd  %xmm7,%xmm2
  movups %xmm2,0x90(%rdx)
  cmp    $0xa,%r10d
  je     L112
  movupd 0x98(%rsi),%xmm2
  movupd 0xa0(%rdx),%xmm6
  mulpd  %xmm1,%xmm2
  addpd  %xmm6,%xmm2
  movups %xmm2,0xa0(%rdx)
  cmp    $0xb,%r10d
  je     L112
  movupd 0xa8(%rsi),%xmm2
  movupd 0xb0(%rdx),%xmm5
  mulpd  %xmm1,%xmm2
  addpd  %xmm5,%xmm2
  movups %xmm2,0xb0(%rdx)
  cmp    $0xc,%r10d
  je     L112
  movupd 0xb8(%rsi),%xmm2
  movupd 0xc0(%rdx),%xmm3
  mulpd  %xmm1,%xmm2
  addpd  %xmm3,%xmm2
  movups %xmm2,0xc0(%rdx)
  cmp    $0xe,%r10d
  jne    L112
  movupd 0xc8(%rsi),%xmm4
  movupd 0xd0(%rdx),%xmm6
  mulpd  %xmm4,%xmm1
  addpd  %xmm6,%xmm1
  movups %xmm1,0xd0(%rdx)
  nopl   0x0(%rax)
L112:
  cmp    %r13d,%r12d
  je     L86
  lea    (%rdi,%r8,1),%eax
  cltq
  mulsd  (%r9,%rax,8),%xmm0
  addsd  (%rcx),%xmm0
  movsd  %xmm0,(%rcx)
L86:
  add    $0x1c,%edi
  add    $0xe0,%rsi
  cmp    $0x310,%edi
  je     L65
L163:
  movsd  -0x8(%rsi),%xmm0
  cmp    %rdx,%rsi
  jne    L69
L1:
  mov    %rbp,%rax
  lea    (%r14,%rsi,1),%rbx
  nopl   0x0(%rax,%rax,1)
L131:
  movsd  (%rbx,%rax,8),%xmm1
  mulsd  %xmm0,%xmm1
  addsd  (%r11,%rax,8),%xmm1
  movsd  %xmm1,(%r11,%rax,8)
  add    $0x1,%rax
  cmp    $0x1c,%eax
  jne    L131
  jmp    L86
L65:
  add    $0x1,%rbp
  add    $0x1c,%r15d
  add    $0xe0,%r11
  add    $0xe8,%rdx
  sub    $0x1,%r12d
  jne    L39
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void dsyrk_codegen_6(double *A, double *C) {
  const int n = 4 + 0 * 40 + 6 * 4;
  const int lda = 4 + 0 * 40 + 6 * 4;
  double temp;
  int ii, jj, kk;
  for (jj = 0; jj < n; jj++) {
    for (kk = 0; kk < n; kk++) {
      temp = A[jj + lda * kk];
      for (ii = jj; ii < n; ii++) {
        C[ii + lda * jj] += temp * A[ii + lda * kk];
      }
    }
  }
}
```