user: 请显示与下面列出的汇编代码相匹配的C语言实现:

```asm
<mul_mdmd_md>:
  endbr64
  push   %r15
  mov    %edi,%eax
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xb8,%rsp
  mov    0x100(%rsp),%r14d
  mov    %edi,0x98(%rsp)
  mov    %esi,0x1c(%rsp)
  mov    0xf0(%rsp),%ebx
  imul   %r14d,%eax
  mov    %edx,0x5c(%rsp)
  mov    0xf8(%rsp),%ebp
  mov    %rcx,0xa8(%rsp)
  mov    %r8,0x48(%rsp)
  cltq
  mov    %r9,0xa0(%rsp)
  lea    (%r9,%rax,8),%r15
  cmp    %r15,%r9
  je     L61
  movslq 0x5c(%rsp),%rax
  movslq %r14d,%r13
  mov    %r9,%rcx
  shl    $0x3,%r13
  lea    (%r9,%rax,8),%r12
  nopl   0x0(%rax,%rax,1)
L205:
  cmp    %r12,%rcx
  je     L144
  mov    %r12,%rdx
  mov    %rcx,%rdi
  xor    %esi,%esi
  add    %r13,%r12
  sub    %rcx,%rdx
  call   <memset@plt>
  mov    %rax,%rcx
  add    %r13,%rcx
  cmp    %r15,%rcx
  jne    L205
L61:
  cmpl   $0x8,0x1c(%rsp)
  setle  %dl
  cmpl   $0x8,0x5c(%rsp)
  setle  %al
  test   %al,%dl
  je     L249
  cmpl   $0x8,0x98(%rsp)
  jle    L9
L249:
  mov    0x98(%rsp),%eax
  sub    $0x7,%eax
  mov    %eax,0x88(%rsp)
  test   %eax,%eax
  jle    L301
  mov    0x1c(%rsp),%esi
  mov    0x48(%rsp),%rcx
  movl   $0x0,0x58(%rsp)
  lea    -0x7(%rsi),%eax
  mov    %eax,0x30(%rsp)
  lea    0x0(,%rbp,8),%eax
  cltq
  lea    0x0(,%rax,8),%rdi
  lea    0x0(,%rbx,8),%eax
  cltq
  mov    %rdi,0x8(%rsp)
  shl    $0x3,%rax
  mov    %rax,0x78(%rsp)
  mov    0xa8(%rsp),%rax
  mov    %rax,0x20(%rsp)
  lea    0x0(,%r14,8),%eax
  cltq
  shl    $0x3,%rax
  mov    %rax,0x80(%rsp)
  mov    0xa0(%rsp),%rax
  mov    %rax,0x50(%rsp)
  mov    0x5c(%rsp),%eax
  sub    $0x8,%eax
  shr    $0x3,%eax
  lea    0x1(%rax),%edx
  mov    %rdx,%rax
  shl    $0x6,%rdx
  add    %rdx,%rcx
  mov    %rdx,0x90(%rsp)
  lea    -0x8(%rsi),%edx
  shl    $0x3,%eax
  shr    $0x3,%edx
  mov    %rcx,0x28(%rsp)
  lea    0x1(%rdx),%ecx
  mov    %eax,0x8c(%rsp)
  mov    %rcx,%rsi
  shl    $0x6,%rsi
  mov    %rsi,0x70(%rsp)
  lea    0x0(,%rcx,8),%esi
  imul   %rdi,%rcx
  mov    %esi,0x38(%rsp)
  mov    %rcx,0x40(%rsp)
  nopl   0x0(%rax)
L100:
  mov    0x50(%rsp),%r12
  mov    0x20(%rsp),%rax
  cmpl   $0x7,0x5c(%rsp)
  mov    %rax,0x68(%rsp)
  mov    %r12,%r13
  jle    L158
  add    0x70(%rsp),%rax
  mov    %rax,(%rsp)
  mov    0x48(%rsp),%rax
  mov    %rax,0x10(%rsp)
  nopl   0x0(%rax,%rax,1)
L355:
  mov    0x30(%rsp),%edx
  mov    0x10(%rsp),%r15
  mov    0x20(%rsp),%r13
  test   %edx,%edx
  jle    L347
  mov    %r14d,%eax
  mov    %ebp,%r14d
  mov    %ebx,%ebp
  mov    %r15,%rbx
  mov    %eax,%r15d
  nopl   0x0(%rax)
L308:
  mov    %rbx,%rsi
  mov    %r13,%rdi
  mov    %r15d,%r9d
  mov    %r14d,%r8d
  mov    %ebp,%ecx
  mov    %r12,%rdx
  add    $0x40,%r13
  call   <mul_mdmd_md_l1@plt>
  add    0x8(%rsp),%rbx
  cmp    (%rsp),%r13
  jne    L308
  mov    (%rsp),%rsi
  mov    0x38(%rsp),%eax
  mov    %ebp,%ebx
  mov    %r14d,%ebp
  mov    0x10(%rsp),%rdx
  mov    %r15d,%r14d
  add    0x40(%rsp),%rdx
L215:
  cmp    %eax,0x1c(%rsp)
  jg     L52
L336:
  addq   $0x40,0x10(%rsp)
  add    $0x40,%r12
  mov    0x10(%rsp),%rax
  cmp    0x28(%rsp),%rax
  jne    L355
  mov    0x28(%rsp),%rax
  mov    0x8c(%rsp),%r15d
  mov    0x50(%rsp),%r13
  add    0x90(%rsp),%r13
  mov    %rax,0x60(%rsp)
L335:
  cmp    %r15d,0x5c(%rsp)
  jg     L329
L314:
  mov    0x78(%rsp),%rcx
  addl   $0x8,0x58(%rsp)
  add    %rcx,0x20(%rsp)
  mov    0x58(%rsp),%eax
  mov    0x80(%rsp),%rcx
  add    %rcx,0x50(%rsp)
  cmp    %eax,0x88(%rsp)
  jg     L100
  mov    0x98(%rsp),%eax
  sub    $0x8,%eax
  shr    $0x3,%eax
  lea    0x8(,%rax,8),%eax
  mov    %eax,0x58(%rsp)
  mov    %eax,%esi
L68:
  mov    0x98(%rsp),%edi
  cmp    %esi,%edi
  jle    L342
  mov    %esi,%eax
  mov    0xa0(%rsp),%rcx
  imul   %r14d,%eax
  cltq
  lea    (%rcx,%rax,8),%r15
  mov    %esi,%eax
  mov    0xa8(%rsp),%rcx
  imul   %ebx,%eax
  mov    %r15,0x40(%rsp)
  cltq
  lea    (%rcx,%rax,8),%r11
  mov    0x5c(%rsp),%ecx
  mov    %r11,0x28(%rsp)
  cmp    $0x7,%ecx
  jle    L173
  lea    0x0(,%rbp,8),%eax
  mov    %ebx,0x8(%rsp)
  sub    %esi,%edi
  mov    %r15,%r13
  cltq
  mov    %edi,%r12d
  lea    0x0(,%rax,8),%r10
  lea    -0x8(%rcx),%eax
  mov    0x48(%rsp),%rcx
  shr    $0x3,%eax
  mov    %r10,0x10(%rsp)
  add    $0x1,%eax
  mov    %eax,0x60(%rsp)
  shl    $0x6,%rax
  add    %rax,%rcx
  mov    %rax,0x50(%rsp)
  mov    0x1c(%rsp),%eax
  mov    %rcx,0x20(%rsp)
  sub    $0x8,%eax
  shr    $0x3,%eax
  lea    0x1(%rax),%edx
  mov    %rdx,%rax
  mov    %rdx,%rcx
  imul   %r10,%rdx
  shl    $0x6,%rcx
  shl    $0x3,%eax
  add    %r11,%rcx
  mov    %eax,0x38(%rsp)
  mov    %rcx,(%rsp)
  mov    %rdx,0x30(%rsp)
L81:
  mov    0x48(%rsp),%rbx
  mov    0x28(%rsp),%r15
  xor    %eax,%eax
  cmpl   $0x7,0x1c(%rsp)
  mov    %rbx,%r8
  mov    %r15,%rcx
  jle    L38
  mov    %ebp,%eax
  mov    %r15,%rbp
  mov    %r13,%r15
  mov    %eax,%r13d
L207:
  sub    $0x8,%rsp
  mov    %rbx,%r8
  mov    %rbp,%rcx
  mov    %r15,%r9
  push   %r14
  mov    $0x8,%edx
  mov    $0x8,%esi
  mov    %r12d,%edi
  push   %r13
  mov    0x20(%rsp),%eax
  add    $0x40,%rbp
  push   %rax
  call   <mul_mdmd_md_l1_arb_all@plt>
  add    0x30(%rsp),%rbx
  add    $0x20,%rsp
  cmp    (%rsp),%rbp
  jne    L207
  mov    (%rsp),%rcx
  mov    0x38(%rsp),%eax
  mov    %r13d,%ebp
  mov    %r15,%r13
  mov    0x48(%rsp),%r8
  add    0x30(%rsp),%r8
L38:
  cmp    %eax,0x1c(%rsp)
  jg     L155
L49:
  addq   $0x40,0x48(%rsp)
  add    $0x40,%r13
  mov    0x48(%rsp),%rax
  cmp    0x20(%rsp),%rax
  jne    L81
  mov    0x60(%rsp),%eax
  mov    0x50(%rsp),%rsi
  add    %rsi,0x40(%rsp)
  mov    0x8(%rsp),%ebx
  shl    $0x3,%eax
  mov    %eax,0x30(%rsp)
  mov    %eax,%ecx
L96:
  mov    0x5c(%rsp),%esi
  cmp    %ecx,%esi
  jle    L342
  mov    0x1c(%rsp),%edi
  cmp    $0x7,%edi
  jle    L64
  lea    0x0(,%rbp,8),%eax
  mov    %ebx,0x10(%rsp)
  mov    0x98(%rsp),%r13d
  sub    %ecx,%esi
  cltq
  sub    0x58(%rsp),%r13d
  mov    0x20(%rsp),%r8
  lea    0x0(,%rax,8),%r15
  lea    -0x8(%rdi),%eax
  mov    %r13d,%r12d
  shr    $0x3,%eax
  add    $0x1,%eax
  mov    %eax,0x48(%rsp)
  mov    %rax,0x38(%rsp)
  shl    $0x6,%rax
  mov    %rax,%r10
  mov    0x28(%rsp),%rax
  add    %rax,%r10
  mov    %rax,%rbx
  mov    %ebp,%eax
  mov    %esi,%ebp
  mov    %r10,0x8(%rsp)
  mov    %eax,%r13d
L6:
  sub    $0x8,%rsp
  mov    %rbx,%rcx
  mov    %ebp,%edx
  mov    $0x8,%esi
  push   %r14
  mov    %r12d,%edi
  add    $0x40,%rbx
  push   %r13
  mov    0x28(%rsp),%eax
  push   %rax
  mov    0x60(%rsp),%r9
  mov    %r8,0x20(%rsp)
  call   <mul_mdmd_md_l1_arb_all@plt>
  mov    0x20(%rsp),%r8
  add    $0x20,%rsp
  add    %r15,%r8
  cmp    0x8(%rsp),%rbx
  jne    L6
  mov    %r13d,%ebp
  mov    0x38(%rsp),%r13
  mov    0x48(%rsp),%eax
  mov    0x8(%rsp),%r10
  mov    0x10(%rsp),%ebx
  imul   %r15,%r13
  add    %r13,0x20(%rsp)
  shl    $0x3,%eax
L200:
  cmp    %eax,0x1c(%rsp)
  jle    L342
  mov    0x1c(%rsp),%esi
  mov    0x40(%rsp),%r9
  mov    %r10,%rcx
  mov    %r14d,0x100(%rsp)
  mov    0x20(%rsp),%r8
  mov    0x5c(%rsp),%edx
  mov    %ebp,0xf8(%rsp)
  mov    %ebx,0xf0(%rsp)
  mov    0x98(%rsp),%edi
  sub    %eax,%esi
  sub    0x30(%rsp),%edx
  sub    0x58(%rsp),%edi
L3:
  add    $0xb8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  jmp    10b0 <mul_mdmd_md_l1_arb_all@plt>
L342:
  add    $0xb8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopw   0x0(%rax,%rax,1)
L52:
  mov    0x1c(%rsp),%edi
  sub    $0x8,%rsp
  mov    %r12,%rcx
  mov    %ebp,%r9d
  push   %r14
  mov    %ebx,%r8d
  sub    %eax,%edi
  call   <mul_mdmd_md_l1_arb_k@plt>
  pop    %rcx
  pop    %rsi
  jmp    L336
L144:
  add    %r13,%rcx
  add    %r13,%r12
  cmp    %rcx,%r15
  jne    L205
  jmp    L61
  nopl   (%rax)
L347:
  mov    %r15,%rdx
  mov    %r13,%rsi
  xor    %eax,%eax
  jmp    L215
L329:
  mov    0x30(%rsp),%eax
  test   %eax,%eax
  jle    L69
  mov    0x20(%rsp),%rax
  add    0x70(%rsp),%rax
  mov    %ebx,(%rsp)
  mov    %r13,%rbx
  mov    0x5c(%rsp),%r12d
  mov    0x60(%rsp),%r8
  mov    %rax,0x10(%rsp)
  mov    %ebp,%r13d
  mov    0x68(%rsp),%rbp
  mov    %r15d,0x9c(%rsp)
  sub    %r15d,%r12d
  mov    %r8,%r15
  xchg   %ax,%ax
L73:
  sub    $0x8,%rsp
  mov    %r15,%r8
  mov    %rbp,%rcx
  mov    %rbx,%r9
  push   %r14
  mov    %r12d,%edx
  mov    $0x8,%esi
  mov    $0x8,%edi
  push   %r13
  mov    0x18(%rsp),%eax
  add    $0x40,%rbp
  push   %rax
  call   <mul_mdmd_md_l1_arb_all@plt>
  add    0x28(%rsp),%r15
  add    $0x20,%rsp
  cmp    0x10(%rsp),%rbp
  jne    L73
  mov    0x40(%rsp),%rsi
  add    %rsi,0x60(%rsp)
  mov    %r13d,%ebp
  mov    %rbx,%r13
  mov    0x9c(%rsp),%r15d
  mov    (%rsp),%ebx
  mov    0x38(%rsp),%eax
L241:
  cmp    %eax,0x1c(%rsp)
  jle    L314
  mov    0x5c(%rsp),%edx
  mov    0x1c(%rsp),%esi
  sub    $0x8,%rsp
  mov    %r13,%r9
  push   %r14
  mov    $0x8,%edi
  push   %rbp
  sub    %r15d,%edx
  sub    %eax,%esi
  push   %rbx
  mov    0x80(%rsp),%r8
  mov    0x30(%rsp),%rcx
  call   <mul_mdmd_md_l1_arb_all@plt>
  add    $0x20,%rsp
  jmp    L314
L158:
  mov    0x48(%rsp),%rax
  xor    %r15d,%r15d
  mov    %rax,0x60(%rsp)
  jmp    L335
L155:
  mov    0x1c(%rsp),%esi
  sub    $0x8,%rsp
  mov    %r13,%r9
  mov    $0x8,%edx
  push   %r14
  mov    %r12d,%edi
  push   %rbp
  sub    %eax,%esi
  mov    0x20(%rsp),%eax
  push   %rax
  call   <mul_mdmd_md_l1_arb_all@plt>
  add    $0x20,%rsp
  jmp    L49
L69:
  mov    0x20(%rsp),%rax
  mov    %rax,0x10(%rsp)
  xor    %eax,%eax
  jmp    L241
L9:
  mov    %r14d,0x100(%rsp)
  mov    0xa0(%rsp),%r9
  mov    0x48(%rsp),%r8
  mov    %ebp,0xf8(%rsp)
  mov    0x5c(%rsp),%edx
  mov    0x1c(%rsp),%esi
  mov    %ebx,0xf0(%rsp)
  mov    0xa8(%rsp),%rcx
  mov    0x98(%rsp),%edi
  jmp    L3
L301:
  movl   $0x0,0x58(%rsp)
  mov    0x58(%rsp),%esi
  jmp    L68
L173:
  mov    0x48(%rsp),%rax
  movl   $0x0,0x30(%rsp)
  mov    0x30(%rsp),%ecx
  mov    %rax,0x20(%rsp)
  jmp    L96
L64:
  mov    0x28(%rsp),%r10
  xor    %eax,%eax
  jmp    L200
```

