#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 */

/* Variables and functions */
double sin(double);
void genP(int L, double fc, double df, double *P) {
  int ii, jj;
  int Lh = L >> 1;
  double theta_s = 3.14159265358979323846 * (fc + df);
  double d = 2.0 * (3.14159265358979323846 - theta_s);
  const double delta_s = 1e-14;
  for (ii = 0; ii < Lh; ii++) {
    P[ii * Lh + ii] = d -
                      2.0 * sin(theta_s * (double)(2 * (ii + 1) - L - 1)) /
                          (double)(2 * (ii + 1) - L - 1) +
                      delta_s;
    for (jj = ii + 1; jj < Lh; jj++) {
      double idx1 = (ii + 1) - (jj + 1);
      double idx2 = (ii + 1) + (jj + 1);
      P[ii * Lh + jj] = -2.0 * (sin(theta_s * idx1) / idx1 +
                                sin(theta_s * (double)(idx2 - L - 1)) /
                                    (double)(idx2 - L - 1));
      P[jj * Lh + ii] = P[ii * Lh + jj];
    }
  }
}


x86 assembly (clang, -O0):
<genP>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %edi,-0x4(%rbp)
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
mov    %rsi,-0x20(%rbp)
mov    -0x4(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x2c(%rbp)
movsd  -0x10(%rbp),%xmm1
addsd  -0x18(%rbp),%xmm1
movsd  0xecc(%rip),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xebb(%rip),%xmm1
subsd  -0x38(%rbp),%xmm1
movsd  0xea6(%rip),%xmm0
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xe8d(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    1321 <genP+0x211>
movsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x24(%rbp),%eax
add    $0x1,%eax
shl    $0x1,%eax
sub    -0x4(%rbp),%eax
sub    $0x1,%eax
cvtsi2sd %eax,%xmm1
mulsd  %xmm1,%xmm0
call   1030 <sin@plt>
movaps %xmm0,%xmm2
movsd  -0x60(%rbp),%xmm0
movsd  0xe42(%rip),%xmm1
mulsd  %xmm2,%xmm1
mov    -0x24(%rbp),%eax
add    $0x1,%eax
shl    $0x1,%eax
sub    -0x4(%rbp),%eax
sub    $0x1,%eax
cvtsi2sd %eax,%xmm2
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
movsd  0xe13(%rip),%xmm1
addsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x2c(%rbp),%ecx
add    -0x24(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    130e <genP+0x1fe>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
sub    %ecx,%eax
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
add    %ecx,%eax
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x38(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
call   1030 <sin@plt>
divsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  -0x58(%rbp),%xmm1
cvtsi2sdl -0x4(%rbp),%xmm2
subsd  %xmm2,%xmm1
movsd  0xda2(%rip),%xmm2
subsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
call   1030 <sin@plt>
movsd  -0x68(%rbp),%xmm1
movsd  -0x58(%rbp),%xmm2
cvtsi2sdl -0x4(%rbp),%xmm3
subsd  %xmm3,%xmm2
movsd  0xd7a(%rip),%xmm3
subsd  %xmm3,%xmm2
divsd  %xmm2,%xmm0
addsd  %xmm0,%xmm1
movsd  0xd5e(%rip),%xmm0
mulsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
imul   -0x2c(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x2c(%rbp),%ecx
add    -0x24(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1210 <genP+0x100>
jmp    1313 <genP+0x203>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    117f <genP+0x6f>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<genP>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x78,%rsp
mov    %rsi,0x28(%rsp)
cmp    $0x2,%edi
jl     1333 <genP+0x223>
mov    %rdi,%rax
mov    %rdi,%rcx
sar    %eax
addsd  %xmm1,%xmm0
movsd  0xec0(%rip),%xmm1
mulsd  %xmm1,%xmm0
subsd  %xmm0,%xmm1
addsd  %xmm1,%xmm1
movsd  %xmm1,0x60(%rsp)
xorps  %xmm1,%xmm1
cvtsi2sd %ecx,%xmm1
movsd  %xmm1,0x40(%rsp)
movslq %eax,%rdx
cmp    $0x2,%edx
mov    $0x1,%eax
cmovge %edx,%eax
mov    %rax,0x50(%rsp)
not    %ecx
mov    %rcx,0x68(%rsp)
mov    %edx,%ebx
mov    0x28(%rsp),%rax
lea    (%rax,%rdx,8),%rcx
mov    %rcx,0x38(%rsp)
lea    0x0(,%rdx,8),%r14
mov    %rdx,0x58(%rsp)
lea    0x8(,%rdx,8),%rcx
mov    %rcx,0x48(%rsp)
add    $0x8,%rax
mov    %rax,0x30(%rsp)
neg    %rbx
movl   $0x3,0x14(%rsp)
xor    %ebp,%ebp
movsd  %xmm0,0x20(%rsp)
jmp    11fe <genP+0xee>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    0x48(%rsp),%rax
add    %rax,0x38(%rsp)
add    %rax,0x30(%rsp)
add    $0x1,%rbx
addl   $0x2,0x14(%rsp)
mov    0x70(%rsp),%rbp
cmp    0x50(%rsp),%rbp
movsd  0x20(%rsp),%xmm0
je     1333 <genP+0x223>
mov    %rbp,%r15
add    $0x1,%rbp
mov    0x68(%rsp),%rax
lea    (%rax,%rbp,2),%eax
xorps  %xmm1,%xmm1
cvtsi2sd %eax,%xmm1
movsd  %xmm1,0x8(%rsp)
mulsd  %xmm1,%xmm0
call   1030 <sin@plt>
addsd  %xmm0,%xmm0
divsd  0x8(%rsp),%xmm0
movsd  0x60(%rsp),%xmm1
subsd  %xmm0,%xmm1
addsd  0xdc9(%rip),%xmm1
mov    0x58(%rsp),%rdx
mov    %edx,%eax
imul   %r15d,%eax
cltq
add    %r15,%rax
mov    0x28(%rsp),%rcx
movsd  %xmm1,(%rcx,%rax,8)
mov    %rbp,0x70(%rsp)
cmp    %rdx,%rbp
movsd  0x40(%rsp),%xmm1
jge    11d0 <genP+0xc0>
mov    $0xffffffffffffffff,%r13
mov    0x14(%rsp),%r12d
mov    0x30(%rsp),%r15
mov    0x38(%rsp),%rbp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
xorps  %xmm2,%xmm2
cvtsi2sd %r13d,%xmm2
movsd  %xmm2,0x18(%rsp)
xorps  %xmm0,%xmm0
cvtsi2sd %r12d,%xmm0
subsd  %xmm1,%xmm0
movsd  %xmm0,0x8(%rsp)
movsd  0x20(%rsp),%xmm0
mulsd  %xmm2,%xmm0
call   1030 <sin@plt>
divsd  0x18(%rsp),%xmm0
movsd  %xmm0,0x18(%rsp)
movsd  0x8(%rsp),%xmm1
addsd  0xd37(%rip),%xmm1
movsd  %xmm1,0x8(%rsp)
movsd  0x20(%rsp),%xmm0
mulsd  %xmm1,%xmm0
call   1030 <sin@plt>
movsd  0xd22(%rip),%xmm2
movsd  0x40(%rsp),%xmm1
divsd  0x8(%rsp),%xmm0
addsd  0x18(%rsp),%xmm0
mulsd  %xmm2,%xmm0
movsd  %xmm0,(%r15)
movsd  %xmm0,0x0(%rbp)
add    %r14,%rbp
add    $0x8,%r15
add    $0xffffffffffffffff,%r13
add    $0x1,%r12d
cmp    %r13,%rbx
jne    1290 <genP+0x180>
jmp    11d0 <genP+0xc0>
add    $0x78,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @genP(i32 %0, double %1, double %2, double* nocapture writeonly %3) {
%5 = ashr i32 %0, 1
%6 = fadd double %1, %2
%7 = fmul double %6, 0x400921FB54442D18
%8 = fsub double 0x400921FB54442D18, %7
%9 = fmul double %8, 2.000000e+00
%10 = icmp sgt i32 %0, 1
br i1 %10, label %11, label %67
11: ; preds = %4
%12 = xor i32 %0, -1
%13 = sitofp i32 %0 to double
%14 = sext i32 %5 to i64
%15 = call i32 @llvm.smax.i32(i32 %5, i32 1)
%16 = zext i32 %15 to i64
%17 = zext i32 %5 to i64
br label %21
18: ; preds = %42, %21
%19 = add nuw nsw i64 %23, 1
%20 = icmp eq i64 %25, %16
br i1 %20, label %67, label %21
21: ; preds = %11, %18
%22 = phi i64 [ 0, %11 ], [ %25, %18 ]
%23 = phi i64 [ 1, %11 ], [ %19, %18 ]
%24 = trunc i64 %22 to i32
%25 = add nuw nsw i64 %22, 1
%26 = trunc i64 %25 to i32
%27 = shl i32 %26, 1
%28 = add i32 %27, %12
%29 = sitofp i32 %28 to double
%30 = fmul double %7, %29
%31 = tail call double @sin(double %30)
%32 = fmul double %31, 2.000000e+00
%33 = fdiv double %32, %29
%34 = fsub double %9, %33
%35 = fadd double %34, 0x3D06849B86A12B9B
%36 = mul nsw i64 %22, %14
%37 = mul nsw i32 %5, %24
%38 = sext i32 %37 to i64
%39 = add nsw i64 %22, %38
%40 = getelementptr inbounds double, double* %3, i64 %39
store double %35, double* %40
%41 = icmp slt i64 %25, %14
br i1 %41, label %42, label %18
42: ; preds = %21, %42
%43 = phi i64 [ %44, %42 ], [ %23, %21 ]
%44 = add nuw nsw i64 %43, 1
%45 = sub nsw i64 %25, %44
%46 = trunc i64 %45 to i32
%47 = sitofp i32 %46 to double
%48 = add nuw nsw i64 %44, %25
%49 = trunc i64 %48 to i32
%50 = sitofp i32 %49 to double
%51 = fmul double %7, %47
%52 = tail call double @sin(double %51)
%53 = fdiv double %52, %47
%54 = fsub double %50, %13
%55 = fadd double %54, -1.000000e+00
%56 = fmul double %7, %55
%57 = tail call double @sin(double %56)
%58 = fdiv double %57, %55
%59 = fadd double %53, %58
%60 = fmul double %59, -2.000000e+00
%61 = add nsw i64 %43, %36
%62 = getelementptr inbounds double, double* %3, i64 %61
store double %60, double* %62
%63 = mul nsw i64 %43, %14
%64 = add nsw i64 %63, %22
%65 = getelementptr inbounds double, double* %3, i64 %64
store double %60, double* %65
%66 = icmp eq i64 %44, %17
br i1 %66, label %18, label %42
67: ; preds = %18, %4
ret void
}