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

```asm
<main>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x10,%rsp
  cmp    $0x1,%edi
  jle    L21
  lea    -0x2(%rdi),%eax
  lea    0x8(%rsi),%rbx
  lea    0x10(%rsi,%rax,8),%r12
  lea    D42(%rip),%r13
  lea    D48(%rip),%rbp
  lea    D15(%rip),%r14
  nopw   0x0(%rax,%rax,1)
L47:
  mov    (%rbx),%rdi
  call   <getop@plt>
  sub    $0x2a,%eax
  cmp    $0x6,%eax
  ja     L116
  movslq 0x0(%rbp,%rax,4),%rax
  add    %rbp,%rax
  notrack jmp *%rax
  nop
  mov    (%rbx),%rdi
  call   <atof@plt>
  call   <push@plt>
  nopl   (%rax)
L70:
  add    $0x8,%rbx
  cmp    %r12,%rbx
  jne    L47
  xor    %eax,%eax
  call   <pop@plt>
  lea    D16(%rip),%rdi
  mov    $0x1,%eax
  call   <printf@plt>
  xor    %eax,%eax
L32:
  add    $0x10,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  xor    %eax,%eax
  call   <pop@plt>
  pxor   %xmm5,%xmm5
  ucomisd %xmm5,%xmm0
  movapd %xmm0,%xmm1
  jp     L87
  je     L119
L87:
  xor    %eax,%eax
  movsd  %xmm1,0x8(%rsp)
  call   <pop@plt>
  movsd  0x8(%rsp),%xmm1
  divsd  %xmm1,%xmm0
  call   <push@plt>
  jmp    L70
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <pop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <pop@plt>
  subsd  0x8(%rsp),%xmm0
  call   <push@plt>
  jmp    L70
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <pop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <pop@plt>
  addsd  0x8(%rsp),%xmm0
  call   <push@plt>
  jmp    L70
  nopl   0x0(%rax)
  xor    %eax,%eax
  call   <pop@plt>
  xor    %eax,%eax
  movsd  %xmm0,0x8(%rsp)
  call   <pop@plt>
  mulsd  0x8(%rsp),%xmm0
  call   <push@plt>
  jmp    L70
  nopl   0x0(%rax)
L116:
  mov    (%rbx),%rsi
  mov    %r13,%rdi
  xor    %eax,%eax
  call   <printf@plt>
  jmp    L70
L119:
  mov    %r14,%rdi
  call   <puts@plt>
  jmp    L70
L21:
  mov    (%rsi),%rsi
  lea    D29(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  mov    $0x1,%eax
  jmp    L32
```

tool_calls: name: unpack_data
arguments: data_tag: D42
data_type: string
name: unpack_data
arguments: data_tag: D15
data_type: string
name: unpack_data
arguments: data_tag: D16
data_type: string
name: unpack_data
arguments: data_tag: D29
data_type: string

tool: D42: error: unknown command %s


tool: D15: error: zero divisor

tool: D16: 	%.8g


tool: D29: Usage: %s arguments


assistant: ```c
int main(int argc, char *argv[]) {
  if (argc < 2) {
    printf("Usage: %s arguments\n", argv[0]);
    return 1;
  }
  int type, ar = 1;
  double op2;
  while (ar < argc) {
    type = getop(argv[ar]);
    switch (type) {
    case '0':
      push(atof(argv[ar]));
      break;
    case '+':
      push(pop() + pop());
      break;
    case '*':
      push(pop() * pop());
      break;
    case '-':
      op2 = pop();
      push(pop() - op2);
      break;
    case '/':
      op2 = pop();
      if (op2 != 0.0)
        push(pop() / op2);
      else
        printf("error: zero divisor\n");
      break;
    default:
      printf("error: unknown command %s\n", argv[ar]);
      break;
    }
    ar++;
  }
  printf("\t%.8g\n", pop());
  return 0;
}
```