#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 */
typedef int /*<<< orphan*/ FILE;

/* Variables and functions */
int /*<<< orphan*/ fclose(int /*<<< orphan*/ *);
int /*<<< orphan*/ *fopen(char const *, char *);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/ *, char *, ...);
int txtarray_write4(const char *filename, const char *header, int m,
                    double *data1, int n1, double *data2, int n2, double *data3,
                    int n3, double *data4, int n4) {
  FILE *fp;
  int i, j;
  double *x, *y, *z, *w;
  fp = fopen(filename, "w");
  if (fp == NULL) {
    return -1;
  }
  fprintf(fp, "# %d %d %d %d %d\n", m, n1, n2, n3, n4);
  if (header != NULL)
    fprintf(fp, "# %s\n", header);
  else
    fprintf(fp, "# header\n");
  for (i = 0; i < m; i++) {
    x = &data1[n1 * i];
    for (j = 0; j < n1; j++) {
      fprintf(fp, " %0.12e", x[j]);
    }
    y = &data2[n2 * i];
    for (j = 0; j < n2; j++) {
      fprintf(fp, " %0.12e", y[j]);
    }
    z = &data3[n3 * i];
    for (j = 0; j < n3; j++) {
      fprintf(fp, " %0.12e", z[j]);
    }
    w = &data4[n4 * i];
    for (j = 0; j < n4; j++) {
      fprintf(fp, " %0.12e", w[j]);
    }
    fprintf(fp, "\n");
  }
  fclose(fp);
  return 0;
}


