#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 */
scalar_t__ calloc(int, int);
int /*<<< orphan*/ cl_fill(int, int, int, int, double *, double *,
                           double const *);
int /*<<< orphan*/ free(double *);
int /*<<< orphan*/ memset(double *, int /*<<< orphan*/, int);
int wiginit(int, int, int, double const *, double *);
int /*<<< orphan*/ wigrec(int, int, int, int, double const *, double *,
                          double *);
void wignerd_cl_from_cf(int s1, int s2, int nfunc, int ntheta, int lmax,
                        const double *cos_theta,
                        const double *integration_weights, double *out_cl,
                        const double *in_cf) {
  int i, l;
  double *wigd_lo, *wigd_hi;
  wigd_lo = (double *)calloc(ntheta, sizeof(double));
  wigd_hi = (double *)calloc(ntheta, sizeof(double));
  memset(out_cl, 0, nfunc * (lmax + 1) * sizeof(double));
  l = wiginit(s1, s2, ntheta, cos_theta, &wigd_hi[0]);
  for (i = 0; i < ntheta; i++)
    wigd_hi[i] *= integration_weights[i];
  if (l <= lmax)
    cl_fill(l, nfunc, ntheta, lmax, &wigd_hi[0], out_cl, in_cf);
  while (l < lmax) {
    wigrec(l, s1, s2, ntheta, cos_theta, &wigd_hi[0], &wigd_lo[0]);
    l++;
    cl_fill(l, nfunc, ntheta, lmax, &wigd_hi[0], out_cl, in_cf);
  }
  free(wigd_lo);
  free(wigd_hi);
}


