user: What would the C source look like for the assembly code provided here?

```asm
<main>:
  endbr64
  push   %r15
  lea    D13(%rip),%r15
  push   %r14
  lea    D155(%rip),%r14
  push   %r13
  lea    D185(%rip),%r13
  push   %r12
  lea    D156(%rip),%r12
  push   %rbp
  lea    D118(%rip),%rbp
  push   %rbx
  sub    $0x18,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x8(%rsp)
  xor    %eax,%eax
  lea    0x5(%rsp),%rbx
  nopw   0x0(%rax,%rax,1)
L280:
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  je     L157
L87:
  mov    %r14,%rdi
  call   <printf@plt>
  mov    %rbx,%rsi
  mov    %r13,%rdi
  call   <scanf@plt>
  mov    %r12,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L305
  call   <programs@plt>
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L87
L157:
  mov    0x8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L139
  add    $0x18,%rsp
  xor    %eax,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   (%rax)
L305:
  mov    %rbp,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L230
  lea    D130(%rip),%rdi
  call   <printf@plt>
  jmp    L280
  nopl   0x0(%rax)
L230:
  mov    %r15,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L196
  call   <degree_to_radian@plt>
  jmp    L280
  nopw   0x0(%rax,%rax,1)
L196:
  lea    D199(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L91
  call   <radian_to_degree@plt>
  jmp    L280
L91:
  lea    D174(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L240
  call   <circle_area@plt>
  jmp    L280
L240:
  lea    D43(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  je     L92
  lea    D68(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L247
  call   <parallelogram_area@plt>
  jmp    L280
L92:
  call   <trapezoid_area@plt>
  jmp    L280
L247:
  lea    D14(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  je     L322
  lea    D29(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L334
  call   <cylinder_surface_area@plt>
  jmp    L280
L322:
  call   <triangle_area@plt>
  jmp    L280
L334:
  lea    D184(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L76
  call   <cylinder_volume@plt>
  jmp    L280
L76:
  lea    D142(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L257
  call   <sphere_surface_area@plt>
  jmp    L280
L257:
  lea    D98(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L312
  call   <sphere_volume@plt>
  jmp    L280
L312:
  lea    D122(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L19
  call   <circumference@plt>
  jmp    L280
L19:
  lea    D190(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L49
  call   <arc_length@plt>
  jmp    L280
L49:
  lea    D35(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L99
  call   <sector_area@plt>
  jmp    L280
L139:
  call   <__stack_chk_fail@plt>
L99:
  lea    D125(%rip),%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L317
  call   <quadratic_formula@plt>
  jmp    L280
L317:
  lea    D165(%rip),%rdi
  call   <printf@plt>
  jmp    L280
```

tool_calls: name: unpack_data
arguments: data_label: D13
type_infered: string
name: unpack_data
arguments: data_label: D155
type_infered: string
name: unpack_data
arguments: data_label: D185
type_infered: string
name: unpack_data
arguments: data_label: D156
type_infered: string
name: unpack_data
arguments: data_label: D118
type_infered: string
name: unpack_data
arguments: data_label: D130
type_infered: string
name: unpack_data
arguments: data_label: D199
type_infered: string
name: unpack_data
arguments: data_label: D174
type_infered: string
name: unpack_data
arguments: data_label: D43
type_infered: string
name: unpack_data
arguments: data_label: D68
type_infered: string
name: unpack_data
arguments: data_label: D14
type_infered: string
name: unpack_data
arguments: data_label: D29
type_infered: string
name: unpack_data
arguments: data_label: D184
type_infered: string
name: unpack_data
arguments: data_label: D142
type_infered: string
name: unpack_data
arguments: data_label: D98
type_infered: string
name: unpack_data
arguments: data_label: D122
type_infered: string
name: unpack_data
arguments: data_label: D190
type_infered: string
name: unpack_data
arguments: data_label: D35
type_infered: string
name: unpack_data
arguments: data_label: D125
type_infered: string
name: unpack_data
arguments: data_label: D165
type_infered: string

tool: D13: d2r

tool: D155: Select a program: 

tool: D185: %4s

tool: D156: p

tool: D118: q

tool: D130: quitting...


tool: D199: r2d

tool: D174: ca

tool: D43: ta

tool: D68: pa

tool: D14: tea

tool: D29: csa

tool: D184: cv

tool: D142: ssa

tool: D98: sv

tool: D122: c

tool: D190: al

tool: D35: sa

tool: D125: qf

tool: D165: That's not a program, type "p" for a list


assistant: ```c
int main() {
  char program[3];
  while (strcmp(program, "q") != 0) {
    printf("Select a program: ");
    scanf("%4s", program);
    if (strcmp(program, "p") == 0) {
      programs();
    } else if (strcmp(program, "q") == 0) {
      printf("quitting...\n");
    } else if (strcmp(program, "d2r") == 0) {
      degree_to_radian();
    } else if (strcmp(program, "r2d") == 0) {
      radian_to_degree();
    } else if (strcmp(program, "ca") == 0) {
      circle_area();
    } else if (strcmp(program, "ta") == 0) {
      trapezoid_area();
    } else if (strcmp(program, "pa") == 0) {
      parallelogram_area();
    } else if (strcmp(program, "tea") == 0) {
      triangle_area();
    } else if (strcmp(program, "csa") == 0) {
      cylinder_surface_area();
    } else if (strcmp(program, "cv") == 0) {
      cylinder_volume();
    } else if (strcmp(program, "ssa") == 0) {
      sphere_surface_area();
    } else if (strcmp(program, "sv") == 0) {
      sphere_volume();
    } else if (strcmp(program, "c") == 0) {
      circumference();
    } else if (strcmp(program, "al") == 0) {
      arc_length();
    } else if (strcmp(program, "sa") == 0) {
      sector_area();
    } else if (strcmp(program, "qf") == 0) {
      quadratic_formula();
    } else {
      printf("That's not a program, type \"p\" for a list\n");
    }
  }
  return 0;
}
```