user: Demonstrate the C code that generates the assembly output below:

```asm
<runor>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r12
  push   %rbx
  lea    -0x4000(%rsp),%r11
L121:
  sub    $0x1000,%rsp
  orq    $0x0,(%rsp)
  cmp    %r11,%rsp
  jne    L121
  sub    $0x50,%rsp
  mov    %rdi,-0x4038(%rbp)
  mov    %esi,-0x403c(%rbp)
  mov    %rdx,-0x4048(%rbp)
  mov    %ecx,-0x4040(%rbp)
  mov    %r8,-0x4050(%rbp)
  mov    %r9,-0x4058(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x18(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x4024(%rbp)
  cmpq   $0x0,-0x4050(%rbp)
  jne    L202
  lea    -0x4020(%rbp),%rax
  mov    %rax,-0x4050(%rbp)
L202:
  movl   $0x0,-0x4030(%rbp)
  mov    -0x4038(%rbp),%rax
  movzwl (%rax),%r12d
  movl   $0x0,-0x402c(%rbp)
  mov    -0x4048(%rbp),%rax
  movzwl (%rax),%ebx
  movl   $0x0,-0x4028(%rbp)
  mov    -0x4050(%rbp),%rax
  movw   $0x0,(%rax)
L231:
  cmp    %bx,%r12w
  jg     L100
  mov    -0x4030(%rbp),%eax
  or     -0x402c(%rbp),%eax
  xor    -0x4028(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  je     L63
  addl   $0x1,-0x4028(%rbp)
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  mov    %r12w,(%rax)
  jmp    L145
L63:
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  mov    %eax,%edx
  mov    %r12d,%eax
  add    %eax,%edx
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x4050(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
L145:
  mov    %ebx,%eax
  mov    %r12d,%edx
  sub    %edx,%eax
  mov    %eax,%ebx
  addl   $0x1,-0x4030(%rbp)
  mov    -0x4030(%rbp),%eax
  cmp    -0x403c(%rbp),%eax
  jge    L170
  mov    -0x4030(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4038(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%r12d
  jmp    L231
L100:
  mov    -0x4030(%rbp),%eax
  or     -0x402c(%rbp),%eax
  xor    -0x4028(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  je     L141
  addl   $0x1,-0x4028(%rbp)
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  mov    %bx,(%rax)
  jmp    L167
L141:
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  mov    %eax,%edx
  mov    %ebx,%eax
  add    %eax,%edx
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x4050(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
L167:
  mov    %r12d,%eax
  mov    %ebx,%edx
  sub    %edx,%eax
  mov    %eax,%r12d
  addl   $0x1,-0x402c(%rbp)
  mov    -0x402c(%rbp),%eax
  cmp    -0x4040(%rbp),%eax
  jge    L247
  mov    -0x402c(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4048(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%ebx
  jmp    L231
L170:
  nop
  jmp    L112
L247:
  nop
L112:
  mov    -0x4030(%rbp),%eax
  cmp    -0x403c(%rbp),%eax
  jge    L161
L42:
  mov    -0x4030(%rbp),%eax
  xor    -0x4028(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  je     L101
  addl   $0x1,-0x4028(%rbp)
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  mov    %r12w,(%rax)
  jmp    L122
L101:
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  mov    %eax,%edx
  mov    %r12d,%eax
  add    %eax,%edx
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x4050(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
L122:
  addl   $0x1,-0x4030(%rbp)
  mov    -0x4030(%rbp),%eax
  cmp    -0x403c(%rbp),%eax
  jge    L69
  mov    -0x4030(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4038(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%r12d
  jmp    L42
L161:
  mov    -0x402c(%rbp),%eax
  xor    -0x4028(%rbp),%eax
  and    $0x1,%eax
  test   %eax,%eax
  je     L264
  addl   $0x1,-0x4028(%rbp)
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  mov    %bx,(%rax)
  jmp    L13
L264:
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%eax
  mov    %eax,%edx
  mov    %ebx,%eax
  add    %eax,%edx
  mov    -0x4028(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x4050(%rbp),%rax
  add    %rcx,%rax
  mov    %dx,(%rax)
L13:
  addl   $0x1,-0x402c(%rbp)
  mov    -0x402c(%rbp),%eax
  cmp    -0x4040(%rbp),%eax
  jge    L210
  mov    -0x402c(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4048(%rbp),%rax
  add    %rdx,%rax
  movzwl (%rax),%ebx
  jmp    L161
L69:
  nop
  jmp    L138
L210:
  nop
L138:
  lea    -0x4020(%rbp),%rax
  cmp    %rax,-0x4050(%rbp)
  jne    L68
  movl   $0x0,-0x4030(%rbp)
  jmp    L240
L53:
  mov    -0x4030(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rdx
  mov    -0x4050(%rbp),%rax
  add    %rax,%rdx
  mov    -0x4030(%rbp),%eax
  cltq
  lea    (%rax,%rax,1),%rcx
  mov    -0x4038(%rbp),%rax
  add    %rcx,%rax
  movzwl (%rdx),%edx
  mov    %dx,(%rax)
  movzwl (%rax),%eax
  cwtl
  add    %eax,-0x4024(%rbp)
  addl   $0x1,-0x4030(%rbp)
L240:
  mov    -0x4030(%rbp),%eax
  cmp    -0x4028(%rbp),%eax
  jle    L53
L68:
  cmpq   $0x0,-0x4058(%rbp)
  je     L119
  mov    -0x4058(%rbp),%rax
  mov    -0x4024(%rbp),%edx
  mov    %edx,(%rax)
L119:
  mov    -0x4028(%rbp),%eax
  add    $0x1,%eax
  mov    -0x18(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L18
  call   <__stack_chk_fail@plt>
L18:
  add    $0x4050,%rsp
  pop    %rbx
  pop    %r12
  pop    %rbp
  ret
```

assistant: ```c
int runor(short *a, int na, short *b, int nb, short *c, int *pels) {
  register short la, lb;
  int ia, ib, ic, np = 0;
  short tmp[8192];
  if (!c)
    c = tmp;
  la = a[ia = 0];
  lb = b[ib = 0];
  c[ic = 0] = 0;
  while (1) {
    if (la <= lb) {
      if (((ia | ib) ^ ic) & 1)
        c[++ic] = la;
      else
        c[ic] += la;
      lb -= la;
      if (++ia >= na)
        break;
      la = a[ia];
    } else {
      if (((ia | ib) ^ ic) & 1)
        c[++ic] = lb;
      else
        c[ic] += lb;
      la -= lb;
      if (++ib >= nb)
        break;
      lb = b[ib];
    }
  }
  if (ia < na)
    while (1) {
      if ((ia ^ ic) & 1)
        c[++ic] = la;
      else
        c[ic] += la;
      if (++ia >= na)
        break;
      la = a[ia];
    }
  else
    while (1) {
      if ((ib ^ ic) & 1)
        c[++ic] = lb;
      else
        c[ic] += lb;
      if (++ib >= nb)
        break;
      lb = b[ib];
    }
  if (c == tmp)
    for (ia = 0; ia <= ic; ia++)
      np += a[ia] = c[ia];
  if (pels)
    *pels = np;
  return ic + 1;
}
```