x86 assembly (clang, -O0):
<wignerd_cl_from_cf>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    0x20(%rbp),%rax
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
mov    %r8d,-0x14(%rbp)
mov    %r9,-0x20(%rbp)
mov    -0x10(%rbp),%edi
mov    $0x8,%esi
call   1080 <calloc@plt>
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%edi
mov    $0x8,%esi
call   1080 <calloc@plt>
mov    %rax,-0x38(%rbp)
mov    0x18(%rbp),%rdi
mov    -0xc(%rbp),%eax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
imul   %ecx,%eax
cltq
shl    $0x3,%rax
mov    %eax,%edx
xor    %esi,%esi
call   1070 <memset@plt>
mov    -0x4(%rbp),%edi
mov    -0x8(%rbp),%esi
mov    -0x10(%rbp),%edx
mov    -0x20(%rbp),%rcx
mov    -0x38(%rbp),%r8
call   1060 <wiginit@plt>
mov    %eax,-0x28(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    1222 <wignerd_cl_from_cf+0xc2>
mov    0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x38(%rbp),%rax
movslq -0x24(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11e9 <wignerd_cl_from_cf+0x89>
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jg     124f <wignerd_cl_from_cf+0xef>
mov    -0x28(%rbp),%edi
mov    -0xc(%rbp),%esi
mov    -0x10(%rbp),%edx
mov    -0x14(%rbp),%ecx
mov    -0x38(%rbp),%r8
mov    0x18(%rbp),%r9
mov    0x20(%rbp),%rax
mov    %rax,(%rsp)
call   1040 <cl_fill@plt>
jmp    1254 <wignerd_cl_from_cf+0xf4>
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    12b0 <wignerd_cl_from_cf+0x150>
mov    -0x28(%rbp),%edi
mov    -0x4(%rbp),%esi
mov    -0x8(%rbp),%edx
mov    -0x10(%rbp),%ecx
mov    -0x20(%rbp),%r8
mov    -0x38(%rbp),%r9
mov    -0x30(%rbp),%rax
mov    %rax,(%rsp)
call   1050 <wigrec@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%edi
mov    -0xc(%rbp),%esi
mov    -0x10(%rbp),%edx
mov    -0x14(%rbp),%ecx
mov    -0x38(%rbp),%r8
mov    0x18(%rbp),%r9
mov    0x20(%rbp),%rax
mov    %rax,(%rsp)
call   1040 <cl_fill@plt>
jmp    1254 <wignerd_cl_from_cf+0xf4>
mov    -0x30(%rbp),%rdi
call   1030 <free@plt>
mov    -0x38(%rbp),%rdi
call   1030 <free@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<wignerd_cl_from_cf>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x48,%rsp
mov    %r9,0x30(%rsp)
mov    %r8d,%ebp
mov    %ecx,%r14d
mov    %edx,%r13d
mov    %esi,0xc(%rsp)
mov    %edi,0x14(%rsp)
mov    0x90(%rsp),%rax
mov    %rax,0x20(%rsp)
mov    0x88(%rsp),%r15
mov    0x80(%rsp),%r12
mov    %ecx,%edi
mov    $0x8,%esi
call   1080 <calloc@plt>
mov    %rax,0x38(%rsp)
mov    %r14d,%edi
mov    $0x8,%esi
call   1080 <calloc@plt>
mov    %rax,%rbx
mov    %rbp,0x40(%rsp)
lea    0x1(%rbp),%edx
mov    %r13d,0x10(%rsp)
imul   %r13d,%edx
shl    $0x3,%edx
mov    %r15,0x18(%rsp)
mov    %r15,%rdi
xor    %esi,%esi
call   1070 <memset@plt>
mov    0x14(%rsp),%edi
mov    0xc(%rsp),%esi
mov    %r14d,%edx
mov    0x30(%rsp),%rcx
mov    %rbx,%r8
call   1060 <wiginit@plt>
mov    %r14d,%edx
mov    %eax,%r8d
test   %r14d,%r14d
jle    139d <wignerd_cl_from_cf+0x23d>
mov    %edx,%eax
cmp    $0x4,%edx
jb     122d <wignerd_cl_from_cf+0xcd>
lea    (%r12,%rax,8),%rcx
cmp    %rcx,%rbx
jae    12d7 <wignerd_cl_from_cf+0x177>
lea    (%rbx,%rax,8),%rcx
cmp    %r12,%rcx
jbe    12d7 <wignerd_cl_from_cf+0x177>
xor    %ecx,%ecx
mov    %rcx,%rdi
not    %rdi
add    %rax,%rdi
mov    %rax,%rsi
and    $0x3,%rsi
je     126a <wignerd_cl_from_cf+0x10a>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%r12,%rcx,8),%xmm0
mulsd  (%rbx,%rcx,8),%xmm0
movsd  %xmm0,(%rbx,%rcx,8)
add    $0x1,%rcx
add    $0xffffffffffffffff,%rsi
jne    1250 <wignerd_cl_from_cf+0xf0>
cmp    $0x3,%rdi
jb     139d <wignerd_cl_from_cf+0x23d>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%r12,%rcx,8),%xmm0
mulsd  (%rbx,%rcx,8),%xmm0
movsd  %xmm0,(%rbx,%rcx,8)
movsd  0x8(%r12,%rcx,8),%xmm0
mulsd  0x8(%rbx,%rcx,8),%xmm0
movsd  %xmm0,0x8(%rbx,%rcx,8)
movsd  0x10(%r12,%rcx,8),%xmm0
mulsd  0x10(%rbx,%rcx,8),%xmm0
movsd  %xmm0,0x10(%rbx,%rcx,8)
movsd  0x18(%r12,%rcx,8),%xmm0
mulsd  0x18(%rbx,%rcx,8),%xmm0
movsd  %xmm0,0x18(%rbx,%rcx,8)
add    $0x4,%rcx
cmp    %rcx,%rax
jne    1280 <wignerd_cl_from_cf+0x120>
jmp    139d <wignerd_cl_from_cf+0x23d>
mov    %eax,%ecx
and    $0xfffffffc,%ecx
lea    -0x4(%rcx),%rdi
mov    %rdi,%rsi
shr    $0x2,%rsi
add    $0x1,%rsi
test   %rdi,%rdi
je     1472 <wignerd_cl_from_cf+0x312>
mov    %rsi,%rdi
and    $0xfffffffffffffffe,%rdi
xor    %ebp,%ebp
nopl   (%rax)
movupd (%r12,%rbp,8),%xmm0
movupd 0x10(%r12,%rbp,8),%xmm1
movupd (%rbx,%rbp,8),%xmm2
mulpd  %xmm0,%xmm2
movupd 0x10(%rbx,%rbp,8),%xmm0
mulpd  %xmm1,%xmm0
movupd 0x20(%rbx,%rbp,8),%xmm1
movupd 0x30(%rbx,%rbp,8),%xmm3
movupd %xmm2,(%rbx,%rbp,8)
movupd %xmm0,0x10(%rbx,%rbp,8)
movupd 0x20(%r12,%rbp,8),%xmm0
mulpd  %xmm1,%xmm0
movupd 0x30(%r12,%rbp,8),%xmm1
mulpd  %xmm3,%xmm1
movupd %xmm0,0x20(%rbx,%rbp,8)
movupd %xmm1,0x30(%rbx,%rbp,8)
add    $0x8,%rbp
add    $0xfffffffffffffffe,%rdi
jne    1300 <wignerd_cl_from_cf+0x1a0>
test   $0x1,%sil
je     1394 <wignerd_cl_from_cf+0x234>
movupd (%r12,%rbp,8),%xmm0
movupd 0x10(%r12,%rbp,8),%xmm1
movupd (%rbx,%rbp,8),%xmm2
mulpd  %xmm0,%xmm2
movupd 0x10(%rbx,%rbp,8),%xmm0
mulpd  %xmm1,%xmm0
movupd %xmm2,(%rbx,%rbp,8)
movupd %xmm0,0x10(%rbx,%rbp,8)
cmp    %rax,%rcx
jne    122f <wignerd_cl_from_cf+0xcf>
mov    %rbx,%r14
mov    0x40(%rsp),%r13
cmp    %r13d,%r8d
mov    0x10(%rsp),%ebp
jg     13d8 <wignerd_cl_from_cf+0x278>
mov    0x20(%rsp),%rax
mov    %rax,(%rsp)
mov    %r8d,%edi
mov    %ebp,%esi
mov    %r13d,%ecx
mov    %edx,%r15d
mov    %r8d,%ebx
mov    %r14,%r8
mov    0x18(%rsp),%r9
call   1040 <cl_fill@plt>
mov    %ebx,%r8d
mov    %r15d,%edx
cmp    %r13d,%r8d
mov    0xc(%rsp),%ebx
mov    0x18(%rsp),%rbp
mov    0x38(%rsp),%rdi
mov    %r14,0x28(%rsp)
jge    1455 <wignerd_cl_from_cf+0x2f5>
mov    %edx,%ecx
mov    %r13,%r15
mov    0x28(%rsp),%r13
nopw   0x0(%rax,%rax,1)
mov    %rdi,(%rsp)
mov    %r8d,%edi
mov    0x14(%rsp),%esi
mov    %ebx,%edx
mov    %ecx,%r14d
mov    %r8d,%r12d
mov    0x30(%rsp),%r8
mov    %r13,%r9
call   1050 <wigrec@plt>
add    $0x1,%r12d
mov    0x20(%rsp),%rax
mov    %rax,(%rsp)
mov    %r12d,%edi
mov    0x10(%rsp),%esi
mov    %r14d,%edx
mov    %r15d,%ecx
mov    %r13,%r8
mov    %rbp,%r9
call   1040 <cl_fill@plt>
mov    %r12d,%r8d
mov    %r14d,%ecx
mov    0x38(%rsp),%rdi
cmp    %r12d,%r15d
jne    1400 <wignerd_cl_from_cf+0x2a0>
call   1030 <free@plt>
mov    0x28(%rsp),%rdi
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <free@plt>
xor    %ebp,%ebp
test   $0x1,%sil
jne    1369 <wignerd_cl_from_cf+0x209>
jmp    1394 <wignerd_cl_from_cf+0x234>

