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

```asm
<heir9>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  sub    $0x10,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x8(%rsp)
  xor    %eax,%eax
  call   <heir10@plt>
  mov    %eax,%r12d
  xor    %eax,%eax
  call   <blanks@plt>
  xor    %eax,%eax
  call   <chr@plt>
  mov    %eax,%ebx
  xor    %eax,%eax
  call   <chr@plt>
  cmp    $0x2a,%ebx
  mov    %eax,%r8d
  setne  %al
  cmp    $0x2f,%r8d
  setne  %dl
  and    %edx,%eax
  mov    %eax,%ebx
  xor    %eax,%eax
  call   <chr@plt>
  cmp    $0x25,%eax
  je     L118
  test   %bl,%bl
  je     L118
L16:
  mov    0x8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L18
  add    $0x10,%rsp
  mov    %r12d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopw   0x0(%rax,%rax,1)
L118:
  test   %r12d,%r12d
  jne    L33
L25:
  lea    D27(%rip),%rbp
  lea    D22(%rip),%r13
  mov    %rsp,%rbx
  lea    D17(%rip),%r14
  nopl   0x0(%rax)
L62:
  xor    %eax,%eax
  mov    %rbp,%rdi
  call   <match@plt>
  test   %eax,%eax
  jne    L84
L122:
  xor    %eax,%eax
  mov    %r13,%rdi
  call   <match@plt>
  test   %eax,%eax
  jne    L95
  mov    %r14,%rdi
  xor    %eax,%eax
  call   <match@plt>
  mov    %eax,%r12d
  test   %eax,%eax
  je     L16
  xor    %eax,%eax
  call   <mnem_push@plt>
  xor    %eax,%eax
  mov    %rbx,%rdi
  call   <heir10@plt>
  test   %eax,%eax
  jne    L46
L81:
  xor    %eax,%eax
  call   <mnem_pop@plt>
  xor    %eax,%eax
  call   <mod@plt>
  xor    %eax,%eax
  mov    %rbp,%rdi
  call   <match@plt>
  test   %eax,%eax
  je     L122
L84:
  xor    %eax,%eax
  call   <mnem_push@plt>
  xor    %eax,%eax
  mov    %rbx,%rdi
  call   <heir9>
  test   %eax,%eax
  je     L156
  mov    %rbx,%rdi
  xor    %eax,%eax
  call   <rvalue@plt>
L156:
  xor    %eax,%eax
  call   <mnem_pop@plt>
  xor    %eax,%eax
  call   <m_mult@plt>
  jmp    L62
  nopl   0x0(%rax)
L95:
  xor    %eax,%eax
  call   <mnem_push@plt>
  xor    %eax,%eax
  mov    %rbx,%rdi
  call   <heir10@plt>
  test   %eax,%eax
  jne    L92
L144:
  xor    %eax,%eax
  call   <mnem_pop@plt>
  xor    %eax,%eax
  call   <m_div@plt>
  jmp    L62
  nopl   0x0(%rax,%rax,1)
L46:
  mov    %rbx,%rdi
  xor    %eax,%eax
  call   <rvalue@plt>
  jmp    L81
  nop
L92:
  mov    %rbx,%rdi
  xor    %eax,%eax
  call   <rvalue@plt>
  jmp    L144
  nopl   0x0(%rax)
L33:
  mov    %rbp,%rdi
  xor    %eax,%eax
  call   <rvalue@plt>
  jmp    L25
L18:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: data_tag: D27
type_infered: string
name: retrieve_data
arguments: data_tag: D22
type_infered: string
name: retrieve_data
arguments: data_tag: D17
type_infered: string

tool: D27: *

tool: D22: /

tool: D17: %

assistant: ```c
heir9(lval) int lval[];
{
  int k, lval2[2];
  k = heir10(lval);
  blanks();
  if ((chr() != '*') & (chr() != '/') & (chr() != '%'))
    return k;
  if (k)
    rvalue(lval);
  while (1) {
    if (match("*")) {
      mnem_push();
      if (heir9(lval2))
        rvalue(lval2);
      mnem_pop();
      m_mult();
    } else if (match("/")) {
      mnem_push();
      if (heir10(lval2))
        rvalue(lval2);
      mnem_pop();
      m_div();
    } else if (match("%")) {
      mnem_push();
      if (heir10(lval2))
        rvalue(lval2);
      mnem_pop();
      mod();
    } else
      return 0;
  }
}
```