user: What would the C source look like for the assembly code provided here:

```asm
<set_tcp_record>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  mov    %rdi,-0x18(%rbp)
  mov    %rsi,-0x20(%rbp)
  mov    %rdx,-0x28(%rbp)
  mov    %rcx,-0x30(%rbp)
  mov    %r8d,-0x34(%rbp)
  movl   $0x0,-0x4(%rbp)
  jmp    L113
L69:
  mov    -0x4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x30(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x28(%rbp),%rax
  add    %rcx,%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  jb     L11
  mov    -0x4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x30(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rax
  mov    -0x4(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,8),%rcx
  mov    -0x28(%rbp),%rdx
  add    %rcx,%rdx
  mov    (%rdx),%rdx
  sub    %rdx,%rax
  test   %rax,%rax
  js     L89
  pxor   %xmm0,%xmm0
  cvtsi2sd %rax,%xmm0
  jmp    L46
L89:
  mov    %rax,%rdx
  shr    %rdx
  and    $0x1,%eax
  or     %rax,%rdx
  pxor   %xmm0,%xmm0
  cvtsi2sd %rdx,%xmm0
  addsd  %xmm0,%xmm0
L46:
  pxor   %xmm1,%xmm1
  cvtsi2sdl -0x34(%rbp),%xmm1
  mov    -0x4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x20(%rbp),%rax
  add    %rdx,%rax
  divsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
L11:
  addl   $0x1,-0x4(%rbp)
L113:
  cmpl   $0x3,-0x4(%rbp)
  jle    L69
  mov    -0x30(%rbp),%rax
  add    $0x20,%rax
  mov    (%rax),%rdx
  mov    -0x28(%rbp),%rax
  add    $0x20,%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  jb     L9
  mov    -0x30(%rbp),%rax
  add    $0x18,%rax
  mov    (%rax),%rdx
  mov    -0x28(%rbp),%rax
  add    $0x18,%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  jbe    L9
  mov    -0x30(%rbp),%rax
  add    $0x20,%rax
  mov    (%rax),%rax
  mov    -0x28(%rbp),%rdx
  add    $0x20,%rdx
  mov    (%rdx),%rdx
  sub    %rdx,%rax
  test   %rax,%rax
  js     L103
  pxor   %xmm0,%xmm0
  cvtsi2sd %rax,%xmm0
  jmp    L125
L103:
  mov    %rax,%rdx
  shr    %rdx
  and    $0x1,%eax
  or     %rax,%rdx
  pxor   %xmm0,%xmm0
  cvtsi2sd %rdx,%xmm0
  addsd  %xmm0,%xmm0
L125:
  movsd  D25(%rip),%xmm1
  mulsd  %xmm0,%xmm1
  mov    -0x30(%rbp),%rax
  add    $0x18,%rax
  mov    (%rax),%rax
  mov    -0x28(%rbp),%rdx
  add    $0x18,%rdx
  mov    (%rdx),%rdx
  sub    %rdx,%rax
  test   %rax,%rax
  js     L60
  pxor   %xmm0,%xmm0
  cvtsi2sd %rax,%xmm0
  jmp    L66
L60:
  mov    %rax,%rdx
  shr    %rdx
  and    $0x1,%eax
  or     %rax,%rdx
  pxor   %xmm0,%xmm0
  cvtsi2sd %rdx,%xmm0
  addsd  %xmm0,%xmm0
L66:
  mov    -0x20(%rbp),%rax
  add    $0x20,%rax
  divsd  %xmm0,%xmm1
  movsd  %xmm1,(%rax)
L9:
  mov    -0x20(%rbp),%rax
  add    $0x20,%rax
  movsd  (%rax),%xmm0
  comisd D25(%rip),%xmm0
  ja     L42
  jmp    L121
L42:
  mov    -0x20(%rbp),%rax
  add    $0x20,%rax
  movsd  D25(%rip),%xmm0
  movsd  %xmm0,(%rax)
L121:
  nop
  pop    %rbp
  ret
```

tool_calls: name: parse_data
arguments: tag: D25
type_guessed: f64

tool: D25: 100

assistant: ```c
void set_tcp_record(struct module *mod, double st_array[], unsigned long long pre_array[], unsigned long long cur_array[], int inter) {
  int i;
  for (i = 0; i < 4; i++) {
    if (cur_array[i] >= pre_array[i])
      st_array[i] = (cur_array[i] - pre_array[i]) * 1.0 / inter;
  }
  if ((cur_array[4] >= pre_array[4]) && (cur_array[3] > pre_array[3]))
    st_array[4] = (cur_array[4] - pre_array[4]) * 100.0 / (cur_array[3] - pre_array[3]);
  if (st_array[4] > 100.0)
    st_array[4] = 100.0;
}
```