#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 four1(double data[], int nn, int isign) {
  int n, mmax, m, j, istep, i;
  double wtemp, wr, wpr, wpi, wi, theta;
  double tempr, tempi;
  n = nn << 1;
  j = 1;
  for (i = 1; i < n; i += 2) {
    if (j > i) {
      tempr = (data[j]);
      (data[j]) = (data[i]);
      (data[i]) = tempr;
      tempr = (data[j + 1]);
      (data[j + 1]) = (data[i + 1]);
      (data[i + 1]) = tempr;
    }
    m = n >> 1;
    while (m >= 2 && j > m) {
      j -= m;
      m >>= 1;
    }
    j += m;
  }
  mmax = 2;
  while (n > mmax) {
    istep = 2 * mmax;
    theta = 6.28318530717959 / (isign * mmax);
    wtemp = sin(0.5 * theta);
    wpr = -2.0 * wtemp * wtemp;
    wpi = sin(theta);
    wr = 1.0;
    wi = 0.0;
    for (m = 1; m < mmax; m += 2) {
      for (i = m; i <= n; i += istep) {
        j = i + mmax;
        tempr = wr * data[j] - wi * data[j + 1];
        tempi = wr * data[j + 1] + wi * data[j];
        data[j] = data[i] - tempr;
        data[j + 1] = data[i + 1] - tempi;
        data[i] += tempr;
        data[i + 1] += tempi;
      }
      wr = (wtemp = wr) * wpr - wi * wpi + wr;
      wi = wi * wpr + wtemp * wpi + wi;
    }
    mmax = istep;
  }
}