LLVM IR (-O0):
define void @wignerd_cl_from_cf(i32 %0, i32 %1, i32 %2, i32 %3, i32 %4, double* %5, double* %6, double* %7, double* %8) {
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca double*
%16 = alloca double*
%17 = alloca double*
%18 = alloca double*
%19 = alloca i32
%20 = alloca i32
%21 = alloca double*
%22 = alloca double*
store i32 %0, i32* %10
store i32 %1, i32* %11
store i32 %2, i32* %12
store i32 %3, i32* %13
store i32 %4, i32* %14
store double* %5, double** %15
store double* %6, double** %16
store double* %7, double** %17
store double* %8, double** %18
%23 = load i32, i32* %13
%24 = call i64 @calloc(i32 %23, i32 8)
%25 = inttoptr i64 %24 to double*
store double* %25, double** %21
%26 = load i32, i32* %13
%27 = call i64 @calloc(i32 %26, i32 8)
%28 = inttoptr i64 %27 to double*
store double* %28, double** %22
%29 = load double*, double** %17
%30 = load i32, i32* %12
%31 = load i32, i32* %14
%32 = add nsw i32 %31, 1
%33 = mul nsw i32 %30, %32
%34 = sext i32 %33 to i64
%35 = mul i64 %34, 8
%36 = trunc i64 %35 to i32
%37 = call i32 @memset(double* %29, i32 0, i32 %36)
%38 = load i32, i32* %10
%39 = load i32, i32* %11
%40 = load i32, i32* %13
%41 = load double*, double** %15
%42 = load double*, double** %22
%43 = getelementptr inbounds double, double* %42, i64 0
%44 = call i32 @wiginit(i32 %38, i32 %39, i32 %40, double* %41, double* %43)
store i32 %44, i32* %20
store i32 0, i32* %19
br label %45
45: ; preds = %61, %9
%46 = load i32, i32* %19
%47 = load i32, i32* %13
%48 = icmp slt i32 %46, %47
br i1 %48, label %49, label %64
49: ; preds = %45
%50 = load double*, double** %16
%51 = load i32, i32* %19
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds double, double* %50, i64 %52
%54 = load double, double* %53
%55 = load double*, double** %22
%56 = load i32, i32* %19
%57 = sext i32 %56 to i64
%58 = getelementptr inbounds double, double* %55, i64 %57
%59 = load double, double* %58
%60 = fmul double %59, %54
store double %60, double* %58
br label %61
61: ; preds = %49
%62 = load i32, i32* %19
%63 = add nsw i32 %62, 1
store i32 %63, i32* %19
br label %45
64: ; preds = %45
%65 = load i32, i32* %20
%66 = load i32, i32* %14
%67 = icmp sle i32 %65, %66
br i1 %67, label %68, label %78
68: ; preds = %64
%69 = load i32, i32* %20
%70 = load i32, i32* %12
%71 = load i32, i32* %13
%72 = load i32, i32* %14
%73 = load double*, double** %22
%74 = getelementptr inbounds double, double* %73, i64 0
%75 = load double*, double** %17
%76 = load double*, double** %18
%77 = call i32 @cl_fill(i32 %69, i32 %70, i32 %71, i32 %72, double* %74, double* %75, double* %76)
br label %78
78: ; preds = %68, %64
br label %79
79: ; preds = %83, %78
%80 = load i32, i32* %20
%81 = load i32, i32* %14
%82 = icmp slt i32 %80, %81
br i1 %82, label %83, label %105
83: ; preds = %79
%84 = load i32, i32* %20
%85 = load i32, i32* %10
%86 = load i32, i32* %11
%87 = load i32, i32* %13
%88 = load double*, double** %15
%89 = load double*, double** %22
%90 = getelementptr inbounds double, double* %89, i64 0
%91 = load double*, double** %21
%92 = getelementptr inbounds double, double* %91, i64 0
%93 = call i32 @wigrec(i32 %84, i32 %85, i32 %86, i32 %87, double* %88, double* %90, double* %92)
%94 = load i32, i32* %20
%95 = add nsw i32 %94, 1
store i32 %95, i32* %20
%96 = load i32, i32* %20
%97 = load i32, i32* %12
%98 = load i32, i32* %13
%99 = load i32, i32* %14
%100 = load double*, double** %22
%101 = getelementptr inbounds double, double* %100, i64 0
%102 = load double*, double** %17
%103 = load double*, double** %18
%104 = call i32 @cl_fill(i32 %96, i32 %97, i32 %98, i32 %99, double* %101, double* %102, double* %103)
br label %79
105: ; preds = %79
%106 = load double*, double** %21
%107 = call i32 @free(double* %106)
%108 = load double*, double** %22
%109 = call i32 @free(double* %108)
ret void
}