assistant: ```c
void mul_mdmd_md(const int M, const int K, const int N, const double *const A, const double *const B, double *const C, const int Astride, const int Bstride, const int Cstride) {
  int m2, k2, n2;
  const double *a2, *b2;
  double *c2;
  const double *ap2, *bp2;
  double *cp2;
  {
    double *cprb, *cpre, *cp, *cpe;
    cpre = C + M * Cstride;
    for (cprb = C; cprb != cpre; cprb += Cstride) {
      cpe = cprb + N;
      for (cp = cprb; cp != cpe; cp++) {
        *cp = 0.0;
      }
    }
  }
  if (M < 9 && K < 9 && N < 9) {
    mul_mdmd_md_l1_arb_all(M, K, N, A, B, C, Astride, Bstride, Cstride);
    return;
  }
  for (m2 = 0; m2 <= M - 8; m2 += 8) {
    c2 = C + m2 * Cstride;
    a2 = A + m2 * Astride;
    for (n2 = 0, b2 = B, cp2 = c2; n2 <= N - 8; n2 += 8, b2 += 8, cp2 += 8) {
      for (k2 = 0, bp2 = b2, ap2 = a2; k2 <= K - 8; k2 += 8, bp2 += 8 * Bstride, ap2 += 8) {
        mul_mdmd_md_l1(ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
      if (k2 < K) {
        mul_mdmd_md_l1_arb_k(K - k2, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
    }
    if (n2 < N) {
      for (k2 = 0, bp2 = b2, ap2 = a2; k2 <= K - 8; k2 += 8, bp2 += 8 * Bstride, ap2 += 8) {
        mul_mdmd_md_l1_arb_all(8, 8, N - n2, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
      if (k2 < K) {
        mul_mdmd_md_l1_arb_all(8, K - k2, N - n2, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
    }
  }
  if (m2 < M) {
    c2 = C + m2 * Cstride;
    a2 = A + m2 * Astride;
    for (n2 = 0, b2 = B, cp2 = c2; n2 <= N - 8; n2 += 8, b2 += 8, cp2 += 8) {
      for (k2 = 0, bp2 = b2, ap2 = a2; k2 <= K - 8; k2 += 8, bp2 += 8 * Bstride, ap2 += 8) {
        mul_mdmd_md_l1_arb_all(M - m2, 8, 8, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
      if (k2 < K) {
        mul_mdmd_md_l1_arb_all(M - m2, K - k2, 8, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
    }
    if (n2 < N) {
      for (k2 = 0, bp2 = b2, ap2 = a2; k2 <= K - 8; k2 += 8, bp2 += 8 * Bstride, ap2 += 8) {
        mul_mdmd_md_l1_arb_all(M - m2, 8, N - n2, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
      if (k2 < K) {
        mul_mdmd_md_l1_arb_all(M - m2, K - k2, N - n2, ap2, bp2, cp2, Astride, Bstride, Cstride);
      }
    }
  }
}
```