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

```asm
<main>:
  endbr64
  push   %r14
  pxor   %xmm0,%xmm0
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  add    $0xffffffffffffff80,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x78(%rsp)
  xor    %eax,%eax
  movl   $0x0,0x70(%rsp)
  movaps %xmm0,0x10(%rsp)
  movaps %xmm0,0x20(%rsp)
  movaps %xmm0,0x30(%rsp)
  movaps %xmm0,0x40(%rsp)
  movaps %xmm0,0x50(%rsp)
  movaps %xmm0,0x60(%rsp)
  cmp    $0x1,%edi
  jle    L25
  lea    -0x2(%rdi),%eax
  mov    %rsi,%rbx
  lea    D34(%rip),%r13
  lea    0x8(%rsi,%rax,8),%r14
  lea    0x10(%rsp),%r12
  lea    D37(%rip),%rbp
  nopl   0x0(%rax)
L30:
  mov    %r13,%rdi
  add    $0x8,%rbx
  call   <ungets@plt>
  mov    (%rbx),%rdi
  call   <ungets@plt>
  mov    %r12,%rdi
  call   <getop@plt>
  sub    $0x2a,%eax
  cmp    $0x6,%eax
  ja     L52
  movslq 0x0(%rbp,%rax,4),%rax
  add    %rbp,%rax
  notrack jmp *%rax
  nopl   0x0(%rax,%rax,1)
  mov    %r12,%rdi
  call   <atof@plt>
  call   <dapush@plt>
L17:
  cmp    %r14,%rbx
  jne    L30
  jmp    L25
  nopw   0x0(%rax,%rax,1)
  xor    %eax,%eax
  call   <dapop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <dapop@plt>
  divsd  0x8(%rsp),%xmm0
  call   <dapush@plt>
  jmp    L17
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <dapop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <dapop@plt>
  subsd  0x8(%rsp),%xmm0
  call   <dapush@plt>
  jmp    L17
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <dapop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <dapop@plt>
  addsd  0x8(%rsp),%xmm0
  call   <dapush@plt>
  jmp    L17
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <dapop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <dapop@plt>
  mulsd  0x8(%rsp),%xmm0
  call   <dapush@plt>
  jmp    L17
  nopl   0x0(%rax)
L52:
  mov    %r12,%rsi
  lea    D31(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
L25:
  xor    %eax,%eax
  call   <dapop@plt>
  lea    D0(%rip),%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  mov    0x78(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L53
  sub    $0xffffffffffffff80,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L53:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: label: D34
type_guessed: string
name: retrieve_data
arguments: label: D31
type_guessed: string
name: retrieve_data
arguments: label: D0
type_guessed: string

tool: D34:  

tool: D31: Error: Unknown command '%s'


tool: D0: %.8g


assistant: ```c
int main(int argc, char *argv[]) {
  char operator[100] = "";
  double operand;
  while (--argc > 0) {
    ungets(" ");
    ungets(*++argv);
    switch (getop(operator)) {
    case '0':
      dapush(atof(operator));
      break;
    case '+':
      dapush(dapop() + dapop());
      break;
    case '-':
      operand = dapop();
      dapush(dapop() - operand);
      break;
    case '*':
      dapush(dapop() * dapop());
      break;
    case '/':
      operand = dapop();
      dapush(dapop() / operand);
      break;
    default:
      printf("Error: Unknown command '%s'\n", operator);
      argc = 1;
      break;
    }
  }
  printf("%.8g\n", dapop());
  return 0;
}
```