user: Translate the below assembly code into C programming language:

```asm
<fn3>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  mov    %edi,%r14d
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x18,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  lea    (%rdi,%rdi,2),%eax
  mov    %rsp,%rcx
  cltq
  lea    0xf(,%rax,8),%rax
  mov    %rax,%rsi
  mov    %rax,%rdx
  and    $0xfffffffffffff000,%rsi
  and    $0xfffffffffffffff0,%rdx
  sub    %rsi,%rcx
  cmp    %rcx,%rsp
  je     L11
L198:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rcx,%rsp
  jne    L198
L11:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  jne    L128
L41:
  mov    %rax,%rsi
  mov    %rsp,%rcx
  mov    %rax,%rdx
  mov    %rsp,%rbx
  and    $0xfffffffffffff000,%rsi
  and    $0xfffffffffffffff0,%rdx
  sub    %rsi,%rcx
  cmp    %rcx,%rsp
  je     L42
L105:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rcx,%rsp
  jne    L105
L42:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  jne    L200
L149:
  mov    %rax,%rsi
  mov    %rsp,%rcx
  mov    %rax,%rdx
  mov    %rsp,%r12
  and    $0xfffffffffffff000,%rsi
  and    $0xfffffffffffffff0,%rdx
  sub    %rsi,%rcx
  cmp    %rcx,%rsp
  je     L38
L55:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rcx,%rsp
  jne    L55
L38:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  je     L25
  orq    $0x0,-0x8(%rsp,%rdx,1)
L25:
  mov    %rax,%rdx
  mov    %rsp,%rcx
  and    $0xfffffffffffff000,%rax
  mov    %rsp,%r13
  sub    %rax,%rcx
  and    $0xfffffffffffffff0,%rdx
  cmp    %rcx,%rsp
  je     L103
L44:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rcx,%rsp
  jne    L44
L103:
  mov    %rdx,%rax
  and    $0xfff,%eax
  sub    %rax,%rsp
  test   %rax,%rax
  je     L46
  orq    $0x0,-0x8(%rsp,%rax,1)
L46:
  mov    %r14d,%edx
  mov    %r12,%rsi
  mov    %rbx,%rdi
  mov    %rsp,%r15
  call   <fn1@plt>
  mov    %r14d,%edx
  mov    %r13,%rsi
  mov    %r15,%rdi
  call   <fn1@plt>
  test   %r14d,%r14d
  jle    L101
  cmp    $0x1,%r14d
  je     L69
  mov    %r14d,%edx
  xor    %eax,%eax
  pxor   %xmm0,%xmm0
  shr    %edx
  shl    $0x4,%rdx
  nopl   0x0(%rax)
L92:
  movupd (%rbx,%rax,1),%xmm1
  movupd (%r12,%rax,1),%xmm3
  movupd 0x0(%r13,%rax,1),%xmm4
  add    $0x10,%rax
  mulpd  %xmm3,%xmm1
  addpd  %xmm4,%xmm1
  addsd  %xmm1,%xmm0
  unpckhpd %xmm1,%xmm1
  addsd  %xmm1,%xmm0
  cmp    %rax,%rdx
  jne    L92
  mov    %r14d,%eax
  and    $0xfffffffe,%eax
  and    $0x1,%r14d
  je     L135
L184:
  cltq
  movsd  (%r12,%rax,8),%xmm1
  mulsd  (%rbx,%rax,8),%xmm1
  addsd  0x0(%r13,%rax,8),%xmm1
  addsd  %xmm1,%xmm0
L135:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L26
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
  nopl   0x0(%rax)
L128:
  orq    $0x0,-0x8(%rsp,%rdx,1)
  jmp    L41
L200:
  orq    $0x0,-0x8(%rsp,%rdx,1)
  jmp    L149
L101:
  pxor   %xmm0,%xmm0
  jmp    L135
L69:
  xor    %eax,%eax
  pxor   %xmm0,%xmm0
  jmp    L184
L26:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
double fn3(int x) {
  double s = 0;
  double b[3 * x], c[3 * x], d[3 * x], e[3 * x];
  int i;
  fn1(b, c, x);
  fn1(e, d, x);
#pragma omp target map(tofrom : s)
#pragma omp parallel for reduction(+ : s)
  for (i = 0; i < x; i++)
    s += b[i] * c[i] + d[i];
  return s;
}
```