void four1(data, nn, isign) double data[];
unsigned int nn;
int isign;
{
  unsigned 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 = mmax << 1;
    theta = isign * (6.28318530717959 / 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
jae    123d <four1+0x12d>
mov    -0x20(%rbp),%eax
cmp    -0x28(%rbp),%eax
jbe    11d9 <four1+0xc9>
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x60(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x14(%rbp),%eax
shr    $0x1,%eax
mov    %eax,-0x1c(%rbp)
xor    %eax,%eax
cmpl   $0x2,-0x1c(%rbp)
mov    %al,-0x69(%rbp)
jb     11fd <four1+0xed>
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
seta   %al
mov    %al,-0x69(%rbp)
mov    -0x69(%rbp),%al
test   $0x1,%al
jne    120d <four1+0xfd>
jmp    1226 <four1+0x116>
mov    -0x1c(%rbp),%ecx
mov    -0x20(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x20(%rbp)
mov    -0x1c(%rbp),%eax
shr    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    11e2 <four1+0xd2>
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
jbe    147d <four1+0x36d>
mov    -0x18(%rbp),%eax
add    %eax,%eax
mov    %eax,-0x24(%rbp)
cvtsi2sdl -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%eax
cvtsi2sd %rax,%xmm2
movsd  0xdab(%rip),%xmm1
divsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xd8e(%rip),%xmm0
mulsd  -0x58(%rbp),%xmm0
call   1030 <sin@plt>
movsd  %xmm0,-0x30(%rbp)
movsd  0xd6f(%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  0xd41(%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
jae    1472 <four1+0x362>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
ja     13fc <four1+0x2ec>
mov    -0x28(%rbp),%eax
add    -0x18(%rbp),%eax
mov    %eax,-0x20(%rbp)
movsd  -0x38(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x50(%rbp),%xmm1
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
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
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x50(%rbp),%xmm1
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
mulsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x68(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x68(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x60(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
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
mov    %ecx,%ecx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    -0x28(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    12e5 <four1+0x1d5>
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    12d3 <four1+0x1c3>
mov    -0x24(%rbp),%eax
mov    %eax,-0x18(%rbp)
jmp    1244 <four1+0x134>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<four1>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0x48,%rsp
mov    %esi,%r14d
add    %esi,%r14d
je     1348 <four1+0x238>
mov    %rdi,%rbx
and    $0x7fffffff,%esi
mov    %r14d,%r8d
mov    $0x1,%ecx
mov    $0x1,%edi
jmp    114b <four1+0x3b>
xchg   %ax,%ax
add    %ebp,%ecx
add    $0x2,%rdi
cmp    %r8,%rdi
jae    11a1 <four1+0x91>
mov    %ecx,%ebp
cmp    %rbp,%rdi
jae    117f <four1+0x6f>
movsd  (%rbx,%rbp,8),%xmm0
movsd  (%rbx,%rdi,8),%xmm1
movsd  %xmm1,(%rbx,%rbp,8)
movsd  %xmm0,(%rbx,%rdi,8)
lea    0x1(%rcx),%ebp
movsd  (%rbx,%rbp,8),%xmm0
movsd  0x8(%rbx,%rdi,8),%xmm1
movsd  %xmm1,(%rbx,%rbp,8)
movsd  %xmm0,0x8(%rbx,%rdi,8)
mov    %esi,%ebp
cmp    $0x2,%esi
jb     1140 <four1+0x30>
cmp    %esi,%ecx
jbe    1140 <four1+0x30>
nopw   0x0(%rax,%rax,1)
mov    %ebp,%eax
sub    %ebp,%ecx
shr    %ebp
cmp    $0x4,%eax
jb     1140 <four1+0x30>
cmp    %ebp,%ecx
ja     1190 <four1+0x80>
jmp    1140 <four1+0x30>
cmp    $0x3,%r14d
jb     1348 <four1+0x238>
xorps  %xmm0,%xmm0
cvtsi2sd %edx,%xmm0
movsd  %xmm0,0x8(%rsp)
mov    $0x2,%r15d
xorpd  %xmm0,%xmm0
movhpd 0xe4e(%rip),%xmm0
movapd %xmm0,0x20(%rsp)
jmp    11e9 <four1+0xd9>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
cmp    %r15d,%r14d
jbe    1348 <four1+0x238>
mov    %r15d,%ebp
mov    %r15d,%eax
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
lea    0x0(%rbp,%rbp,1),%r15d
movsd  0xdfc(%rip),%xmm1
divsd  %xmm0,%xmm1
mulsd  0x8(%rsp),%xmm1
movsd  %xmm1,0x18(%rsp)
movapd %xmm1,%xmm0
mulsd  0xde8(%rip),%xmm0
call   1030 <sin@plt>
movapd %xmm0,0x30(%rsp)
movapd %xmm0,%xmm1
mulsd  0xdd9(%rip),%xmm1
movsd  %xmm1,0x10(%rsp)
movsd  0x18(%rsp),%xmm0
call   1030 <sin@plt>
movapd 0x30(%rsp),%xmm9
movapd 0xdc8(%rip),%xmm8
test   %ebp,%ebp
je     11e0 <four1+0xd0>
mulsd  0x10(%rsp),%xmm9
unpcklpd %xmm0,%xmm0
unpcklpd %xmm9,%xmm9
mov    $0x1,%eax
movapd 0x20(%rsp),%xmm1
jmp    12a9 <four1+0x199>
nopl   0x0(%rax)
movapd %xmm1,%xmm3
shufpd $0x1,%xmm2,%xmm3
mulpd  %xmm0,%xmm3
movapd %xmm1,%xmm2
mulpd  %xmm9,%xmm2
addpd  %xmm3,%xmm2
addpd  %xmm2,%xmm1
add    $0x2,%eax
cmp    %ebp,%eax
jae    11e0 <four1+0xd0>
movapd %xmm1,%xmm2
xorpd  %xmm8,%xmm2
cmp    %r14d,%eax
ja     1280 <four1+0x170>
movapd %xmm1,%xmm3
unpckhpd %xmm1,%xmm3
mov    %eax,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
lea    (%rcx,%rbp,1),%edx
movsd  (%rbx,%rdx,8),%xmm4
lea    (%rcx,%rbp,1),%esi
add    $0x1,%esi
movsd  (%rbx,%rsi,8),%xmm5
movapd %xmm5,%xmm6
mulsd  %xmm2,%xmm6
movapd %xmm3,%xmm7
mulsd  %xmm4,%xmm7
addsd  %xmm6,%xmm7
mulsd  %xmm1,%xmm4
mulsd  %xmm3,%xmm5
addsd  %xmm4,%xmm5
mov    %ecx,%edi
movsd  (%rbx,%rdi,8),%xmm4
subsd  %xmm7,%xmm4
movsd  %xmm4,(%rbx,%rdx,8)
lea    0x1(%rcx),%edx
movsd  (%rbx,%rdx,8),%xmm4
movapd %xmm4,%xmm6
subsd  %xmm5,%xmm6
movsd  %xmm6,(%rbx,%rsi,8)
addsd  (%rbx,%rdi,8),%xmm7
movsd  %xmm7,(%rbx,%rdi,8)
addsd  %xmm5,%xmm4
movsd  %xmm4,(%rbx,%rdx,8)
add    %r15d,%ecx
cmp    %r14d,%ecx
jbe    12d0 <four1+0x1c0>
jmp    1280 <four1+0x170>
add    $0x48,%rsp
pop    %rbx
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 ult 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 ugt i32 %28, %29
br i1 %30, label %31, label %74
31: ; preds = %27
%32 = load double*, double** %4
%33 = load i32, i32* %10
%34 = zext 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 = zext 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 = zext 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 = zext 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 i32 %52, 1
%54 = zext 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 i32 %58, 1
%60 = zext 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 i32 %64, 1
%66 = zext 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 i32 %70, 1
%72 = zext 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 = lshr i32 %75, 1
store i32 %76, i32* %9
br label %77
77: ; preds = %86, %74
%78 = load i32, i32* %9
%79 = icmp uge 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 ugt 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 i32 %88, %87
store i32 %89, i32* %10
%90 = load i32, i32* %9
%91 = lshr 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 i32 %94, %93
store i32 %95, i32* %10
br label %96
96: ; preds = %92
%97 = load i32, i32* %12
%98 = add i32 %97, 2
store i32 %98, i32* %12
br label %23
99: ; preds = %23
store i32 2, i32* %8
br label %100
100: ; preds = %231, %99
%101 = load i32, i32* %7
%102 = load i32, i32* %8
%103 = icmp ugt i32 %101, %102
br i1 %103, label %104, label %233
104: ; preds = %100
%105 = load i32, i32* %8
%106 = shl i32 %105, 1
store i32 %106, i32* %11
%107 = load i32, i32* %6
%108 = sitofp i32 %107 to double
%109 = load i32, i32* %8
%110 = uitofp i32 %109 to double
%111 = fdiv double 0x401921FB54442D1C, %110
%112 = fmul double %108, %111
store double %112, double* %18
%113 = load double, double* %18
%114 = fmul double 5.000000e-01, %113
%115 = call double @sin(double %114)
store double %115, double* %13
%116 = load double, double* %13
%117 = fmul double -2.000000e+00, %116
%118 = load double, double* %13
%119 = fmul double %117, %118
store double %119, double* %15
%120 = load double, double* %18
%121 = call double @sin(double %120)
store double %121, double* %16
store double 1.000000e+00, double* %14
store double 0.000000e+00, double* %17
store i32 1, i32* %9
br label %122
122: ; preds = %228, %104
%123 = load i32, i32* %9
%124 = load i32, i32* %8
%125 = icmp ult i32 %123, %124
br i1 %125, label %126, label %231
126: ; preds = %122
%127 = load i32, i32* %9
store i32 %127, i32* %12
br label %128
128: ; preds = %206, %126
%129 = load i32, i32* %12
%130 = load i32, i32* %7
%131 = icmp ule i32 %129, %130
br i1 %131, label %132, label %210
132: ; preds = %128
%133 = load i32, i32* %12
%134 = load i32, i32* %8
%135 = add i32 %133, %134
store i32 %135, i32* %10
%136 = load double, double* %14
%137 = load double*, double** %4
%138 = load i32, i32* %10
%139 = zext i32 %138 to i64
%140 = getelementptr inbounds double, double* %137, i64 %139
%141 = load double, double* %140
%142 = load double, double* %17
%143 = load double*, double** %4
%144 = load i32, i32* %10
%145 = add i32 %144, 1
%146 = zext i32 %145 to i64
%147 = getelementptr inbounds double, double* %143, i64 %146
%148 = load double, double* %147
%149 = fmul double %142, %148
%150 = fneg double %149
%151 = call double @llvm.fmuladd.f64(double %136, double %141, double %150)
store double %151, double* %19
%152 = load double, double* %14
%153 = load double*, double** %4
%154 = load i32, i32* %10
%155 = add i32 %154, 1
%156 = zext i32 %155 to i64
%157 = getelementptr inbounds double, double* %153, i64 %156
%158 = load double, double* %157
%159 = load double, double* %17
%160 = load double*, double** %4
%161 = load i32, i32* %10
%162 = zext i32 %161 to i64
%163 = getelementptr inbounds double, double* %160, i64 %162
%164 = load double, double* %163
%165 = fmul double %159, %164
%166 = call double @llvm.fmuladd.f64(double %152, double %158, double %165)
store double %166, double* %20
%167 = load double*, double** %4
%168 = load i32, i32* %12
%169 = zext i32 %168 to i64
%170 = getelementptr inbounds double, double* %167, i64 %169
%171 = load double, double* %170
%172 = load double, double* %19
%173 = fsub double %171, %172
%174 = load double*, double** %4
%175 = load i32, i32* %10
%176 = zext i32 %175 to i64
%177 = getelementptr inbounds double, double* %174, i64 %176
store double %173, double* %177
%178 = load double*, double** %4
%179 = load i32, i32* %12
%180 = add i32 %179, 1
%181 = zext i32 %180 to i64
%182 = getelementptr inbounds double, double* %178, i64 %181
%183 = load double, double* %182
%184 = load double, double* %20
%185 = fsub double %183, %184
%186 = load double*, double** %4
%187 = load i32, i32* %10
%188 = add i32 %187, 1
%189 = zext i32 %188 to i64
%190 = getelementptr inbounds double, double* %186, i64 %189
store double %185, double* %190
%191 = load double, double* %19
%192 = load double*, double** %4
%193 = load i32, i32* %12
%194 = zext i32 %193 to i64
%195 = getelementptr inbounds double, double* %192, i64 %194
%196 = load double, double* %195
%197 = fadd double %196, %191
store double %197, double* %195
%198 = load double, double* %20
%199 = load double*, double** %4
%200 = load i32, i32* %12
%201 = add i32 %200, 1
%202 = zext i32 %201 to i64
%203 = getelementptr inbounds double, double* %199, i64 %202
%204 = load double, double* %203
%205 = fadd double %204, %198
store double %205, double* %203
br label %206
206: ; preds = %132
%207 = load i32, i32* %11
%208 = load i32, i32* %12
%209 = add i32 %208, %207
store i32 %209, i32* %12
br label %128
210: ; preds = %128
%211 = load double, double* %14
store double %211, double* %13
%212 = load double, double* %15
%213 = load double, double* %17
%214 = load double, double* %16
%215 = fmul double %213, %214
%216 = fneg double %215
%217 = call double @llvm.fmuladd.f64(double %211, double %212, double %216)
%218 = load double, double* %14
%219 = fadd double %217, %218
store double %219, double* %14
%220 = load double, double* %17
%221 = load double, double* %15
%222 = load double, double* %13
%223 = load double, double* %16
%224 = fmul double %222, %223
%225 = call double @llvm.fmuladd.f64(double %220, double %221, double %224)
%226 = load double, double* %17
%227 = fadd double %225, %226
store double %227, double* %17
br label %228
228: ; preds = %210
%229 = load i32, i32* %9
%230 = add i32 %229, 2
store i32 %230, i32* %9
br label %122
231: ; preds = %122
%232 = load i32, i32* %11
store i32 %232, i32* %8
br label %100
233: ; preds = %100
ret void
}

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