#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 */
int /*<<< orphan*/ exit(int);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *, ...);
int fscanf(int /*<<< orphan*/, char *, double *, double *);
int /*<<< orphan*/ gauleg_(double *, double *, double *, double *, int *);
int /*<<< orphan*/ hc_dvecalloc(double **, int, char *);
int /*<<< orphan*/ stderr;
int /*<<< orphan*/ stdin;
int /*<<< orphan*/ vshd2c_(int *, double *, double *, double *, double *, int *,
                           double *, double *);
void main() {
  int lmax, nlat, nlon, lmsize, i, j, index;
  double *datax, *datay, *cpol, *ctor, *z, *w, unity, negunity;
  unity = 1.0;
  negunity = -1.0;
  lmax = 63;
  nlat = lmax + 1;
  nlon = nlat * 2;
  lmsize = (lmax + 1) * (lmax + 2) / 2;
  hc_dvecalloc(&cpol, lmsize * 2, "");
  hc_dvecalloc(&ctor, lmsize * 2, "");
  hc_dvecalloc(&datax, nlon * nlat, "");
  hc_dvecalloc(&datay, nlon * nlat, "");
  hc_dvecalloc(&z, nlat, "");
  hc_dvecalloc(&w, nlon * nlat, "");
  gauleg_(&negunity, &unity, z, w, &nlat);
  for (index = 0; index < nlon * nlat; index++) {
    if (fscanf(stdin, "%*lf %*lf %*lf %lf %lf", (datay + index),
               (datax + index)) != 2) {
      fprintf(stderr, "read error data\n");
      exit(-1);
    }
  }
  vshd2c_(&lmax, z, w, cpol, ctor, &lmax, datax, datay);
  fprintf(stderr, "%i\n", lmax);
  for (i = 0; i < lmsize * 2; i++)
    fprintf(stderr, "%i %15.7e %15.7e\t%15.7e %15.7e\t%15.7e %15.7e\n", i, 0.,
            0., -cpol[i * 2], -cpol[i * 2 + 1], -ctor[i * 2], -ctor[i * 2 + 1]);
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movsd  0xe98(%rip),%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xe83(%rip),%xmm0
movsd  %xmm0,-0x60(%rbp)
movl   $0x3f,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
mov    -0x8(%rbp),%eax
shl    $0x1,%eax
mov    %eax,-0xc(%rbp)
mov    -0x4(%rbp),%eax
add    $0x1,%eax
mov    -0x4(%rbp),%ecx
add    $0x2,%ecx
imul   %ecx,%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%esi
shl    $0x1,%esi
lea    -0x38(%rbp),%rdi
lea    0xe71(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0x10(%rbp),%esi
shl    $0x1,%esi
lea    -0x40(%rbp),%rdi
lea    0xe5b(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0xc(%rbp),%esi
imul   -0x8(%rbp),%esi
lea    -0x28(%rbp),%rdi
lea    0xe44(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0xc(%rbp),%esi
imul   -0x8(%rbp),%esi
lea    -0x30(%rbp),%rdi
lea    0xe2d(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0x8(%rbp),%esi
lea    -0x48(%rbp),%rdi
lea    0xe1a(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0xc(%rbp),%esi
imul   -0x8(%rbp),%esi
lea    -0x50(%rbp),%rdi
lea    0xe03(%rip),%rdx
call   1030 <hc_dvecalloc@plt>
mov    -0x48(%rbp),%rdx
mov    -0x50(%rbp),%rcx
lea    -0x60(%rbp),%rdi
lea    -0x58(%rbp),%rsi
lea    -0x8(%rbp),%r8
call   1060 <gauleg_@plt>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    -0xc(%rbp),%ecx
imul   -0x8(%rbp),%ecx
cmp    %ecx,%eax
jge    12db <main+0x17b>
mov    0x2d76(%rip),%rax
mov    (%rax),%edi
mov    -0x30(%rbp),%rdx
movslq -0x1c(%rbp),%rax
shl    $0x3,%rax
add    %rax,%rdx
mov    -0x28(%rbp),%rcx
movslq -0x1c(%rbp),%rax
shl    $0x3,%rax
add    %rax,%rcx
lea    0xd77(%rip),%rsi
call   1040 <fscanf@plt>
cmp    $0x2,%eax
je     12c8 <main+0x168>
mov    0x2d2a(%rip),%rax
mov    (%rax),%edi
lea    0xd70(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    $0xffffffff,%edi
call   1080 <exit@plt>
jmp    12cd <main+0x16d>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1259 <main+0xf9>
mov    -0x48(%rbp),%rsi
mov    -0x50(%rbp),%rdx
mov    -0x38(%rbp),%rcx
mov    -0x40(%rbp),%r8
mov    -0x28(%rbp),%r10
mov    -0x30(%rbp),%rax
lea    -0x4(%rbp),%r9
mov    %r9,%rdi
mov    %r10,(%rsp)
mov    %rax,0x8(%rsp)
call   1070 <vshd2c_@plt>
mov    0x2cc9(%rip),%rax
mov    (%rax),%edi
mov    -0x4(%rbp),%edx
lea    0xd1d(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
movl   $0x0,-0x14(%rbp)
mov    -0x14(%rbp),%eax
mov    -0x10(%rbp),%ecx
shl    $0x1,%ecx
cmp    %ecx,%eax
jge    1412 <main+0x2b2>
mov    0x2c97(%rip),%rax
mov    (%rax),%edi
mov    -0x14(%rbp),%edx
mov    -0x38(%rbp),%rax
mov    -0x14(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm2
mov    -0x38(%rbp),%rax
mov    -0x14(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm3
mov    -0x40(%rbp),%rax
mov    -0x14(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm4
mov    -0x40(%rbp),%rax
mov    -0x14(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm5
lea    0xc45(%rip),%rsi
xorps  %xmm1,%xmm1
movaps %xmm1,%xmm0
mov    $0x6,%al
call   1050 <fprintf@plt>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1329 <main+0x1c9>
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x48,%rsp
movabs $0x3ff0000000000000,%rax
mov    %rax,0x40(%rsp)
movabs $0xbff0000000000000,%rax
mov    %rax,0x38(%rsp)
movl   $0x3f,0x4(%rsp)
movl   $0x40,(%rsp)
lea    0xe98(%rip),%rbx
lea    0x20(%rsp),%rdi
mov    $0x1040,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
lea    0x18(%rsp),%rdi
mov    $0x1040,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
lea    0x30(%rsp),%rdi
mov    $0x2000,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
lea    0x28(%rsp),%rdi
mov    $0x2000,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
lea    0x10(%rsp),%rdi
mov    $0x40,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
lea    0x8(%rsp),%rdi
mov    $0x2000,%esi
mov    %rbx,%rdx
call   1030 <hc_dvecalloc@plt>
mov    0x10(%rsp),%rdx
mov    0x8(%rsp),%rcx
lea    0x38(%rsp),%rdi
lea    0x40(%rsp),%rsi
mov    %rsp,%r8
call   1060 <gauleg_@plt>
cmpl   $0x0,(%rsp)
jle    1279 <main+0x119>
xor    %ebx,%ebx
mov    0x2db2(%rip),%r15
lea    0xdd3(%rip),%r14
xor    %r12d,%r12d
mov    (%r15),%edi
mov    0x28(%rsp),%rdx
add    %rbx,%rdx
mov    0x30(%rsp),%rcx
add    %rbx,%rcx
mov    %r14,%rsi
call   1040 <fscanf@plt>
cmp    $0x2,%eax
jne    1346 <main+0x1e6>
add    $0x1,%r12
movslq (%rsp),%rax
shl    $0x7,%rax
add    $0x8,%rbx
cmp    %rax,%r12
jl     1240 <main+0xe0>
mov    0x10(%rsp),%rsi
mov    0x8(%rsp),%rdx
mov    0x20(%rsp),%rcx
mov    0x18(%rsp),%r8
lea    0x4(%rsp),%rdi
mov    %rdi,%r9
push   0x28(%rsp)
push   0x38(%rsp)
call   1070 <vshd2c_@plt>
add    $0x10,%rsp
mov    0x2d2b(%rip),%r15
mov    (%r15),%edi
mov    0x4(%rsp),%edx
lea    0xd7d(%rip),%rsi
xor    %r12d,%r12d
xor    %eax,%eax
call   1050 <fprintf@plt>
mov    $0x8,%ebx
lea    0xd6b(%rip),%r14
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    (%r15),%edi
mov    0x20(%rsp),%rax
movsd  -0x8(%rax,%rbx,1),%xmm2
movsd  (%rax,%rbx,1),%xmm3
movaps 0xd06(%rip),%xmm0
xorps  %xmm0,%xmm2
xorps  %xmm0,%xmm3
mov    0x18(%rsp),%rax
movsd  -0x8(%rax,%rbx,1),%xmm4
movsd  (%rax,%rbx,1),%xmm5
xorps  %xmm0,%xmm4
xorps  %xmm0,%xmm5
xorps  %xmm0,%xmm0
xorps  %xmm1,%xmm1
mov    %r14,%rsi
mov    %r12d,%edx
mov    $0x6,%al
call   1050 <fprintf@plt>
add    $0x1,%r12
add    $0x10,%rbx
cmp    $0x1040,%r12
jne    12e0 <main+0x180>
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret
mov    0x2c8b(%rip),%rax
mov    (%rax),%edi
lea    0xcd1(%rip),%rsi
xor    %eax,%eax
call   1050 <fprintf@plt>
mov    $0xffffffff,%edi
call   1080 <exit@plt>

LLVM IR (-O0):
@.str = [1 x i8] zeroinitializer
@stdin = global i32 0
@.str.1 = [23 x i8] c"%*lf %*lf %*lf %lf %lf\00"
@stderr = global i32 0
@.str.2 = [17 x i8] c"read error data\0A\00"
@.str.3 = [4 x i8] c"%i\0A\00"
@.str.4 = [46 x i8] c"%i %15.7e %15.7e\09%15.7e %15.7e\09%15.7e %15.7e\0A\00"
define void @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca i32
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca double*
%9 = alloca double*
%10 = alloca double*
%11 = alloca double*
%12 = alloca double*
%13 = alloca double*
%14 = alloca double
%15 = alloca double
store double 1.000000e+00, double* %14
store double -1.000000e+00, double* %15
store i32 63, i32* %1
%16 = load i32, i32* %1
%17 = add nsw i32 %16, 1
store i32 %17, i32* %2
%18 = load i32, i32* %2
%19 = mul nsw i32 %18, 2
store i32 %19, i32* %3
%20 = load i32, i32* %1
%21 = add nsw i32 %20, 1
%22 = load i32, i32* %1
%23 = add nsw i32 %22, 2
%24 = mul nsw i32 %21, %23
%25 = sdiv i32 %24, 2
store i32 %25, i32* %4
%26 = load i32, i32* %4
%27 = mul nsw i32 %26, 2
%28 = call i32 @hc_dvecalloc(double** %10, i32 %27, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%29 = load i32, i32* %4
%30 = mul nsw i32 %29, 2
%31 = call i32 @hc_dvecalloc(double** %11, i32 %30, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%32 = load i32, i32* %3
%33 = load i32, i32* %2
%34 = mul nsw i32 %32, %33
%35 = call i32 @hc_dvecalloc(double** %8, i32 %34, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%36 = load i32, i32* %3
%37 = load i32, i32* %2
%38 = mul nsw i32 %36, %37
%39 = call i32 @hc_dvecalloc(double** %9, i32 %38, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%40 = load i32, i32* %2
%41 = call i32 @hc_dvecalloc(double** %12, i32 %40, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%42 = load i32, i32* %3
%43 = load i32, i32* %2
%44 = mul nsw i32 %42, %43
%45 = call i32 @hc_dvecalloc(double** %13, i32 %44, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%46 = load double*, double** %12
%47 = load double*, double** %13
%48 = call i32 @gauleg_(double* %15, double* %14, double* %46, double* %47, i32* %2)
store i32 0, i32* %7
br label %49
49: ; preds = %72, %0
%50 = load i32, i32* %7
%51 = load i32, i32* %3
%52 = load i32, i32* %2
%53 = mul nsw i32 %51, %52
%54 = icmp slt i32 %50, %53
br i1 %54, label %55, label %75
55: ; preds = %49
%56 = load i32, i32* @stdin
%57 = load double*, double** %9
%58 = load i32, i32* %7
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds double, double* %57, i64 %59
%61 = load double*, double** %8
%62 = load i32, i32* %7
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds double, double* %61, i64 %63
%65 = call i32 @fscanf(i32 %56, i8* getelementptr inbounds ([23 x i8], [23 x i8]* @.str.1, i64 0, i64 0), double* %60, double* %64)
%66 = icmp ne i32 %65, 2
br i1 %66, label %67, label %71
67: ; preds = %55
%68 = load i32, i32* @stderr
%69 = call i32 (i32, i8*, ...) @fprintf(i32 %68, i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0))
%70 = call i32 @exit(i32 -1)
unreachable
71: ; preds = %55
br label %72
72: ; preds = %71
%73 = load i32, i32* %7
%74 = add nsw i32 %73, 1
store i32 %74, i32* %7
br label %49
75: ; preds = %49
%76 = load double*, double** %12
%77 = load double*, double** %13
%78 = load double*, double** %10
%79 = load double*, double** %11
%80 = load double*, double** %8
%81 = load double*, double** %9
%82 = call i32 @vshd2c_(i32* %1, double* %76, double* %77, double* %78, double* %79, i32* %1, double* %80, double* %81)
%83 = load i32, i32* @stderr
%84 = load i32, i32* %1
%85 = call i32 (i32, i8*, ...) @fprintf(i32 %83, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.3, i64 0, i64 0), i32 %84)
store i32 0, i32* %5
br label %86
86: ; preds = %125, %75
%87 = load i32, i32* %5
%88 = load i32, i32* %4
%89 = mul nsw i32 %88, 2
%90 = icmp slt i32 %87, %89
br i1 %90, label %91, label %128
91: ; preds = %86
%92 = load i32, i32* @stderr
%93 = load i32, i32* %5
%94 = load double*, double** %10
%95 = load i32, i32* %5
%96 = mul nsw i32 %95, 2
%97 = sext i32 %96 to i64
%98 = getelementptr inbounds double, double* %94, i64 %97
%99 = load double, double* %98
%100 = fneg double %99
%101 = load double*, double** %10
%102 = load i32, i32* %5
%103 = mul nsw i32 %102, 2
%104 = add nsw i32 %103, 1
%105 = sext i32 %104 to i64
%106 = getelementptr inbounds double, double* %101, i64 %105
%107 = load double, double* %106
%108 = fneg double %107
%109 = load double*, double** %11
%110 = load i32, i32* %5
%111 = mul nsw i32 %110, 2
%112 = sext i32 %111 to i64
%113 = getelementptr inbounds double, double* %109, i64 %112
%114 = load double, double* %113
%115 = fneg double %114
%116 = load double*, double** %11
%117 = load i32, i32* %5
%118 = mul nsw i32 %117, 2
%119 = add nsw i32 %118, 1
%120 = sext i32 %119 to i64
%121 = getelementptr inbounds double, double* %116, i64 %120
%122 = load double, double* %121
%123 = fneg double %122
%124 = call i32 (i32, i8*, ...) @fprintf(i32 %92, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.4, i64 0, i64 0), i32 %93, double 0.000000e+00, double 0.000000e+00, double %100, double %108, double %115, double %123)
br label %125
125: ; preds = %91
%126 = load i32, i32* %5
%127 = add nsw i32 %126, 1
store i32 %127, i32* %5
br label %86
128: ; preds = %86
ret void
}

LLVM IR (-O2):
@.str = [1 x i8] zeroinitializer
@stdin = global i32 0
@.str.1 = [23 x i8] c"%*lf %*lf %*lf %lf %lf\00"
@stderr = global i32 0
@.str.2 = [17 x i8] c"read error data\0A\00"
@.str.3 = [4 x i8] c"%i\0A\00"
@.str.4 = [46 x i8] c"%i %15.7e %15.7e\09%15.7e %15.7e\09%15.7e %15.7e\0A\00"
define void @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca double*
%4 = alloca double*
%5 = alloca double*
%6 = alloca double*
%7 = alloca double*
%8 = alloca double*
%9 = alloca double
%10 = alloca double
%11 = bitcast i32* %1 to i8*
%12 = bitcast i32* %2 to i8*
%13 = bitcast double** %3 to i8*
%14 = bitcast double** %4 to i8*
%15 = bitcast double** %5 to i8*
%16 = bitcast double** %6 to i8*
%17 = bitcast double** %7 to i8*
%18 = bitcast double** %8 to i8*
%19 = bitcast double* %9 to i8*
%20 = bitcast double* %10 to i8*
store double 1.000000e+00, double* %9
store double -1.000000e+00, double* %10
store i32 63, i32* %1
store i32 64, i32* %2
%21 = call i32 @hc_dvecalloc(double** %5, i32 4160, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%22 = call i32 @hc_dvecalloc(double** %6, i32 4160, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%23 = call i32 @hc_dvecalloc(double** %3, i32 8192, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%24 = call i32 @hc_dvecalloc(double** %4, i32 8192, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%25 = call i32 @hc_dvecalloc(double** %7, i32 64, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%26 = call i32 @hc_dvecalloc(double** %8, i32 8192, i8* getelementptr inbounds ([1 x i8], [1 x i8]* @.str, i64 0, i64 0))
%27 = load double*, double** %7
%28 = load double*, double** %8
%29 = call i32 @gauleg_(double* %10, double* %9, double* %27, double* %28, i32* %2)
%30 = load i32, i32* %2
%31 = icmp sgt i32 %30, 0
br i1 %31, label %37, label %51
32: ; preds = %37
%33 = load i32, i32* %2
%34 = shl nsw i32 %33, 7
%35 = sext i32 %34 to i64
%36 = icmp slt i64 %46, %35
br i1 %36, label %37, label %51
37: ; preds = %0, %32
%38 = phi i64 [ %46, %32 ], [ 0, %0 ]
%39 = load i32, i32* @stdin
%40 = load double*, double** %4
%41 = getelementptr inbounds double, double* %40, i64 %38
%42 = load double*, double** %3
%43 = getelementptr inbounds double, double* %42, i64 %38
%44 = call i32 @fscanf(i32 %39, i8* getelementptr inbounds ([23 x i8], [23 x i8]* @.str.1, i64 0, i64 0), double* %41, double* %43)
%45 = icmp eq i32 %44, 2
%46 = add nuw nsw i64 %38, 1
br i1 %45, label %32, label %47
47: ; preds = %37
%48 = load i32, i32* @stderr
%49 = call i32 (i32, i8*, ...) @fprintf(i32 %48, i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0))
%50 = call i32 @exit(i32 -1)
unreachable
51: ; preds = %32, %0
%52 = load double*, double** %7
%53 = load double*, double** %8
%54 = load double*, double** %5
%55 = load double*, double** %6
%56 = load double*, double** %3
%57 = load double*, double** %4
%58 = call i32 @vshd2c_(i32* %1, double* %52, double* %53, double* %54, double* %55, i32* %1, double* %56, double* %57)
%59 = load i32, i32* @stderr
%60 = load i32, i32* %1
%61 = call i32 (i32, i8*, ...) @fprintf(i32 %59, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.3, i64 0, i64 0), i32 %60)
br label %62
62: ; preds = %51, %62
%63 = phi i64 [ 0, %51 ], [ %83, %62 ]
%64 = load i32, i32* @stderr
%65 = load double*, double** %5
%66 = shl nuw nsw i64 %63, 1
%67 = getelementptr inbounds double, double* %65, i64 %66
%68 = load double, double* %67
%69 = fneg double %68
%70 = or i64 %66, 1
%71 = getelementptr inbounds double, double* %65, i64 %70
%72 = load double, double* %71
%73 = fneg double %72
%74 = load double*, double** %6
%75 = getelementptr inbounds double, double* %74, i64 %66
%76 = load double, double* %75
%77 = fneg double %76
%78 = getelementptr inbounds double, double* %74, i64 %70
%79 = load double, double* %78
%80 = fneg double %79
%81 = trunc i64 %63 to i32
%82 = call i32 (i32, i8*, ...) @fprintf(i32 %64, i8* getelementptr inbounds ([46 x i8], [46 x i8]* @.str.4, i64 0, i64 0), i32 %81, double 0.000000e+00, double 0.000000e+00, double %69, double %73, double %77, double %80)
%83 = add nuw nsw i64 %63, 1
%84 = icmp eq i64 %83, 4160
br i1 %84, label %85, label %62
85: ; preds = %62
ret void
}