x86 assembly (clang, -O0):
<four1>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    -0xc(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x14(%rbp)
movl   $0x1,-0x20(%rbp)
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1245 <four1+0x135>
mov    -0x20(%rbp),%eax
cmp    -0x28(%rbp),%eax
jle    11e1 <four1+0xd1>
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x14(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x1c(%rbp)
xor    %eax,%eax
cmpl   $0x2,-0x1c(%rbp)
mov    %al,-0x69(%rbp)
jl     1205 <four1+0xf5>
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
setg   %al
mov    %al,-0x69(%rbp)
mov    -0x69(%rbp),%al
test   $0x1,%al
jne    1215 <four1+0x105>
jmp    122e <four1+0x11e>
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x20(%rbp)
mov    -0x1c(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    11ea <four1+0xda>
mov    -0x1c(%rbp),%eax
add    -0x20(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x28(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x28(%rbp)
jmp    1139 <four1+0x29>
movl   $0x2,-0x18(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x18(%rbp),%eax
jle    148a <four1+0x37a>
mov    -0x18(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0x24(%rbp)
mov    -0x10(%rbp),%eax
imul   -0x18(%rbp),%eax
cvtsi2sd %eax,%xmm1
movsd  0xda4(%rip),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xd8b(%rip),%xmm0
mulsd  -0x58(%rbp),%xmm0
call   1030 <sin@plt>
movsd  %xmm0,-0x30(%rbp)
movsd  0xd6c(%rip),%xmm0
mulsd  -0x30(%rbp),%xmm0
mulsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x58(%rbp),%xmm0
call   1030 <sin@plt>
movsd  %xmm0,-0x48(%rbp)
movsd  0xd3e(%rip),%xmm0
movsd  %xmm0,-0x38(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x50(%rbp)
movl   $0x1,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    147f <four1+0x36f>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     1409 <four1+0x2f9>
mov    -0x28(%rbp),%eax
add    -0x18(%rbp),%eax
mov    %eax,-0x20(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x50(%rbp),%xmm1
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x60(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x50(%rbp),%xmm1
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x68(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x68(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    -0x28(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    12e8 <four1+0x1d8>
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x40(%rbp),%xmm2
movsd  -0x50(%rbp),%xmm1
mulsd  -0x48(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x50(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm2
movsd  -0x30(%rbp),%xmm1
mulsd  -0x48(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
addsd  -0x50(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x1c(%rbp)
jmp    12d6 <four1+0x1c6>
mov    -0x24(%rbp),%eax
mov    %eax,-0x18(%rbp)
jmp    124c <four1+0x13c>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<four1>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %esi,%r15d
add    %esi,%r15d
cmp    $0x2,%r15d
jl     1333 <four1+0x223>
mov    %edx,%r14d
mov    %rdi,%rbx
mov    %r15d,%ebp
mov    $0x1,%ecx
mov    $0x1,%eax
jmp    115d <four1+0x4d>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    %esi,%edx
add    $0x2,%rax
mov    %edx,%ecx
cmp    %rbp,%rax
jae    11b3 <four1+0xa3>
movslq %ecx,%rdx
cmp    %rdx,%rax
jge    1191 <four1+0x81>
movsd  (%rbx,%rdx,8),%xmm0
movsd  (%rbx,%rax,8),%xmm1
movsd  %xmm1,(%rbx,%rdx,8)
movsd  %xmm0,(%rbx,%rax,8)
movsd  0x8(%rbx,%rdx,8),%xmm0
movsd  0x8(%rbx,%rax,8),%xmm1
movsd  %xmm1,0x8(%rbx,%rdx,8)
movsd  %xmm0,0x8(%rbx,%rax,8)
mov    %r15d,%edx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %edx,%edi
mov    %ecx,%esi
sar    %edx
cmp    $0x4,%edi
jl     1150 <four1+0x40>
mov    %esi,%ecx
sub    %edx,%ecx
jg     11a0 <four1+0x90>
jmp    1150 <four1+0x40>
cmp    $0x3,%r15d
jl     1333 <four1+0x223>
mov    $0x2,%r12d
xorpd  %xmm0,%xmm0
movhpd 0xe49(%rip),%xmm0
movapd %xmm0,0x10(%rsp)
jmp    11e9 <four1+0xd9>
nopw   0x0(%rax,%rax,1)
cmp    %r12d,%r15d
jle    1333 <four1+0x223>
mov    %r12d,%r13d
lea    0x0(%r13,%r13,1),%r12d
mov    %r13d,%eax
imul   %r14d,%eax
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
movsd  0xdf9(%rip),%xmm1
divsd  %xmm0,%xmm1
movsd  %xmm1,0x8(%rsp)
movapd %xmm1,%xmm0
mulsd  0xdeb(%rip),%xmm0
call   1030 <sin@plt>
movsd  %xmm0,(%rsp)
movsd  0x8(%rsp),%xmm0
call   1030 <sin@plt>
movapd 0xde5(%rip),%xmm10
cmp    $0x2,%r13d
jl     11e0 <four1+0xd0>
movsd  (%rsp),%xmm1
movapd %xmm1,%xmm8
mulsd  0xdbc(%rip),%xmm8
mulsd  %xmm1,%xmm8
movslq %r12d,%rax
mov    %r13d,%ecx
unpcklpd %xmm8,%xmm8
unpcklpd %xmm0,%xmm0
lea    (%rbx,%rcx,8),%rcx
mov    $0x1,%edx
movapd 0x10(%rsp),%xmm2
jmp    12ac <four1+0x19c>
nopl   0x0(%rax)
movapd %xmm2,%xmm1
shufpd $0x1,%xmm9,%xmm1
mulpd  %xmm0,%xmm1
movapd %xmm2,%xmm3
mulpd  %xmm8,%xmm3
addpd  %xmm1,%xmm3
addpd  %xmm3,%xmm2
add    $0x2,%rdx
cmp    %edx,%r13d
jle    11e0 <four1+0xd0>
movapd %xmm2,%xmm9
xorpd  %xmm10,%xmm9
cmp    %edx,%r15d
jl     1280 <four1+0x170>
movapd %xmm2,%xmm4
unpcklpd %xmm9,%xmm4
movapd %xmm2,%xmm5
unpckhpd %xmm2,%xmm5
mov    %rdx,%rsi
nop
movupd (%rcx,%rsi,8),%xmm6
movapd %xmm6,%xmm7
mulpd  %xmm4,%xmm7
shufpd $0x1,%xmm7,%xmm7
mulpd  %xmm5,%xmm6
addpd  %xmm7,%xmm6
movsd  (%rbx,%rsi,8),%xmm7
subsd  %xmm6,%xmm7
movsd  %xmm7,(%rcx,%rsi,8)
movsd  0x8(%rbx,%rsi,8),%xmm3
movapd %xmm6,%xmm1
unpckhpd %xmm6,%xmm1
movapd %xmm3,%xmm7
subsd  %xmm1,%xmm7
movsd  %xmm7,0x8(%rcx,%rsi,8)
movsd  (%rbx,%rsi,8),%xmm1
unpcklpd %xmm3,%xmm1
addpd  %xmm6,%xmm1
movupd %xmm1,(%rbx,%rsi,8)
add    %rax,%rsi
cmp    %rbp,%rsi
jle    12d0 <four1+0x1c0>
jmp    1280 <four1+0x170>
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @four1(double* %0, i32 %1, i32 %2) {
%4 = alloca double*
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca double
%14 = alloca double
%15 = alloca double
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
%20 = alloca double
store double* %0, double** %4
store i32 %1, i32* %5
store i32 %2, i32* %6
%21 = load i32, i32* %5
%22 = shl i32 %21, 1
store i32 %22, i32* %7
store i32 1, i32* %10
store i32 1, i32* %12
br label %23
23: ; preds = %96, %3
%24 = load i32, i32* %12
%25 = load i32, i32* %7
%26 = icmp slt i32 %24, %25
br i1 %26, label %27, label %99
27: ; preds = %23
%28 = load i32, i32* %10
%29 = load i32, i32* %12
%30 = icmp sgt i32 %28, %29
br i1 %30, label %31, label %74
31: ; preds = %27
%32 = load double*, double** %4
%33 = load i32, i32* %10
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds double, double* %32, i64 %34
%36 = load double, double* %35
store double %36, double* %19
%37 = load double*, double** %4
%38 = load i32, i32* %12
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds double, double* %37, i64 %39
%41 = load double, double* %40
%42 = load double*, double** %4
%43 = load i32, i32* %10
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds double, double* %42, i64 %44
store double %41, double* %45
%46 = load double, double* %19
%47 = load double*, double** %4
%48 = load i32, i32* %12
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds double, double* %47, i64 %49
store double %46, double* %50
%51 = load double*, double** %4
%52 = load i32, i32* %10
%53 = add nsw i32 %52, 1
%54 = sext i32 %53 to i64
%55 = getelementptr inbounds double, double* %51, i64 %54
%56 = load double, double* %55
store double %56, double* %19
%57 = load double*, double** %4
%58 = load i32, i32* %12
%59 = add nsw i32 %58, 1
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds double, double* %57, i64 %60
%62 = load double, double* %61
%63 = load double*, double** %4
%64 = load i32, i32* %10
%65 = add nsw i32 %64, 1
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds double, double* %63, i64 %66
store double %62, double* %67
%68 = load double, double* %19
%69 = load double*, double** %4
%70 = load i32, i32* %12
%71 = add nsw i32 %70, 1
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %69, i64 %72
store double %68, double* %73
br label %74
74: ; preds = %31, %27
%75 = load i32, i32* %7
%76 = ashr i32 %75, 1
store i32 %76, i32* %9
br label %77
77: ; preds = %86, %74
%78 = load i32, i32* %9
%79 = icmp sge i32 %78, 2
br i1 %79, label %80, label %84
80: ; preds = %77
%81 = load i32, i32* %10
%82 = load i32, i32* %9
%83 = icmp sgt i32 %81, %82
br label %84
84: ; preds = %80, %77
%85 = phi i1 [ false, %77 ], [ %83, %80 ]
br i1 %85, label %86, label %92
86: ; preds = %84
%87 = load i32, i32* %9
%88 = load i32, i32* %10
%89 = sub nsw i32 %88, %87
store i32 %89, i32* %10
%90 = load i32, i32* %9
%91 = ashr i32 %90, 1
store i32 %91, i32* %9
br label %77
92: ; preds = %84
%93 = load i32, i32* %9
%94 = load i32, i32* %10
%95 = add nsw i32 %94, %93
store i32 %95, i32* %10
br label %96
96: ; preds = %92
%97 = load i32, i32* %12
%98 = add nsw i32 %97, 2
store i32 %98, i32* %12
br label %23
99: ; preds = %23
store i32 2, i32* %8
br label %100
100: ; preds = %230, %99
%101 = load i32, i32* %7
%102 = load i32, i32* %8
%103 = icmp sgt i32 %101, %102
br i1 %103, label %104, label %232
104: ; preds = %100
%105 = load i32, i32* %8
%106 = mul nsw i32 2, %105
store i32 %106, i32* %11
%107 = load i32, i32* %6
%108 = load i32, i32* %8
%109 = mul nsw i32 %107, %108
%110 = sitofp i32 %109 to double
%111 = fdiv double 0x401921FB54442D1C, %110
store double %111, double* %18
%112 = load double, double* %18
%113 = fmul double 5.000000e-01, %112
%114 = call double @sin(double %113)
store double %114, double* %13
%115 = load double, double* %13
%116 = fmul double -2.000000e+00, %115
%117 = load double, double* %13
%118 = fmul double %116, %117
store double %118, double* %15
%119 = load double, double* %18
%120 = call double @sin(double %119)
store double %120, double* %16
store double 1.000000e+00, double* %14
store double 0.000000e+00, double* %17
store i32 1, i32* %9
br label %121
121: ; preds = %227, %104
%122 = load i32, i32* %9
%123 = load i32, i32* %8
%124 = icmp slt i32 %122, %123
br i1 %124, label %125, label %230
125: ; preds = %121
%126 = load i32, i32* %9
store i32 %126, i32* %12
br label %127
127: ; preds = %205, %125
%128 = load i32, i32* %12
%129 = load i32, i32* %7
%130 = icmp sle i32 %128, %129
br i1 %130, label %131, label %209
131: ; preds = %127
%132 = load i32, i32* %12
%133 = load i32, i32* %8
%134 = add nsw i32 %132, %133
store i32 %134, i32* %10
%135 = load double, double* %14
%136 = load double*, double** %4
%137 = load i32, i32* %10
%138 = sext i32 %137 to i64
%139 = getelementptr inbounds double, double* %136, i64 %138
%140 = load double, double* %139
%141 = load double, double* %17
%142 = load double*, double** %4
%143 = load i32, i32* %10
%144 = add nsw i32 %143, 1
%145 = sext i32 %144 to i64
%146 = getelementptr inbounds double, double* %142, i64 %145
%147 = load double, double* %146
%148 = fmul double %141, %147
%149 = fneg double %148
%150 = call double @llvm.fmuladd.f64(double %135, double %140, double %149)
store double %150, double* %19
%151 = load double, double* %14
%152 = load double*, double** %4
%153 = load i32, i32* %10
%154 = add nsw i32 %153, 1
%155 = sext i32 %154 to i64
%156 = getelementptr inbounds double, double* %152, i64 %155
%157 = load double, double* %156
%158 = load double, double* %17
%159 = load double*, double** %4
%160 = load i32, i32* %10
%161 = sext i32 %160 to i64
%162 = getelementptr inbounds double, double* %159, i64 %161
%163 = load double, double* %162
%164 = fmul double %158, %163
%165 = call double @llvm.fmuladd.f64(double %151, double %157, double %164)
store double %165, double* %20
%166 = load double*, double** %4
%167 = load i32, i32* %12
%168 = sext i32 %167 to i64
%169 = getelementptr inbounds double, double* %166, i64 %168
%170 = load double, double* %169
%171 = load double, double* %19
%172 = fsub double %170, %171
%173 = load double*, double** %4
%174 = load i32, i32* %10
%175 = sext i32 %174 to i64
%176 = getelementptr inbounds double, double* %173, i64 %175
store double %172, double* %176
%177 = load double*, double** %4
%178 = load i32, i32* %12
%179 = add nsw i32 %178, 1
%180 = sext i32 %179 to i64
%181 = getelementptr inbounds double, double* %177, i64 %180
%182 = load double, double* %181
%183 = load double, double* %20
%184 = fsub double %182, %183
%185 = load double*, double** %4
%186 = load i32, i32* %10
%187 = add nsw i32 %186, 1
%188 = sext i32 %187 to i64
%189 = getelementptr inbounds double, double* %185, i64 %188
store double %184, double* %189
%190 = load double, double* %19
%191 = load double*, double** %4
%192 = load i32, i32* %12
%193 = sext i32 %192 to i64
%194 = getelementptr inbounds double, double* %191, i64 %193
%195 = load double, double* %194
%196 = fadd double %195, %190
store double %196, double* %194
%197 = load double, double* %20
%198 = load double*, double** %4
%199 = load i32, i32* %12
%200 = add nsw i32 %199, 1
%201 = sext i32 %200 to i64
%202 = getelementptr inbounds double, double* %198, i64 %201
%203 = load double, double* %202
%204 = fadd double %203, %197
store double %204, double* %202
br label %205
205: ; preds = %131
%206 = load i32, i32* %11
%207 = load i32, i32* %12
%208 = add nsw i32 %207, %206
store i32 %208, i32* %12
br label %127
209: ; preds = %127
%210 = load double, double* %14
store double %210, double* %13
%211 = load double, double* %15
%212 = load double, double* %17
%213 = load double, double* %16
%214 = fmul double %212, %213
%215 = fneg double %214
%216 = call double @llvm.fmuladd.f64(double %210, double %211, double %215)
%217 = load double, double* %14
%218 = fadd double %216, %217
store double %218, double* %14
%219 = load double, double* %17
%220 = load double, double* %15
%221 = load double, double* %13
%222 = load double, double* %16
%223 = fmul double %221, %222
%224 = call double @llvm.fmuladd.f64(double %219, double %220, double %223)
%225 = load double, double* %17
%226 = fadd double %224, %225
store double %226, double* %17
br label %227
227: ; preds = %209
%228 = load i32, i32* %9
%229 = add nsw i32 %228, 2
store i32 %229, i32* %9
br label %121
230: ; preds = %121
%231 = load i32, i32* %11
store i32 %231, i32* %8
br label %100
232: ; preds = %100
ret void
}

LLVM IR (-O2):
define void @four1(double* nocapture %0, i32 %1, i32 %2) {
%4 = shl i32 %1, 1
%5 = icmp sgt i32 %4, 1
br i1 %5, label %6, label %110
6: ; preds = %3
%7 = zext i32 %4 to i64
br label %12
8: ; preds = %38
%9 = icmp sgt i32 %4, 2
br i1 %9, label %10, label %110
10: ; preds = %8
%11 = zext i32 %4 to i64
br label %44
12: ; preds = %6, %38
%13 = phi i64 [ 1, %6 ], [ %40, %38 ]
%14 = phi i32 [ 1, %6 ], [ %39, %38 ]
%15 = sext i32 %14 to i64
%16 = icmp slt i64 %13, %15
br i1 %16, label %17, label %29
17: ; preds = %12
%18 = getelementptr inbounds double, double* %0, i64 %15
%19 = load double, double* %18
%20 = getelementptr inbounds double, double* %0, i64 %13
%21 = load double, double* %20
store double %21, double* %18
store double %19, double* %20
%22 = add nsw i32 %14, 1
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds double, double* %0, i64 %23
%25 = load double, double* %24
%26 = add nuw nsw i64 %13, 1
%27 = getelementptr inbounds double, double* %0, i64 %26
%28 = load double, double* %27
store double %28, double* %24
store double %25, double* %27
br label %29
29: ; preds = %17, %12
br label %30
30: ; preds = %29, %30
%31 = phi i32 [ %37, %30 ], [ %14, %29 ]
%32 = phi i32 [ %33, %30 ], [ %4, %29 ]
%33 = ashr i32 %32, 1
%34 = icmp sgt i32 %32, 3
%35 = icmp sgt i32 %31, %33
%36 = select i1 %34, i1 %35, i1 false
%37 = sub nsw i32 %31, %33
br i1 %36, label %30, label %38
38: ; preds = %30
%39 = add nsw i32 %33, %31
%40 = add nuw nsw i64 %13, 2
%41 = icmp ult i64 %40, %7
br i1 %41, label %12, label %8
42: ; preds = %100, %44
%43 = icmp sgt i32 %4, %46
br i1 %43, label %44, label %110
44: ; preds = %10, %42
%45 = phi i32 [ %46, %42 ], [ 2, %10 ]
%46 = shl i32 %45, 1
%47 = mul nsw i32 %45, %2
%48 = sitofp i32 %47 to double
%49 = fdiv double 0x401921FB54442D1C, %48
%50 = fmul double %49, 5.000000e-01
%51 = tail call double @sin(double %50)
%52 = tail call double @sin(double %49)
%53 = icmp sgt i32 %45, 1
br i1 %53, label %54, label %42
54: ; preds = %44
%55 = fmul double %51, -2.000000e+00
%56 = fmul double %51, %55
%57 = sext i32 %46 to i64
%58 = zext i32 %45 to i64
%59 = insertelement <2 x double> poison, double %56, i64 0
%60 = shufflevector <2 x double> %59, <2 x double> poison, <2 x i32> zeroinitializer
%61 = insertelement <2 x double> poison, double %52, i64 0
%62 = shufflevector <2 x double> %61, <2 x double> poison, <2 x i32> zeroinitializer
br label %63
63: ; preds = %54, %100
%64 = phi i64 [ 1, %54 ], [ %107, %100 ]
%65 = phi <2 x double> [ <double 0.000000e+00, double 1.000000e+00>, %54 ], [ %106, %100 ]
%66 = trunc i64 %64 to i32
%67 = icmp slt i32 %4, %66
%68 = extractelement <2 x double> %65, i64 0
%69 = fneg double %68
br i1 %67, label %100, label %70
70: ; preds = %63
%71 = insertelement <2 x double> %65, double %69, i64 1
%72 = shufflevector <2 x double> %65, <2 x double> undef, <2 x i32> <i32 1, i32 1>
br label %73
73: ; preds = %70, %73
%74 = phi i64 [ %98, %73 ], [ %64, %70 ]
%75 = add nsw i64 %74, %58
%76 = getelementptr inbounds double, double* %0, i64 %75
%77 = add nsw i64 %75, 1
%78 = getelementptr inbounds double, double* %0, i64 %77
%79 = bitcast double* %76 to <2 x double>*
%80 = load <2 x double>, <2 x double>* %79
%81 = fmul <2 x double> %80, %71
%82 = shufflevector <2 x double> %81, <2 x double> poison, <2 x i32> <i32 1, i32 0>
%83 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %72, <2 x double> %80, <2 x double> %82)
%84 = getelementptr inbounds double, double* %0, i64 %74
%85 = load double, double* %84
%86 = extractelement <2 x double> %83, i64 0
%87 = fsub double %85, %86
store double %87, double* %76
%88 = add nsw i64 %74, 1
%89 = getelementptr inbounds double, double* %0, i64 %88
%90 = load double, double* %89
%91 = extractelement <2 x double> %83, i64 1
%92 = fsub double %90, %91
store double %92, double* %78
%93 = load double, double* %84
%94 = insertelement <2 x double> poison, double %93, i64 0
%95 = insertelement <2 x double> %94, double %90, i64 1
%96 = fadd <2 x double> %83, %95
%97 = bitcast double* %84 to <2 x double>*
store <2 x double> %96, <2 x double>* %97
%98 = add i64 %74, %57
%99 = icmp sgt i64 %98, %11
br i1 %99, label %100, label %73
100: ; preds = %73, %63
%101 = extractelement <2 x double> %65, i64 1
%102 = insertelement <2 x double> poison, double %101, i64 0
%103 = insertelement <2 x double> %102, double %69, i64 1
%104 = fmul <2 x double> %62, %103
%105 = call <2 x double> @llvm.fmuladd.v2f64(<2 x double> %65, <2 x double> %60, <2 x double> %104)
%106 = fadd <2 x double> %65, %105
%107 = add nuw nsw i64 %64, 2
%108 = trunc i64 %107 to i32
%109 = icmp sgt i32 %45, %108
br i1 %109, label %63, label %42
110: ; preds = %42, %3, %8
ret void
}