x86 assembly (clang, -O0):
<txtarray_write4>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    0x30(%rbp),%eax
mov    0x28(%rbp),%rax
mov    0x20(%rbp),%eax
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%eax
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8d,-0x2c(%rbp)
mov    %r9,-0x38(%rbp)
mov    -0x10(%rbp),%rdi
lea    0xe95(%rip),%rsi
call   1050 <fopen@plt>
mov    %rax,-0x40(%rbp)
cmpq   $0x0,-0x40(%rbp)
jne    118b <txtarray_write4+0x5b>
movl   $0xffffffff,-0x4(%rbp)
jmp    1390 <txtarray_write4+0x260>
mov    -0x40(%rbp),%rdi
mov    -0x1c(%rbp),%edx
mov    -0x2c(%rbp),%ecx
mov    0x10(%rbp),%r8d
mov    0x20(%rbp),%r9d
mov    0x30(%rbp),%eax
lea    0xe5b(%rip),%rsi
mov    %eax,(%rsp)
mov    $0x0,%al
call   1040 <fprintf@plt>
cmpq   $0x0,-0x18(%rbp)
je     11d7 <txtarray_write4+0xa7>
mov    -0x40(%rbp),%rdi
mov    -0x18(%rbp),%rdx
lea    0xe49(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
jmp    11e9 <txtarray_write4+0xb9>
mov    -0x40(%rbp),%rdi
lea    0xe38(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
movl   $0x0,-0x44(%rbp)
mov    -0x44(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1380 <txtarray_write4+0x250>
mov    -0x28(%rbp),%rax
mov    -0x2c(%rbp),%ecx
imul   -0x44(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x50(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jge    1255 <txtarray_write4+0x125>
mov    -0x40(%rbp),%rdi
mov    -0x50(%rbp),%rax
movslq -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xde4(%rip),%rsi
mov    $0x1,%al
call   1040 <fprintf@plt>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    121c <txtarray_write4+0xec>
mov    -0x38(%rbp),%rax
mov    0x10(%rbp),%ecx
imul   -0x44(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x58(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    0x10(%rbp),%eax
jge    12ae <txtarray_write4+0x17e>
mov    -0x40(%rbp),%rdi
mov    -0x58(%rbp),%rax
movslq -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xd8b(%rip),%rsi
mov    $0x1,%al
call   1040 <fprintf@plt>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    1275 <txtarray_write4+0x145>
mov    0x18(%rbp),%rax
mov    0x20(%rbp),%ecx
imul   -0x44(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x60(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    0x20(%rbp),%eax
jge    1307 <txtarray_write4+0x1d7>
mov    -0x40(%rbp),%rdi
mov    -0x60(%rbp),%rax
movslq -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xd32(%rip),%rsi
mov    $0x1,%al
call   1040 <fprintf@plt>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    12ce <txtarray_write4+0x19e>
mov    0x28(%rbp),%rax
mov    0x30(%rbp),%ecx
imul   -0x44(%rbp),%ecx
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x68(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x48(%rbp),%eax
cmp    0x30(%rbp),%eax
jge    1360 <txtarray_write4+0x230>
mov    -0x40(%rbp),%rdi
mov    -0x68(%rbp),%rax
movslq -0x48(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
lea    0xcd9(%rip),%rsi
mov    $0x1,%al
call   1040 <fprintf@plt>
mov    -0x48(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x48(%rbp)
jmp    1327 <txtarray_write4+0x1f7>
mov    -0x40(%rbp),%rdi
lea    0xca7(%rip),%rsi
mov    $0x0,%al
call   1040 <fprintf@plt>
mov    -0x44(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
jmp    11f0 <txtarray_write4+0xc0>
mov    -0x40(%rbp),%rdi
call   1030 <fclose@plt>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<txtarray_write4>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x88,%rsp
mov    %r9,%rbp
mov    %r8d,%ebx
mov    %rcx,%r15
mov    %edx,%r13d
mov    %rsi,%r12
lea    0xe89(%rip),%rsi
call   1060 <fopen@plt>
test   %rax,%rax
je     11e0 <txtarray_write4+0x90>
mov    %rax,%r14
mov    0xe0(%rsp),%eax
mov    0xd0(%rsp),%r9d
mov    0xc0(%rsp),%r8d
mov    %eax,(%rsp)
lea    0xe5d(%rip),%rsi
mov    %r14,%rdi
mov    %r13d,%edx
mov    %ebx,%ecx
xor    %eax,%eax
call   1050 <fprintf@plt>
test   %r12,%r12
mov    %ebx,0x14(%rsp)
mov    %r15,0x18(%rsp)
je     11ea <txtarray_write4+0x9a>
lea    0xe4b(%rip),%rsi
mov    %r14,%rdi
mov    %r12,%rdx
xor    %eax,%eax
call   1050 <fprintf@plt>
test   %r13d,%r13d
jg     120c <txtarray_write4+0xbc>
jmp    13f0 <txtarray_write4+0x2a0>
mov    $0xffffffff,%eax
jmp    13fa <txtarray_write4+0x2aa>
lea    0xe29(%rip),%rdi
mov    $0x9,%esi
mov    $0x1,%edx
mov    %r14,%rcx
call   1070 <fwrite@plt>
test   %r13d,%r13d
jle    13f0 <txtarray_write4+0x2a0>
mov    0xd8(%rsp),%rbx
mov    %r13d,%esi
mov    0xc8(%rsp),%r13
mov    0x14(%rsp),%eax
movslq %eax,%rdi
mov    0xc0(%rsp),%r10d
movslq %r10d,%rdx
mov    0xd0(%rsp),%r8d
movslq %r8d,%r11
mov    0xe0(%rsp),%r9d
movslq %r9d,%rcx
mov    %esi,%esi
mov    %rsi,0x48(%rsp)
mov    %eax,%eax
mov    %rax,0x40(%rsp)
mov    %r10d,%eax
mov    %rax,0x38(%rsp)
mov    %r8d,%eax
mov    %rax,0x30(%rsp)
mov    %r9d,%r15d
shl    $0x3,%rdi
mov    %rdi,0x68(%rsp)
shl    $0x3,%rdx
mov    %rdx,0x60(%rsp)
shl    $0x3,%r11
mov    %r11,0x58(%rsp)
shl    $0x3,%rcx
mov    %rcx,0x50(%rsp)
xor    %ecx,%ecx
lea    0xd8f(%rip),%r12
mov    %r15,0x28(%rsp)
jmp    12df <txtarray_write4+0x18f>
nopl   0x0(%rax)
mov    $0xa,%edi
mov    %r14,%rsi
call   1040 <fputc@plt>
mov    0x70(%rsp),%rcx
add    $0x1,%rcx
mov    0x68(%rsp),%rax
add    %rax,0x18(%rsp)
mov    0x20(%rsp),%rbp
add    0x60(%rsp),%rbp
add    0x58(%rsp),%r13
add    0x50(%rsp),%rbx
cmp    0x48(%rsp),%rcx
je     13f0 <txtarray_write4+0x2a0>
mov    %rcx,0x70(%rsp)
mov    %r13,0x78(%rsp)
mov    %rbx,0x80(%rsp)
mov    %rbp,0x20(%rsp)
cmpl   $0x0,0x14(%rsp)
mov    0x18(%rsp),%rbp
mov    0x40(%rsp),%r13
jle    132d <txtarray_write4+0x1dd>
xor    %r15d,%r15d
nopw   0x0(%rax,%rax,1)
movsd  0x0(%rbp,%r15,8),%xmm0
mov    %r14,%rdi
mov    %r12,%rsi
mov    $0x1,%al
call   1050 <fprintf@plt>
add    $0x1,%r15
cmp    %r15,%r13
jne    1310 <txtarray_write4+0x1c0>
cmpl   $0x0,0xc0(%rsp)
mov    0x20(%rsp),%r15
mov    0x38(%rsp),%rbx
jle    136c <txtarray_write4+0x21c>
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%r15,%rbp,8),%xmm0
mov    %r14,%rdi
mov    %r12,%rsi
mov    $0x1,%al
call   1050 <fprintf@plt>
add    $0x1,%rbp
cmp    %rbp,%rbx
jne    1350 <txtarray_write4+0x200>
cmpl   $0x0,0xd0(%rsp)
mov    0x80(%rsp),%rbx
mov    0x78(%rsp),%r13
mov    0x30(%rsp),%r15
jle    13ad <txtarray_write4+0x25d>
xor    %ebp,%ebp
nopw   0x0(%rax,%rax,1)
movsd  0x0(%r13,%rbp,8),%xmm0
mov    %r14,%rdi
mov    %r12,%rsi
mov    $0x1,%al
call   1050 <fprintf@plt>
add    $0x1,%rbp
cmp    %rbp,%r15
jne    1390 <txtarray_write4+0x240>
cmpl   $0x0,0xe0(%rsp)
mov    0x28(%rsp),%r15
jle    12a0 <txtarray_write4+0x150>
xor    %ebp,%ebp
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movsd  (%rbx,%rbp,8),%xmm0
mov    %r14,%rdi
mov    %r12,%rsi
mov    $0x1,%al
call   1050 <fprintf@plt>
add    $0x1,%rbp
cmp    %rbp,%r15
jne    13d0 <txtarray_write4+0x280>
jmp    12a0 <txtarray_write4+0x150>
mov    %r14,%rdi
call   1030 <fclose@plt>
xor    %eax,%eax
add    $0x88,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [2 x i8] c"w\00"
@.str.1 = [18 x i8] c"# %d %d %d %d %d\0A\00"
@.str.2 = [6 x i8] c"# %s\0A\00"
@.str.3 = [10 x i8] c"# header\0A\00"
@.str.4 = [8 x i8] c" %0.12e\00"
@.str.5 = [2 x i8] c"\0A\00"
define i32 @txtarray_write4(i8* %0, i8* %1, i32 %2, double* %3, i32 %4, double* %5, i32 %6, double* %7, i32 %8, double* %9, i32 %10) {
%12 = alloca i32
%13 = alloca i8*
%14 = alloca i8*
%15 = alloca i32
%16 = alloca double*
%17 = alloca i32
%18 = alloca double*
%19 = alloca i32
%20 = alloca double*
%21 = alloca i32
%22 = alloca double*
%23 = alloca i32
%24 = alloca i32*
%25 = alloca i32
%26 = alloca i32
%27 = alloca double*
%28 = alloca double*
%29 = alloca double*
%30 = alloca double*
store i8* %0, i8** %13
store i8* %1, i8** %14
store i32 %2, i32* %15
store double* %3, double** %16
store i32 %4, i32* %17
store double* %5, double** %18
store i32 %6, i32* %19
store double* %7, double** %20
store i32 %8, i32* %21
store double* %9, double** %22
store i32 %10, i32* %23
%31 = load i8*, i8** %13
%32 = call i32* @fopen(i8* %31, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str, i64 0, i64 0))
store i32* %32, i32** %24
%33 = load i32*, i32** %24
%34 = icmp eq i32* %33, null
br i1 %34, label %35, label %36
35: ; preds = %11
store i32 -1, i32* %12
br label %155
36: ; preds = %11
%37 = load i32*, i32** %24
%38 = load i32, i32* %15
%39 = load i32, i32* %17
%40 = load i32, i32* %19
%41 = load i32, i32* %21
%42 = load i32, i32* %23
%43 = call i32 (i32*, i8*, ...) @fprintf(i32* %37, i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str.1, i64 0, i64 0), i32 %38, i32 %39, i32 %40, i32 %41, i32 %42)
%44 = load i8*, i8** %14
%45 = icmp ne i8* %44, null
br i1 %45, label %46, label %50
46: ; preds = %36
%47 = load i32*, i32** %24
%48 = load i8*, i8** %14
%49 = call i32 (i32*, i8*, ...) @fprintf(i32* %47, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), i8* %48)
br label %53
50: ; preds = %36
%51 = load i32*, i32** %24
%52 = call i32 (i32*, i8*, ...) @fprintf(i32* %51, i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str.3, i64 0, i64 0))
br label %53
53: ; preds = %50, %46
store i32 0, i32* %25
br label %54
54: ; preds = %149, %53
%55 = load i32, i32* %25
%56 = load i32, i32* %15
%57 = icmp slt i32 %55, %56
br i1 %57, label %58, label %152
58: ; preds = %54
%59 = load double*, double** %16
%60 = load i32, i32* %17
%61 = load i32, i32* %25
%62 = mul nsw i32 %60, %61
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds double, double* %59, i64 %63
store double* %64, double** %27
store i32 0, i32* %26
br label %65
65: ; preds = %77, %58
%66 = load i32, i32* %26
%67 = load i32, i32* %17
%68 = icmp slt i32 %66, %67
br i1 %68, label %69, label %80
69: ; preds = %65
%70 = load i32*, i32** %24
%71 = load double*, double** %27
%72 = load i32, i32* %26
%73 = sext i32 %72 to i64
%74 = getelementptr inbounds double, double* %71, i64 %73
%75 = load double, double* %74
%76 = call i32 (i32*, i8*, ...) @fprintf(i32* %70, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %75)
br label %77
77: ; preds = %69
%78 = load i32, i32* %26
%79 = add nsw i32 %78, 1
store i32 %79, i32* %26
br label %65
80: ; preds = %65
%81 = load double*, double** %18
%82 = load i32, i32* %19
%83 = load i32, i32* %25
%84 = mul nsw i32 %82, %83
%85 = sext i32 %84 to i64
%86 = getelementptr inbounds double, double* %81, i64 %85
store double* %86, double** %28
store i32 0, i32* %26
br label %87
87: ; preds = %99, %80
%88 = load i32, i32* %26
%89 = load i32, i32* %19
%90 = icmp slt i32 %88, %89
br i1 %90, label %91, label %102
91: ; preds = %87
%92 = load i32*, i32** %24
%93 = load double*, double** %28
%94 = load i32, i32* %26
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds double, double* %93, i64 %95
%97 = load double, double* %96
%98 = call i32 (i32*, i8*, ...) @fprintf(i32* %92, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %97)
br label %99
99: ; preds = %91
%100 = load i32, i32* %26
%101 = add nsw i32 %100, 1
store i32 %101, i32* %26
br label %87
102: ; preds = %87
%103 = load double*, double** %20
%104 = load i32, i32* %21
%105 = load i32, i32* %25
%106 = mul nsw i32 %104, %105
%107 = sext i32 %106 to i64
%108 = getelementptr inbounds double, double* %103, i64 %107
store double* %108, double** %29
store i32 0, i32* %26
br label %109
109: ; preds = %121, %102
%110 = load i32, i32* %26
%111 = load i32, i32* %21
%112 = icmp slt i32 %110, %111
br i1 %112, label %113, label %124
113: ; preds = %109
%114 = load i32*, i32** %24
%115 = load double*, double** %29
%116 = load i32, i32* %26
%117 = sext i32 %116 to i64
%118 = getelementptr inbounds double, double* %115, i64 %117
%119 = load double, double* %118
%120 = call i32 (i32*, i8*, ...) @fprintf(i32* %114, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %119)
br label %121
121: ; preds = %113
%122 = load i32, i32* %26
%123 = add nsw i32 %122, 1
store i32 %123, i32* %26
br label %109
124: ; preds = %109
%125 = load double*, double** %22
%126 = load i32, i32* %23
%127 = load i32, i32* %25
%128 = mul nsw i32 %126, %127
%129 = sext i32 %128 to i64
%130 = getelementptr inbounds double, double* %125, i64 %129
store double* %130, double** %30
store i32 0, i32* %26
br label %131
131: ; preds = %143, %124
%132 = load i32, i32* %26
%133 = load i32, i32* %23
%134 = icmp slt i32 %132, %133
br i1 %134, label %135, label %146
135: ; preds = %131
%136 = load i32*, i32** %24
%137 = load double*, double** %30
%138 = load i32, i32* %26
%139 = sext i32 %138 to i64
%140 = getelementptr inbounds double, double* %137, i64 %139
%141 = load double, double* %140
%142 = call i32 (i32*, i8*, ...) @fprintf(i32* %136, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %141)
br label %143
143: ; preds = %135
%144 = load i32, i32* %26
%145 = add nsw i32 %144, 1
store i32 %145, i32* %26
br label %131
146: ; preds = %131
%147 = load i32*, i32** %24
%148 = call i32 (i32*, i8*, ...) @fprintf(i32* %147, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.5, i64 0, i64 0))
br label %149
149: ; preds = %146
%150 = load i32, i32* %25
%151 = add nsw i32 %150, 1
store i32 %151, i32* %25
br label %54
152: ; preds = %54
%153 = load i32*, i32** %24
%154 = call i32 @fclose(i32* %153)
store i32 0, i32* %12
br label %155
155: ; preds = %152, %35
%156 = load i32, i32* %12
ret i32 %156
}

LLVM IR (-O2):
@.str = [2 x i8] c"w\00"
@.str.1 = [18 x i8] c"# %d %d %d %d %d\0A\00"
@.str.2 = [6 x i8] c"# %s\0A\00"
@.str.3 = [10 x i8] c"# header\0A\00"
@.str.4 = [8 x i8] c" %0.12e\00"
define i32 @txtarray_write4(i8* nocapture %0, i8* %1, i32 %2, double* nocapture %3, i32 %4, double* nocapture %5, i32 %6, double* nocapture %7, i32 %8, double* nocapture %9, i32 %10) {
%12 = tail call i32* @fopen(i8* %0, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str, i64 0, i64 0))
%13 = icmp eq i32* %12, null
br i1 %13, label %84, label %14
14: ; preds = %11
%15 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str.1, i64 0, i64 0), i32 %2, i32 %4, i32 %6, i32 %8, i32 %10)
%16 = icmp eq i8* %1, null
br i1 %16, label %19, label %17
17: ; preds = %14
%18 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.2, i64 0, i64 0), i8* %1)
br label %21
19: ; preds = %14
%20 = tail call i64 @fwrite(i8* getelementptr inbounds ([10 x i8], [10 x i8]* @.str.3, i64 0, i64 0), i64 9, i64 1, i32* %12)
br label %21
21: ; preds = %19, %17
%22 = icmp sgt i32 %2, 0
br i1 %22, label %23, label %82
23: ; preds = %21
%24 = icmp sgt i32 %4, 0
%25 = icmp sgt i32 %6, 0
%26 = icmp sgt i32 %8, 0
%27 = icmp sgt i32 %10, 0
%28 = sext i32 %4 to i64
%29 = sext i32 %6 to i64
%30 = sext i32 %8 to i64
%31 = sext i32 %10 to i64
%32 = zext i32 %2 to i64
%33 = zext i32 %4 to i64
%34 = zext i32 %6 to i64
%35 = zext i32 %8 to i64
%36 = zext i32 %10 to i64
br label %37
37: ; preds = %23, %78
%38 = phi i64 [ 0, %23 ], [ %80, %78 ]
%39 = mul nsw i64 %38, %28
%40 = getelementptr inbounds double, double* %3, i64 %39
br i1 %24, label %41, label %48
41: ; preds = %37, %41
%42 = phi i64 [ %46, %41 ], [ 0, %37 ]
%43 = getelementptr inbounds double, double* %40, i64 %42
%44 = load double, double* %43
%45 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %44)
%46 = add nuw nsw i64 %42, 1
%47 = icmp eq i64 %46, %33
br i1 %47, label %48, label %41
48: ; preds = %41, %37
%49 = mul nsw i64 %38, %29
%50 = getelementptr inbounds double, double* %5, i64 %49
br i1 %25, label %51, label %58
51: ; preds = %48, %51
%52 = phi i64 [ %56, %51 ], [ 0, %48 ]
%53 = getelementptr inbounds double, double* %50, i64 %52
%54 = load double, double* %53
%55 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %54)
%56 = add nuw nsw i64 %52, 1
%57 = icmp eq i64 %56, %34
br i1 %57, label %58, label %51
58: ; preds = %51, %48
%59 = mul nsw i64 %38, %30
%60 = getelementptr inbounds double, double* %7, i64 %59
br i1 %26, label %61, label %68
61: ; preds = %58, %61
%62 = phi i64 [ %66, %61 ], [ 0, %58 ]
%63 = getelementptr inbounds double, double* %60, i64 %62
%64 = load double, double* %63
%65 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %64)
%66 = add nuw nsw i64 %62, 1
%67 = icmp eq i64 %66, %35
br i1 %67, label %68, label %61
68: ; preds = %61, %58
%69 = mul nsw i64 %38, %31
%70 = getelementptr inbounds double, double* %9, i64 %69
br i1 %27, label %71, label %78
71: ; preds = %68, %71
%72 = phi i64 [ %76, %71 ], [ 0, %68 ]
%73 = getelementptr inbounds double, double* %70, i64 %72
%74 = load double, double* %73
%75 = tail call i32 (i32*, i8*, ...) @fprintf(i32* %12, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.4, i64 0, i64 0), double %74)
%76 = add nuw nsw i64 %72, 1
%77 = icmp eq i64 %76, %36
br i1 %77, label %78, label %71
78: ; preds = %71, %68
%79 = tail call i32 @fputc(i32 10, i32* %12)
%80 = add nuw nsw i64 %38, 1
%81 = icmp eq i64 %80, %32
br i1 %81, label %82, label %37
82: ; preds = %78, %21
%83 = tail call i32 @fclose(i32* %12)
br label %84
84: ; preds = %11, %82
%85 = phi i32 [ 0, %82 ], [ -1, %11 ]
ret i32 %85
}