user: Please show me the C implementation that matches the assembly code listed below:

```asm
<main>:
  endbr64
  push   %r13
  lea    D29(%rip),%rdi
  lea    D51(%rip),%r13
  push   %r12
  lea    D55(%rip),%r12
  push   %rbp
  push   %rbx
  lea    D134(%rip),%rbx
  sub    $0x38,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x28(%rsp)
  xor    %eax,%eax
  lea    0x20(%rsp),%rbp
  call   <puts@plt>
  lea    D94(%rip),%rdi
  call   <puts@plt>
  jmp    L2
  nopw   0x0(%rax,%rax,1)
L49:
  comisd D111(%rip),%xmm0
  jbe    L22
  movapd %xmm6,%xmm2
  subsd  %xmm0,%xmm2
  xorpd  D102(%rip),%xmm2
L34:
  mov    %r13,%rdi
  mov    $0x1,%eax
  movsd  %xmm2,0x8(%rsp)
  call   <printf@plt>
  movsd  0x8(%rsp),%xmm2
  mov    %r12,%rdi
  mov    $0x2,%eax
  movapd %xmm2,%xmm0
  movapd %xmm2,%xmm1
  divsd  D28(%rip),%xmm1
  call   <printf@plt>
  lea    D35(%rip),%rdi
  call   <puts@plt>
L2:
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <scanf@plt>
  movsd  0x20(%rsp),%xmm3
  movsd  D82(%rip),%xmm2
  movsd  D140(%rip),%xmm4
  mov    D3(%rip),%rax
  mulsd  %xmm3,%xmm2
  movapd %xmm3,%xmm0
  movsd  %xmm3,0x18(%rsp)
  addsd  %xmm3,%xmm0
  addsd  D82(%rip),%xmm0
  movq   %rax,%xmm1
  divsd  %xmm0,%xmm2
  mulsd  %xmm2,%xmm4
  movapd %xmm2,%xmm0
  movsd  %xmm2,0x8(%rsp)
  movsd  %xmm4,0x10(%rsp)
  call   <pow@plt>
  movsd  0x18(%rsp),%xmm3
  movsd  0x10(%rsp),%xmm4
  movsd  0x8(%rsp),%xmm2
  movapd %xmm0,%xmm5
  movsd  D83(%rip),%xmm0
  movapd %xmm3,%xmm1
  movsd  D111(%rip),%xmm6
  mulsd  %xmm4,%xmm1
  mulsd  %xmm2,%xmm4
  addsd  %xmm4,%xmm1
  mulsd  %xmm1,%xmm0
  mulsd  %xmm5,%xmm0
  mulsd  D128(%rip),%xmm0
  comisd %xmm0,%xmm6
  jbe    L49
  movapd %xmm6,%xmm2
  subsd  %xmm0,%xmm2
  jmp    L34
  nopl   0x0(%rax)
L22:
  movapd %xmm3,%xmm0
  lea    D153(%rip),%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  mov    0x28(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L23
  add    $0x38,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
L23:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: extract_symbolic_data
arguments: label: D29
type: string
name: extract_symbolic_data
arguments: label: D51
type: string
name: extract_symbolic_data
arguments: label: D55
type: string
name: extract_symbolic_data
arguments: label: D134
type: string
name: extract_symbolic_data
arguments: label: D94
type: string
name: extract_symbolic_data
arguments: label: D111
type: f64[2]
name: extract_symbolic_data
arguments: label: D102
type: byte[16]
name: extract_symbolic_data
arguments: label: D28
type: byte[8]
name: extract_symbolic_data
arguments: label: D35
type: string
name: extract_symbolic_data
arguments: label: D82
type: f64
name: extract_symbolic_data
arguments: label: D140
type: byte[8]
name: extract_symbolic_data
arguments: label: D3
type: byte[8]
name: extract_symbolic_data
arguments: label: D83
type: byte[8]
name: extract_symbolic_data
arguments: label: D128
type: byte[8]
name: extract_symbolic_data
arguments: label: D153
type: string

tool: D29: At a depth of 5000 feet, the flow rate is 641.3225 cubic feet per second

tool: D51: Acording to your guess the flow rate is %f cubic feet per second


tool: D55: Deffernce is %f
with percentage error %f


tool: D134: %lf

tool: D94: Please enter your initial guess with flow rate 1000.000 cubic feet per second

tool: {"D111": [1000.0,100.0]}

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

tool: {"D28": [0x00,0x00,0x00,0x00,0x00,0x00,0x59,0x40]}

tool: D35: Please enter the your next guess

tool: D82: 10

tool: {"D140": [0x1f,0x85,0xeb,0x51,0xb8,0x1e,0x19,0x40]}

tool: {"D3": [0x55,0x55,0x55,0x55,0x55,0x55,0xe5,0x3f]}

tool: {"D83": [0x92,0x24,0x49,0x92,0x24,0x89,0x5a,0x40]}

tool: {"D128": [0xd3,0xc1,0x32,0x90,0x65,0xd4,0xa3,0x3f]}

tool: D153: Your guess is rigth %f


assistant: ```c
main() {
  double q, n = .014, r, a, s = .0015, depth, width = 10;
  printf("At a depth of 5000 feet, the flow rate is 641.3225 cubic feet per second\n");
  printf("Please enter your initial guess with flow rate 1000.000 cubic feet per second\n");
  while (1) {
    scanf("%lf", &depth);
    r = depth * width / (2 * depth + width);
    a = (2.0 * 3.14 * r * depth) + (2.0 * 3.14 * r * r);
    q = ((1.486 / n) * a * (pow(r, (double)2 / 3)) * (pow(s, (double)1 / 2)));
    if (q < 1000) {
      double fin = 1000 - q;
      printf("Acording to your guess the flow rate is %f cubic feet per second\n", q);
      printf("Deffernce is %f\nwith percentage error %f\n", fin, fin / 100);
      printf("Please enter the your next guess\n");
    } else if (q > 1000) {
      double fin = (1000 - q) * (-1.0);
      printf("Acording to your guess the flow rate is %f cubic feet per second\n", q);
      printf("Deffernce is %f\nwith percentage error %f\n", fin, fin / 100);
      printf("Please enter the your next guess\n");
    } else {
      printf("Your guess is rigth %f\n", depth);
      break;
    }
  }
}
```