#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */
typedef int /*<<< orphan*/ c;
typedef int /*<<< orphan*/ b;

/* Variables and functions */
int /*<<< orphan*/ abort();
int /*<<< orphan*/ fn1(double *, double *, int);
double fn4(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, x);
#pragma omp target data map(from : b, c[:x], d [x:x], e)
  {
#pragma omp target update to(b, c[:x], d [x:x], e)
#pragma omp target map(c[:x], d [x:x], s)
#pragma omp parallel for reduction(+ : s)
    for (i = 0; i < x; i++) {
      s += b[i] * c[i] + d[x + i] + sizeof(b) - sizeof(c);
      b[i] = i + 0.5;
      c[i] = 0.5 - i;
      d[x + i] = 0.5 * i;
    }
  }
  for (i = 0; i < x; i++)
    if (b[i] != i + 0.5 || c[i] != 0.5 - i || d[x + i] != 0.5 * i)
      abort();
  return s;
}


x86 assembly (clang, -O0):
<fn4>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %edi,-0x4(%rbp)
movq   $0x0,-0x10(%rbp)
mov    -0x4(%rbp),%ecx
mov    %ecx,%eax
lea    (%rax,%rax,2),%eax
mov    %rax,-0x70(%rbp)
mov    %rsp,%rcx
mov    %rcx,-0x18(%rbp)
lea    0xf(,%rax,8),%rcx
and    $0xfffffffffffffff0,%rcx
mov    %rsp,%rdi
sub    %rcx,%rdi
mov    %rdi,-0x68(%rbp)
mov    %rdi,%rsp
mov    %rax,-0x20(%rbp)
mov    -0x4(%rbp),%ecx
mov    %ecx,%eax
lea    (%rax,%rax,2),%eax
mov    %rax,-0x60(%rbp)
lea    0xf(,%rax,8),%rcx
and    $0xfffffffffffffff0,%rcx
mov    %rsp,%rsi
sub    %rcx,%rsi
mov    %rsi,-0x58(%rbp)
mov    %rsi,%rsp
mov    %rax,-0x28(%rbp)
mov    -0x4(%rbp),%ecx
mov    %ecx,%eax
lea    (%rax,%rax,2),%eax
lea    0xf(,%rax,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x50(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x30(%rbp)
mov    -0x4(%rbp),%ecx
mov    %ecx,%eax
lea    (%rax,%rax,2),%eax
lea    0xf(,%rax,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x48(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x38(%rbp)
mov    -0x4(%rbp),%edx
call   1040 <fn1@plt>
mov    -0x50(%rbp),%rsi
mov    -0x48(%rbp),%rdi
movslq -0x4(%rbp),%rax
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x4(%rbp),%edx
call   1040 <fn1@plt>
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1305 <fn4+0x1e5>
mov    -0x50(%rbp),%rax
mov    -0x58(%rbp),%rcx
mov    -0x68(%rbp),%rdx
mov    -0x60(%rbp),%rsi
mov    -0x70(%rbp),%rdi
movslq -0x3c(%rbp),%r8
mov    %r8d,%r9d
movsd  (%rdx,%r8,8),%xmm0
movsd  (%rcx,%r8,8),%xmm2
mov    -0x4(%rbp),%r8d
add    %r9d,%r8d
movslq %r8d,%r8
movsd  (%rax,%r8,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
shl    $0x3,%rdi
movq   %rdi,%xmm1
movaps 0xdb5(%rip),%xmm3
punpckldq %xmm3,%xmm1
movapd 0xdb9(%rip),%xmm2
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm4
unpckhpd %xmm1,%xmm1
addsd  %xmm4,%xmm1
addsd  %xmm1,%xmm0
shl    $0x3,%rsi
movq   %rsi,%xmm1
punpckldq %xmm3,%xmm1
subpd  %xmm2,%xmm1
movaps %xmm1,%xmm2
unpckhpd %xmm1,%xmm1
addsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
addsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x10(%rbp)
cvtsi2sdl -0x3c(%rbp),%xmm0
movsd  0xd4f(%rip),%xmm1
addsd  %xmm1,%xmm0
movslq -0x3c(%rbp),%rsi
movsd  %xmm0,(%rdx,%rsi,8)
cvtsi2sdl -0x3c(%rbp),%xmm1
movsd  0xd35(%rip),%xmm0
subsd  %xmm1,%xmm0
movslq -0x3c(%rbp),%rdx
movsd  %xmm0,(%rcx,%rdx,8)
cvtsi2sdl -0x3c(%rbp),%xmm1
movsd  0xd1b(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x4(%rbp),%ecx
add    -0x3c(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    1200 <fn4+0xe0>
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    13c6 <fn4+0x2a6>
mov    -0x68(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
cvtsi2sdl -0x3c(%rbp),%xmm1
movsd  0xcce(%rip),%xmm2
addsd  %xmm2,%xmm1
ucomisd %xmm1,%xmm0
jne    13ac <fn4+0x28c>
jp     13ac <fn4+0x28c>
mov    -0x58(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
cvtsi2sdl -0x3c(%rbp),%xmm2
movsd  0xca0(%rip),%xmm1
subsd  %xmm2,%xmm1
ucomisd %xmm1,%xmm0
jne    13ac <fn4+0x28c>
jp     13ac <fn4+0x28c>
mov    -0x50(%rbp),%rax
mov    -0x4(%rbp),%ecx
add    -0x3c(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
cvtsi2sdl -0x3c(%rbp),%xmm2
movsd  0xc6d(%rip),%xmm1
mulsd  %xmm2,%xmm1
ucomisd %xmm1,%xmm0
jne    13ac <fn4+0x28c>
jp     13ac <fn4+0x28c>
jmp    13b3 <fn4+0x293>
mov    $0x0,%al
call   1030 <abort@plt>
jmp    13b8 <fn4+0x298>
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    130c <fn4+0x1ec>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    %rax,%rsp
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<fn4>:
push   %rbp
mov    %rsp,%rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %edi,%r12d
lea    (%r12,%r12,2),%eax
mov    %rax,-0x30(%rbp)
lea    0xf(,%rax,8),%rax
and    $0xfffffffffffffff0,%rax
mov    %rsp,%r14
sub    %rax,%r14
mov    %r14,%rsp
mov    %rsp,%r15
sub    %rax,%r15
mov    %r15,%rsp
mov    %rsp,%rbx
sub    %rax,%rbx
mov    %rbx,%rsp
mov    %rsp,%r13
sub    %rax,%r13
mov    %r13,%rsp
mov    %r14,%rdi
mov    %r15,%rsi
mov    %r12d,%edx
call   1040 <fn1@plt>
mov    %r12,-0x38(%rbp)
movslq %r12d,%r12
lea    (%rbx,%r12,8),%rbx
mov    %r13,%rdi
mov    %rbx,%rsi
mov    %r12d,%edx
call   1040 <fn1@plt>
test   %r12d,%r12d
jle    126f <fn4+0x14f>
mov    -0x30(%rbp),%rax
shl    $0x3,%rax
cvtsi2sd %rax,%xmm2
mov    -0x38(%rbp),%rdx
mov    %edx,%eax
xorpd  %xmm0,%xmm0
xor    %ecx,%ecx
movsd  0xe43(%rip),%xmm1
nopl   (%rax)
movsd  (%r14,%rcx,8),%xmm3
mulsd  (%r15,%rcx,8),%xmm3
addsd  (%rbx,%rcx,8),%xmm3
addsd  %xmm2,%xmm3
subsd  %xmm2,%xmm3
addsd  %xmm3,%xmm0
xorps  %xmm3,%xmm3
cvtsi2sd %ecx,%xmm3
movapd %xmm3,%xmm4
addsd  %xmm1,%xmm4
movsd  %xmm4,(%r14,%rcx,8)
movapd %xmm1,%xmm4
subsd  %xmm3,%xmm4
movsd  %xmm4,(%r15,%rcx,8)
mulsd  %xmm1,%xmm3
movsd  %xmm3,(%rbx,%rcx,8)
add    $0x1,%rcx
cmp    %rcx,%rax
jne    11c0 <fn4+0xa0>
test   %edx,%edx
jle    1273 <fn4+0x153>
xor    %ecx,%ecx
nopl   0x0(%rax,%rax,1)
xorps  %xmm2,%xmm2
cvtsi2sd %ecx,%xmm2
movsd  (%r14,%rcx,8),%xmm3
movapd %xmm2,%xmm4
addsd  %xmm1,%xmm4
ucomisd %xmm4,%xmm3
jne    1282 <fn4+0x162>
jp     1282 <fn4+0x162>
movsd  (%r15,%rcx,8),%xmm3
movapd %xmm1,%xmm4
subsd  %xmm2,%xmm4
ucomisd %xmm4,%xmm3
jne    1282 <fn4+0x162>
jp     1282 <fn4+0x162>
movsd  (%rbx,%rcx,8),%xmm3
mulsd  %xmm1,%xmm2
ucomisd %xmm2,%xmm3
jne    1282 <fn4+0x162>
jp     1282 <fn4+0x162>
add    $0x1,%rcx
cmp    %rcx,%rax
jne    1220 <fn4+0x100>
jmp    1273 <fn4+0x153>
xorpd  %xmm0,%xmm0
lea    -0x28(%rbp),%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
xor    %eax,%eax
call   1030 <abort@plt>

LLVM IR (-O0):
define double @fn4(i32 %0) {
%2 = alloca i32
%3 = alloca double
%4 = alloca i8*
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
%8 = alloca i64
%9 = alloca i32
store i32 %0, i32* %2
store double 0.000000e+00, double* %3
%10 = load i32, i32* %2
%11 = mul nsw i32 3, %10
%12 = zext i32 %11 to i64
%13 = call i8* @llvm.stacksave()
store i8* %13, i8** %4
%14 = alloca double, i64 %12
store i64 %12, i64* %5
%15 = load i32, i32* %2
%16 = mul nsw i32 3, %15
%17 = zext i32 %16 to i64
%18 = alloca double, i64 %17
store i64 %17, i64* %6
%19 = load i32, i32* %2
%20 = mul nsw i32 3, %19
%21 = zext i32 %20 to i64
%22 = alloca double, i64 %21
store i64 %21, i64* %7
%23 = load i32, i32* %2
%24 = mul nsw i32 3, %23
%25 = zext i32 %24 to i64
%26 = alloca double, i64 %25
store i64 %25, i64* %8
%27 = load i32, i32* %2
%28 = call i32 @fn1(double* %14, double* %18, i32 %27)
%29 = load i32, i32* %2
%30 = sext i32 %29 to i64
%31 = getelementptr inbounds double, double* %22, i64 %30
%32 = load i32, i32* %2
%33 = call i32 @fn1(double* %26, double* %31, i32 %32)
store i32 0, i32* %9
br label %34
34: ; preds = %82, %1
%35 = load i32, i32* %9
%36 = load i32, i32* %2
%37 = icmp slt i32 %35, %36
br i1 %37, label %38, label %85
38: ; preds = %34
%39 = load i32, i32* %9
%40 = sext i32 %39 to i64
%41 = getelementptr inbounds double, double* %14, i64 %40
%42 = load double, double* %41
%43 = load i32, i32* %9
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double, double* %18, i64 %44
%46 = load double, double* %45
%47 = load i32, i32* %2
%48 = load i32, i32* %9
%49 = add nsw i32 %47, %48
%50 = sext i32 %49 to i64
%51 = getelementptr inbounds double, double* %22, i64 %50
%52 = load double, double* %51
%53 = call double @llvm.fmuladd.f64(double %42, double %46, double %52)
%54 = mul nuw i64 8, %12
%55 = uitofp i64 %54 to double
%56 = fadd double %53, %55
%57 = mul nuw i64 8, %17
%58 = uitofp i64 %57 to double
%59 = fsub double %56, %58
%60 = load double, double* %3
%61 = fadd double %60, %59
store double %61, double* %3
%62 = load i32, i32* %9
%63 = sitofp i32 %62 to double
%64 = fadd double %63, 5.000000e-01
%65 = load i32, i32* %9
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds double, double* %14, i64 %66
store double %64, double* %67
%68 = load i32, i32* %9
%69 = sitofp i32 %68 to double
%70 = fsub double 5.000000e-01, %69
%71 = load i32, i32* %9
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %18, i64 %72
store double %70, double* %73
%74 = load i32, i32* %9
%75 = sitofp i32 %74 to double
%76 = fmul double 5.000000e-01, %75
%77 = load i32, i32* %2
%78 = load i32, i32* %9
%79 = add nsw i32 %77, %78
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds double, double* %22, i64 %80
store double %76, double* %81
br label %82
82: ; preds = %38
%83 = load i32, i32* %9
%84 = add nsw i32 %83, 1
store i32 %84, i32* %9
br label %34
85: ; preds = %34
store i32 0, i32* %9
br label %86
86: ; preds = %122, %85
%87 = load i32, i32* %9
%88 = load i32, i32* %2
%89 = icmp slt i32 %87, %88
br i1 %89, label %90, label %125
90: ; preds = %86
%91 = load i32, i32* %9
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds double, double* %14, i64 %92
%94 = load double, double* %93
%95 = load i32, i32* %9
%96 = sitofp i32 %95 to double
%97 = fadd double %96, 5.000000e-01
%98 = fcmp une double %94, %97
br i1 %98, label %119, label %99
99: ; preds = %90
%100 = load i32, i32* %9
%101 = sext i32 %100 to i64
%102 = getelementptr inbounds double, double* %18, i64 %101
%103 = load double, double* %102
%104 = load i32, i32* %9
%105 = sitofp i32 %104 to double
%106 = fsub double 5.000000e-01, %105
%107 = fcmp une double %103, %106
br i1 %107, label %119, label %108
108: ; preds = %99
%109 = load i32, i32* %2
%110 = load i32, i32* %9
%111 = add nsw i32 %109, %110
%112 = sext i32 %111 to i64
%113 = getelementptr inbounds double, double* %22, i64 %112
%114 = load double, double* %113
%115 = load i32, i32* %9
%116 = sitofp i32 %115 to double
%117 = fmul double 5.000000e-01, %116
%118 = fcmp une double %114, %117
br i1 %118, label %119, label %121
119: ; preds = %108, %99, %90
%120 = call i32 (...) @abort()
unreachable
121: ; preds = %108
br label %122
122: ; preds = %121
%123 = load i32, i32* %9
%124 = add nsw i32 %123, 1
store i32 %124, i32* %9
br label %86
125: ; preds = %86
%126 = load double, double* %3
%127 = load i8*, i8** %4
ret double %126
}

LLVM IR (-O2):
define double @fn4(i32 %0) {
%2 = mul nsw i32 %0, 3
%3 = zext i32 %2 to i64
%4 = alloca double, i64 %3
%5 = alloca double, i64 %3
%6 = alloca double, i64 %3
%7 = alloca double, i64 %3
%8 = call i32 @fn1(double* %4, double* %5, i32 %0)
%9 = sext i32 %0 to i64
%10 = getelementptr inbounds double, double* %6, i64 %9
%11 = call i32 @fn1(double* %7, double* %10, i32 %0)
%12 = icmp sgt i32 %0, 0
br i1 %12, label %13, label %65
13: ; preds = %1
%14 = shl nuw nsw i64 %3, 3
%15 = uitofp i64 %14 to double
%16 = zext i32 %0 to i64
br label %20
17: ; preds = %20
br i1 %12, label %18, label %65
18: ; preds = %17
%19 = zext i32 %0 to i64
br label %43
20: ; preds = %13, %20
%21 = phi i64 [ 0, %13 ], [ %39, %20 ]
%22 = phi double [ 0.000000e+00, %13 ], [ %33, %20 ]
%23 = getelementptr inbounds double, double* %4, i64 %21
%24 = load double, double* %23
%25 = getelementptr inbounds double, double* %5, i64 %21
%26 = load double, double* %25
%27 = add nsw i64 %21, %9
%28 = getelementptr inbounds double, double* %6, i64 %27
%29 = load double, double* %28
%30 = call double @llvm.fmuladd.f64(double %24, double %26, double %29)
%31 = fadd double %30, %15
%32 = fsub double %31, %15
%33 = fadd double %22, %32
%34 = trunc i64 %21 to i32
%35 = sitofp i32 %34 to double
%36 = fadd double %35, 5.000000e-01
store double %36, double* %23
%37 = fsub double 5.000000e-01, %35
store double %37, double* %25
%38 = fmul double %35, 5.000000e-01
store double %38, double* %28
%39 = add nuw nsw i64 %21, 1
%40 = icmp eq i64 %39, %16
br i1 %40, label %17, label %20
41: ; preds = %56
%42 = icmp eq i64 %62, %19
br i1 %42, label %65, label %43
43: ; preds = %18, %41
%44 = phi i64 [ 0, %18 ], [ %62, %41 ]
%45 = getelementptr inbounds double, double* %4, i64 %44
%46 = load double, double* %45
%47 = trunc i64 %44 to i32
%48 = sitofp i32 %47 to double
%49 = fadd double %48, 5.000000e-01
%50 = fcmp une double %46, %49
br i1 %50, label %63, label %51
51: ; preds = %43
%52 = getelementptr inbounds double, double* %5, i64 %44
%53 = load double, double* %52
%54 = fsub double 5.000000e-01, %48
%55 = fcmp une double %53, %54
br i1 %55, label %63, label %56
56: ; preds = %51
%57 = add nsw i64 %44, %9
%58 = getelementptr inbounds double, double* %6, i64 %57
%59 = load double, double* %58
%60 = fmul double %48, 5.000000e-01
%61 = fcmp une double %59, %60
%62 = add nuw nsw i64 %44, 1
br i1 %61, label %63, label %41
63: ; preds = %56, %51, %43
%64 = call i32 (...) @abort()
unreachable
65: ; preds = %41, %1, %17
%66 = phi double [ %33, %17 ], [ 0.000000e+00, %1 ], [ %33, %41 ]
ret double %66
}