user: Translate the below assembly code into C programming language:

```asm
<student_t_p_2tail>:
  endbr64
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x28,%rsp
  movss  %xmm0,0x4(%rsp)
  lea    0x14(%rsp),%rsi
  movaps %xmm1,%xmm0
  lea    0x10(%rsp),%rdi
  mov    %fs:0x28,%rax
  mov    %rax,0x18(%rsp)
  xor    %eax,%eax
  call   <df_to_index@plt>
  movss  0x4(%rsp),%xmm4
  pxor   %xmm7,%xmm7
  comiss %xmm4,%xmm7
  jbe    L102
  xorps  D10(%rip),%xmm4
  movss  %xmm4,0x4(%rsp)
L102:
  movss  0x14(%rsp),%xmm0
  mov    0x10(%rsp),%esi
  xor    %edi,%edi
  call   <get_t@plt>
  movss  0x4(%rsp),%xmm6
  movaps %xmm0,%xmm1
  pxor   %xmm0,%xmm0
  comiss %xmm1,%xmm6
  jbe    L47
L24:
  mov    0x18(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L89
  add    $0x28,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  nopl   0x0(%rax)
L47:
  movss  0x14(%rsp),%xmm0
  mov    0x10(%rsp),%esi
  mov    $0xbd,%edi
  call   <get_t@plt>
  movaps %xmm0,%xmm1
  comiss 0x4(%rsp),%xmm1
  movss  D15(%rip),%xmm0
  ja     L24
  mov    $0xbd,%ebp
  xor    %r12d,%r12d
  jmp    L70
  nopl   0x0(%rax,%rax,1)
L94:
  ucomiss %xmm0,%xmm3
  cmovae %ebx,%ebp
L108:
  mov    %ebp,%eax
  sub    %r12d,%eax
  cmp    $0x1,%eax
  jle    L15
L70:
  lea    (%r12,%rbp,1),%eax
  movss  0x14(%rsp),%xmm0
  mov    0x10(%rsp),%esi
  mov    %eax,%ebx
  shr    $0x1f,%ebx
  add    %eax,%ebx
  sar    %ebx
  mov    %ebx,%edi
  mov    %ebx,%r13d
  call   <get_t@plt>
  movss  0x4(%rsp),%xmm3
  comiss %xmm3,%xmm0
  jb     L94
  ucomiss %xmm0,%xmm3
  jp     L88
  je     L76
L88:
  mov    %ebx,%r12d
  jmp    L108
  nopl   0x0(%rax)
L76:
  mov    %r13d,%ebp
L22:
  mov    0x10(%rsp),%esi
  movss  0x14(%rsp),%xmm0
  mov    %r13d,%edi
  call   <get_t@plt>
  mov    0x10(%rsp),%esi
  mov    %ebp,%edi
  movss  %xmm0,0x8(%rsp)
  movss  0x14(%rsp),%xmm0
  call   <get_t@plt>
  movss  0x4(%rsp),%xmm7
  movss  %xmm0,0xc(%rsp)
  comiss %xmm0,%xmm7
  setae  %dil
  movzbl %dil,%edi
  call   <assert@plt>
  movss  0x8(%rsp),%xmm1
  xor    %edi,%edi
  comiss 0x4(%rsp),%xmm1
  setae  %dil
  call   <assert@plt>
  mov    %ebp,%edi
  call   <index_to_p@plt>
  mov    %r13d,%edi
  mov    %eax,%ebp
  call   <index_to_p@plt>
  movss  0xc(%rsp),%xmm2
  movss  0x8(%rsp),%xmm1
  mov    %ebp,%esi
  movss  0x4(%rsp),%xmm0
  mov    %eax,%edi
  call   <linear@plt>
  jmp    L24
L89:
  call   <__stack_chk_fail@plt>
L15:
  mov    %r12d,%r13d
  jmp    L22
```

tool_calls: name: retrieve_data
arguments: data_tag: D10
type: byte[16]
name: retrieve_data
arguments: data_tag: D15
type: f32

tool: {"D10": [0x00,0x00,0x00,0x80,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00]}

tool: D15: 1

assistant: ```c
float student_t_p_2tail(float t, float df) {
  int df_index1, p_index_min, p_index_mid, p_index_max;
  float df_weight1, t_max, t_mid, t_min;
  p_index_min = 0;
  p_index_max = 189;
  df_to_index(df, &df_index1, &df_weight1);
  if (t < 0)
    t = -t;
  if (t > get_t(p_index_min, df_index1, df_weight1))
    return 0.000;
  if (t < get_t(p_index_max, df_index1, df_weight1))
    return 1.000;
  while (p_index_max - p_index_min > 1) {
    p_index_mid = (p_index_min + p_index_max) / 2;
    t_mid = get_t(p_index_mid, df_index1, df_weight1);
    if (t_mid >= t)
      p_index_min = p_index_mid;
    if (t_mid <= t)
      p_index_max = p_index_mid;
  }
  t_max = get_t(p_index_min, df_index1, df_weight1);
  t_min = get_t(p_index_max, df_index1, df_weight1);
  assert(t >= t_min);
  assert(t <= t_max);
  return linear(t, t_max, index_to_p(p_index_min), t_min, index_to_p(p_index_max));
}
```