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

```asm
<slevmar_trans_mat_mat_mult>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %rdi,-0x8(%rsp)
  mov    %rsi,-0x50(%rsp)
  mov    %edx,-0x30(%rsp)
  mov    %ecx,-0x2c(%rsp)
  test   %ecx,%ecx
  jle    L146
  mov    -0x2c(%rsp),%ebx
  lea    -0x1(%rbx),%eax
  and    $0xffffffe0,%eax
  add    $0x40,%eax
  mov    %eax,-0xc(%rsp)
  movslq %ebx,%rax
  lea    0x0(,%rax,4),%r15
  shl    $0x5,%ebx
  mov    %ebx,%eax
  cltq
  shl    $0x2,%rax
  mov    %rax,-0x18(%rsp)
  movl   $0x1f,-0x20(%rsp)
  movl   $0x20,-0x34(%rsp)
  jmp    L156
L152:
  movl   $0x0,(%rdx,%rax,4)
  add    $0x1,%rax
L183:
  cmp    %eax,%ecx
  jg     L152
  lea    0x1(%rdi),%eax
  add    %r15,%rdx
  cmp    %eax,-0x2c(%rsp)
  je     L196
  mov    %eax,%edi
L148:
  cmp    %r14d,%edi
  mov    %r14d,%eax
  cmovge %edi,%eax
  cltq
  jmp    L183
L196:
  mov    %eax,-0x1c(%rsp)
  mov    %edi,-0x10(%rsp)
  cmpl   $0x0,-0x30(%rsp)
  jle    L70
  cmp    %eax,%esi
  cmovge %eax,%ebx
  movq   $0x0,-0x28(%rsp)
  mov    $0x0,%ebp
  cltq
  mov    %rax,-0x48(%rsp)
  mov    %edi,%eax
  mov    %rax,-0x40(%rsp)
  jmp    L84
L207:
  mov    %rax,%rdi
  sub    %r8,%rdi
  movss  (%rdi,%rcx,1),%xmm0
  mulss  (%rax),%xmm0
  addss  %xmm0,%xmm1
  add    $0x1,%edx
  add    %r15,%rax
L186:
  cmp    %esi,%edx
  jl     L207
  addss  (%r10,%r9,4),%xmm1
  movss  %xmm1,(%r10,%r9,4)
  add    $0x1,%r9
L111:
  cmp    %r9d,%ebx
  jle    L60
  lea    0x0(,%r9,4),%rcx
  mov    %r11,%rax
  mov    %ebp,%edx
  pxor   %xmm1,%xmm1
  jmp    L186
L60:
  lea    0x1(%r12),%rax
  add    -0x48(%rsp),%r13
  add    $0x4,%r11
  cmp    -0x40(%rsp),%r12
  je     L61
  mov    %rax,%r12
L113:
  lea    0x0(,%r12,4),%r8
  mov    %r12d,%eax
  cmp    %r12d,%r14d
  cmovge %r14d,%eax
  movslq %eax,%r9
  mov    -0x50(%rsp),%rax
  lea    (%rax,%r13,4),%r10
  jmp    L111
L61:
  add    $0x20,%ebp
  mov    -0x18(%rsp),%rcx
  add    %rcx,-0x28(%rsp)
  cmp    %ebp,-0x30(%rsp)
  jle    L70
L84:
  lea    0x20(%rbp),%esi
  lea    0x1f(%rbp),%eax
  mov    -0x30(%rsp),%ecx
  cmp    %eax,%ecx
  cmovle %ecx,%esi
  mov    -0x8(%rsp),%r11
  add    -0x28(%rsp),%r11
  mov    $0x0,%r13d
  mov    $0x0,%r12d
  jmp    L113
L70:
  addl   $0x20,-0x34(%rsp)
  mov    -0x34(%rsp),%eax
  addl   $0x20,-0x20(%rsp)
  cmp    -0xc(%rsp),%eax
  je     L49
L156:
  mov    -0x34(%rsp),%ecx
  lea    -0x20(%rcx),%r14d
  mov    -0x20(%rsp),%eax
  mov    %eax,%esi
  mov    %ecx,%ebx
  mov    -0x2c(%rsp),%edx
  cmp    %edx,%eax
  cmovge %edx,%ecx
  mov    -0x50(%rsp),%rdx
  mov    $0x0,%edi
  jmp    L148
L49:
  mov    -0x50(%rsp),%rbx
  mov    %rbx,%rsi
  mov    $0x0,%ecx
  mov    $0x0,%eax
  lea    0x4(%rbx),%r9
  jmp    L137
L12:
  movslq %ecx,%r8
  mov    -0x50(%rsp),%rbx
  lea    (%rbx,%r8,4),%rdx
  mov    %eax,%eax
  add    %r8,%rax
  lea    (%r9,%rax,4),%r8
  mov    %rsi,%rax
L78:
  movss  (%rax),%xmm0
  movss  %xmm0,(%rdx)
  add    %r15,%rax
  add    $0x4,%rdx
  cmp    %r8,%rdx
  jne    L78
L181:
  mov    %edi,%eax
L137:
  lea    0x1(%rax),%edi
  add    $0x4,%rsi
  add    -0x1c(%rsp),%ecx
  cmp    -0x10(%rsp),%eax
  je     L146
  test   %edi,%edi
  jg     L12
  jmp    L181
L146:
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
```

assistant: ```c
void slevmar_trans_mat_mat_mult(float *a, float *b, int n, int m) {
  register int i, j, k, jj, kk;
  register float sum, *bim, *akm;
  const int bsize = 32;
  for (jj = 0; jj < m; jj += bsize) {
    for (i = 0; i < m; ++i) {
      bim = b + i * m;
      for (j = (((jj) >= (i)) ? (jj) : (i)); j < (((jj + bsize) <= (m)) ? (jj + bsize) : (m)); ++j)
        bim[j] = 0.0;
    }
    for (kk = 0; kk < n; kk += bsize) {
      for (i = 0; i < m; ++i) {
        bim = b + i * m;
        for (j = (((jj) >= (i)) ? (jj) : (i)); j < (((jj + bsize) <= (m)) ? (jj + bsize) : (m)); ++j) {
          sum = 0.0;
          for (k = kk; k < (((kk + bsize) <= (n)) ? (kk + bsize) : (n)); ++k) {
            akm = a + k * m;
            sum += akm[i] * akm[j];
          }
          bim[j] += sum;
        }
      }
    }
  }
  for (i = 0; i < m; ++i)
    for (j = 0; j < i; ++j)
      b[i * m + j] = b[j * m + i];
}
```