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

```asm
<main>:
  endbr64
  push   %r15
  push   %r14
  push   %rbp
  push   %rbx
  sub    $0x38,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x28(%rsp)
  xor    %eax,%eax
  lea    0x20(%rsp),%rcx
  lea    0x18(%rsp),%rdx
  lea    0x10(%rsp),%rsi
  lea    D86(%rip),%rdi
  call   <scanf@plt>
  mov    $0x2,%edi
  movsd  0x18(%rsp),%xmm0
  call   <pow@plt>
  mov    0x10(%rsp),%rbx
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movq   %rbx,%xmm0
  mulsd  D28(%rip),%xmm0
  mulsd  0x20(%rsp),%xmm0
  subsd  %xmm0,%xmm1
  movsd  %xmm1,(%rsp)
  pxor   %xmm0,%xmm0
  ucomisd %xmm1,%xmm0
  ja     L15
  movapd %xmm1,%xmm2
  sqrtsd %xmm2,%xmm2
  movsd  %xmm2,(%rsp)
  mov    0x18(%rsp),%rbp
  movq   %rbx,%xmm3
  addsd  %xmm3,%xmm3
  movsd  %xmm3,0x8(%rsp)
  movq   %rbp,%xmm7
  subsd  %xmm7,%xmm2
  movapd %xmm2,%xmm0
  divsd  %xmm3,%xmm0
  movq   %xmm0,%r14
  movq   %rbp,%xmm4
  xorpd  D76(%rip),%xmm4
  movq   %xmm4,%r15
L29:
  movq   %rbx,%xmm5
  ucomisd D4(%rip),%xmm5
  jp     L47
  jne    L47
L13:
  lea    D89(%rip),%rdi
  call   <puts@plt>
L40:
  lea    D85(%rip),%rdi
  call   <system@plt>
  mov    0x28(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L22
  mov    $0x0,%eax
  add    $0x38,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r14
  pop    %r15
  ret
L15:
  movsd  (%rsp),%xmm0
  call   <sqrt@plt>
  mov    0x18(%rsp),%rbp
  movq   %rbx,%xmm7
  addsd  %xmm7,%xmm7
  movsd  %xmm7,0x8(%rsp)
  movq   %rbp,%xmm5
  subsd  %xmm5,%xmm0
  movapd %xmm0,%xmm5
  divsd  %xmm7,%xmm5
  movq   %xmm5,%r14
  movq   %rbp,%xmm5
  xorpd  D76(%rip),%xmm5
  movq   %xmm5,%r15
  movsd  (%rsp),%xmm0
  call   <sqrt@plt>
  movsd  %xmm0,(%rsp)
  jmp    L29
L47:
  mov    $0x2,%edi
  movq   %rbp,%xmm0
  call   <pow@plt>
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  D28(%rip),%xmm0
  mulsd  0x10(%rsp),%xmm0
  mulsd  0x20(%rsp),%xmm0
  subsd  %xmm0,%xmm1
  pxor   %xmm0,%xmm0
  comisd %xmm1,%xmm0
  ja     L13
  movq   %r14,%xmm0
  lea    D98(%rip),%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  movq   %r15,%xmm0
  subsd  (%rsp),%xmm0
  divsd  0x8(%rsp),%xmm0
  lea    D12(%rip),%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  jmp    L40
L22:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: parse_data
arguments: label: D86
datatype: string
name: parse_data
arguments: label: D28
datatype: byte[8]
name: parse_data
arguments: label: D76
datatype: byte[16]
name: parse_data
arguments: label: D4
datatype: byte[8]
name: parse_data
arguments: label: D89
datatype: string
name: parse_data
arguments: label: D85
datatype: string
name: parse_data
arguments: label: D98
datatype: string
name: parse_data
arguments: label: D12
datatype: string

tool: D86: %lf %lf %lf

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

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

tool: {"D4": [0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00]}

tool: D89: Impossivel calcular

tool: D85: pause

tool: D98: R1 = %.5lf


tool: D12: R2 = %.5lf


assistant: ```c
int main() {
  double A, B, C, R1, R2, delta;
  scanf("%lf %lf %lf", &A, &B, &C);
  delta = pow(B, 2) - 4 * A * C;
  R1 = (-B + sqrt(delta)) / (2 * A);
  R2 = (-B - sqrt(delta)) / (2 * A);
  if (A == 0 || (pow(B, 2) - 4 * A * C) < 0)
    printf("Impossivel calcular\n");
  else {
    printf("R1 = %.5lf\n", R1);
    printf("R2 = %.5lf\n", R2);
  }
  system("pause");
  return 0;
}
```