user: Demonstrate the C code that generates the assembly output below:

```asm
<symeig>:
  endbr64
  push   %r15
  mov    %rdi,%r15
  push   %r14
  mov    %rdx,%r14
  push   %r13
  push   %r12
  mov    %esi,%r12d
  push   %rbp
  lea    0x0(,%rsi,8),%ebp
  push   %rbx
  mov    %ebp,%edi
  sub    $0x38,%rsp
  mov    %rcx,0x8(%rsp)
  call   <malloc@plt>
  mov    %ebp,%edi
  mov    %rax,0x18(%rsp)
  call   <malloc@plt>
  test   %r12d,%r12d
  mov    0x18(%rsp),%r10
  mov    %rax,0x10(%rsp)
  jle    L103
  mov    %r12d,%eax
  mov    %r12d,%r9d
  lea    -0x1(%r12),%r11d
  mov    %r12d,%ebp
  shr    %eax
  and    $0xfffffffe,%r9d
  xor    %edi,%edi
  lea    -0x1(%rax),%ebx
  mov    %r9d,%r8d
  add    $0x1,%rbx
  lea    0x0(,%r8,8),%rsi
  shl    $0x4,%rbx
  nopl   0x0(%rax)
L106:
  mov    (%r15,%rdi,8),%rdx
  mov    (%r14,%rdi,8),%rcx
  cmp    $0x2,%r11d
  seta   %r13b
  lea    0x8(%rdx),%rax
  cmp    %rax,%rcx
  je     L148
  xor    %eax,%eax
  test   %r13b,%r13b
  je     L148
  nopl   0x0(%rax,%rax,1)
L17:
  movupd (%rdx,%rax,1),%xmm1
  movups %xmm1,(%rcx,%rax,1)
  add    $0x10,%rax
  cmp    %rbx,%rax
  jne    L17
  cmp    %r12d,%r9d
  je     L141
  movsd  (%rdx,%rsi,1),%xmm0
  movsd  %xmm0,(%rcx,%rsi,1)
L141:
  add    $0x1,%rdi
  cmp    %rbp,%rdi
  jne    L106
  mov    0x10(%rsp),%r15
  mov    %r10,%rdx
  mov    %r12d,%esi
  mov    %r14,%rdi
  mov    %r10,0x18(%rsp)
  mov    %r15,%rcx
  mov    %r9d,0x2c(%rsp)
  mov    %r8,0x20(%rsp)
  call   <tred2@plt>
  mov    0x18(%rsp),%rdx
  mov    %r14,%rdi
  mov    %r15,%rcx
  mov    %r12d,%esi
  call   <tql2@plt>
  mov    0x18(%rsp),%r10
  mov    0x8(%rsp),%rdi
  lea    0x8(%r10),%rax
  cmp    %rax,%rdi
  je     L105
  sub    %r10,%rdi
  add    %r10,%rbx
  test   %r13b,%r13b
  mov    0x20(%rsp),%r8
  mov    0x2c(%rsp),%r9d
  mov    %r10,%rax
  mov    %rdi,%rdx
  je     L105
  nopl   0x0(%rax)
L44:
  movupd (%rax),%xmm2
  movups %xmm2,(%rdx,%rax,1)
  add    $0x10,%rax
  cmp    %rbx,%rax
  jne    L44
  cmp    %r12d,%r9d
  je     L16
  movsd  (%r10,%r8,8),%xmm0
  mov    0x8(%rsp),%rax
  movsd  %xmm0,(%rax,%r8,8)
L16:
  mov    0x10(%rsp),%rdi
  mov    %r10,0x8(%rsp)
  call   <free@plt>
  mov    0x8(%rsp),%rdi
  add    $0x38,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  jmp    1080 <free@plt>
  cs nopw 0x0(%rax,%rax,1)
L148:
  xor    %eax,%eax
  nopw   0x0(%rax,%rax,1)
L134:
  movsd  (%rdx,%rax,8),%xmm0
  movsd  %xmm0,(%rcx,%rax,8)
  add    $0x1,%rax
  cmp    %rbp,%rax
  jne    L134
  jmp    L141
L105:
  mov    0x8(%rsp),%rdx
  lea    (%r10,%rbp,8),%rcx
  mov    %r10,%rax
  sub    %r10,%rdx
  nop
L24:
  movsd  (%rax),%xmm0
  movsd  %xmm0,(%rdx,%rax,1)
  add    $0x8,%rax
  cmp    %rcx,%rax
  jne    L24
  jmp    L16
L103:
  mov    %r10,%rdx
  mov    %rax,%rcx
  mov    %r12d,%esi
  mov    %r14,%rdi
  mov    %r10,0x8(%rsp)
  mov    %rax,%rbx
  call   <tred2@plt>
  mov    0x8(%rsp),%rdx
  mov    %rbx,%rcx
  mov    %r12d,%esi
  mov    %r14,%rdi
  call   <tql2@plt>
  mov    0x8(%rsp),%r10
  jmp    L16
```

assistant: ```c
void symeig(double **A, int n, double **V, double *D) {
  int i, j;
  double *d, *e;
  d = (double *)malloc(sizeof(double) * n);
  e = (double *)malloc(sizeof(double) * n);
  for (i = 0; i < n; i++)
    for (j = 0; j < n; j++)
      V[i][j] = A[i][j];
  tred2(V, n, d, e);
  tql2(V, n, d, e);
  for (i = 0; i < n; i++)
    D[i] = d[i];
  free(e);
  free(d);
}
```