LLVM IR (-O2):
define void @wignerd_cl_from_cf(i32 %0, i32 %1, i32 %2, i32 %3, i32 %4, double* %5, double* nocapture %6, double* %7, double* %8) {
%10 = tail call i64 @calloc(i32 %3, i32 8)
%11 = inttoptr i64 %10 to double*
%12 = tail call i64 @calloc(i32 %3, i32 8)
%13 = inttoptr i64 %12 to double*
%14 = inttoptr i64 %12 to i8*
%15 = add nsw i32 %4, 1
%16 = shl i32 %2, 3
%17 = mul i32 %16, %15
%18 = tail call i32 @memset(double* %7, i32 0, i32 %17)
%19 = tail call i32 @wiginit(i32 %0, i32 %1, i32 %3, double* %5, double* %13)
%20 = icmp sgt i32 %3, 0
br i1 %20, label %21, label %148
21: ; preds = %9
%22 = zext i32 %3 to i64
%23 = icmp ult i32 %3, 4
br i1 %23, label %101, label %24
24: ; preds = %21
%25 = getelementptr double, double* %13, i64 %22
%26 = getelementptr double, double* %6, i64 %22
%27 = bitcast double* %26 to i8*
%28 = icmp ult i8* %14, %27
%29 = icmp ugt double* %25, %6
%30 = and i1 %28, %29
br i1 %30, label %101, label %31
31: ; preds = %24
%32 = and i64 %22, 4294967292
%33 = add nsw i64 %32, -4
%34 = lshr exact i64 %33, 2
%35 = add nuw nsw i64 %34, 1
%36 = and i64 %35, 1
%37 = icmp eq i64 %33, 0
br i1 %37, label %79, label %38
38: ; preds = %31
%39 = and i64 %35, 9223372036854775806
br label %40
40: ; preds = %40, %38
%41 = phi i64 [ 0, %38 ], [ %76, %40 ]
%42 = phi i64 [ 0, %38 ], [ %77, %40 ]
%43 = getelementptr inbounds double, double* %6, i64 %41
%44 = bitcast double* %43 to <2 x double>*
%45 = load <2 x double>, <2 x double>* %44
%46 = getelementptr inbounds double, double* %43, i64 2
%47 = bitcast double* %46 to <2 x double>*
%48 = load <2 x double>, <2 x double>* %47
%49 = getelementptr inbounds double, double* %13, i64 %41
%50 = bitcast double* %49 to <2 x double>*
%51 = load <2 x double>, <2 x double>* %50
%52 = getelementptr inbounds double, double* %49, i64 2
%53 = bitcast double* %52 to <2 x double>*
%54 = load <2 x double>, <2 x double>* %53
%55 = fmul <2 x double> %45, %51
%56 = fmul <2 x double> %48, %54
%57 = bitcast double* %49 to <2 x double>*
store <2 x double> %55, <2 x double>* %57
%58 = bitcast double* %52 to <2 x double>*
store <2 x double> %56, <2 x double>* %58
%59 = or i64 %41, 4
%60 = getelementptr inbounds double, double* %6, i64 %59
%61 = bitcast double* %60 to <2 x double>*
%62 = load <2 x double>, <2 x double>* %61
%63 = getelementptr inbounds double, double* %60, i64 2
%64 = bitcast double* %63 to <2 x double>*
%65 = load <2 x double>, <2 x double>* %64
%66 = getelementptr inbounds double, double* %13, i64 %59
%67 = bitcast double* %66 to <2 x double>*
%68 = load <2 x double>, <2 x double>* %67
%69 = getelementptr inbounds double, double* %66, i64 2
%70 = bitcast double* %69 to <2 x double>*
%71 = load <2 x double>, <2 x double>* %70
%72 = fmul <2 x double> %62, %68
%73 = fmul <2 x double> %65, %71
%74 = bitcast double* %66 to <2 x double>*
store <2 x double> %72, <2 x double>* %74
%75 = bitcast double* %69 to <2 x double>*
store <2 x double> %73, <2 x double>* %75
%76 = add nuw i64 %41, 8
%77 = add i64 %42, 2
%78 = icmp eq i64 %77, %39
br i1 %78, label %79, label %40
79: ; preds = %40, %31
%80 = phi i64 [ 0, %31 ], [ %76, %40 ]
%81 = icmp eq i64 %36, 0
br i1 %81, label %99, label %82
82: ; preds = %79
%83 = getelementptr inbounds double, double* %6, i64 %80
%84 = bitcast double* %83 to <2 x double>*
%85 = load <2 x double>, <2 x double>* %84
%86 = getelementptr inbounds double, double* %83, i64 2
%87 = bitcast double* %86 to <2 x double>*
%88 = load <2 x double>, <2 x double>* %87
%89 = getelementptr inbounds double, double* %13, i64 %80
%90 = bitcast double* %89 to <2 x double>*
%91 = load <2 x double>, <2 x double>* %90
%92 = getelementptr inbounds double, double* %89, i64 2
%93 = bitcast double* %92 to <2 x double>*
%94 = load <2 x double>, <2 x double>* %93
%95 = fmul <2 x double> %85, %91
%96 = fmul <2 x double> %88, %94
%97 = bitcast double* %89 to <2 x double>*
store <2 x double> %95, <2 x double>* %97
%98 = bitcast double* %92 to <2 x double>*
store <2 x double> %96, <2 x double>* %98
br label %99
99: ; preds = %79, %82
%100 = icmp eq i64 %32, %22
br i1 %100, label %148, label %101
101: ; preds = %24, %21, %99
%102 = phi i64 [ 0, %24 ], [ 0, %21 ], [ %32, %99 ]
%103 = xor i64 %102, -1
%104 = add nsw i64 %103, %22
%105 = and i64 %22, 3
%106 = icmp eq i64 %105, 0
br i1 %106, label %118, label %107
107: ; preds = %101, %107
%108 = phi i64 [ %115, %107 ], [ %102, %101 ]
%109 = phi i64 [ %116, %107 ], [ 0, %101 ]
%110 = getelementptr inbounds double, double* %6, i64 %108
%111 = load double, double* %110
%112 = getelementptr inbounds double, double* %13, i64 %108
%113 = load double, double* %112
%114 = fmul double %111, %113
store double %114, double* %112
%115 = add nuw nsw i64 %108, 1
%116 = add i64 %109, 1
%117 = icmp eq i64 %116, %105
br i1 %117, label %118, label %107
118: ; preds = %107, %101
%119 = phi i64 [ %102, %101 ], [ %115, %107 ]
%120 = icmp ult i64 %104, 3
br i1 %120, label %148, label %121
121: ; preds = %118, %121
%122 = phi i64 [ %146, %121 ], [ %119, %118 ]
%123 = getelementptr inbounds double, double* %6, i64 %122
%124 = load double, double* %123
%125 = getelementptr inbounds double, double* %13, i64 %122
%126 = load double, double* %125
%127 = fmul double %124, %126
store double %127, double* %125
%128 = add nuw nsw i64 %122, 1
%129 = getelementptr inbounds double, double* %6, i64 %128
%130 = load double, double* %129
%131 = getelementptr inbounds double, double* %13, i64 %128
%132 = load double, double* %131
%133 = fmul double %130, %132
store double %133, double* %131
%134 = add nuw nsw i64 %122, 2
%135 = getelementptr inbounds double, double* %6, i64 %134
%136 = load double, double* %135
%137 = getelementptr inbounds double, double* %13, i64 %134
%138 = load double, double* %137
%139 = fmul double %136, %138
store double %139, double* %137
%140 = add nuw nsw i64 %122, 3
%141 = getelementptr inbounds double, double* %6, i64 %140
%142 = load double, double* %141
%143 = getelementptr inbounds double, double* %13, i64 %140
%144 = load double, double* %143
%145 = fmul double %142, %144
store double %145, double* %143
%146 = add nuw nsw i64 %122, 4
%147 = icmp eq i64 %146, %22
br i1 %147, label %148, label %121
148: ; preds = %118, %121, %99, %9
%149 = icmp sgt i32 %19, %4
br i1 %149, label %152, label %150
150: ; preds = %148
%151 = tail call i32 @cl_fill(i32 %19, i32 %2, i32 %3, i32 %4, double* %13, double* %7, double* %8)
br label %152
152: ; preds = %150, %148
%153 = icmp slt i32 %19, %4
br i1 %153, label %154, label %160
154: ; preds = %152, %154
%155 = phi i32 [ %157, %154 ], [ %19, %152 ]
%156 = tail call i32 @wigrec(i32 %155, i32 %0, i32 %1, i32 %3, double* %5, double* %13, double* %11)
%157 = add i32 %155, 1
%158 = tail call i32 @cl_fill(i32 %157, i32 %2, i32 %3, i32 %4, double* %13, double* %7, double* %8)
%159 = icmp eq i32 %157, %4
br i1 %159, label %160, label %154
160: ; preds = %154, %152
%161 = tail call i32 @free(double* %11)
%162 = tail call i32 @free(double* %13)
ret void
}