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

/* Variables and functions */
int /*<<< orphan*/ fclose(int /*<<< orphan*/ *);
int /*<<< orphan*/ *fopen(char *, char *);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/ *, char *, ...);
int /*<<< orphan*/ snprintf(char *, int, char *, int, char *);
void dump_array(int step_count, char *name, int N, float scale, float *d) {
  int i, j;
  char str[256];
  float max = 0;
  for (j = 1; j < N + 1; j++) {
    for (i = 1; i < N + 1; i++) {
      float d00 = d[((i) + (N + 2) * (j))] * 255 * scale;
      if (d00 >= max)
        max = d00;
    }
  }
  snprintf(str, 256, "out/%04d-%s.ppm", step_count, name);
  FILE *file = fopen(str, "w+");
  fprintf(file, "P2\n");
  fprintf(file, "%d %d\n", N, N);
  fprintf(file, "%d\n", (int)max);
  for (j = N; j >= 1; j--) {
    for (i = 1; i < N + 1; i++) {
      float d00 = d[((i) + (N + 2) * (j))] * 255 * scale;
      fprintf(file, "% 4d ", (int)d00);
    }
    fprintf(file, "\n");
  }
  fclose(file);
}


x86 assembly (clang, -O0):
<dump_array>:
push   %rbp
mov    %rsp,%rbp
sub    $0x150,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
movss  %xmm0,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x134(%rbp)
ff
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jge    1214 <dump_array+0xd4>
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jge    1201 <dump_array+0xc1>
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x14(%rbp),%edx
add    $0x2,%edx
imul   -0x28(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movss  0xe49(%rip),%xmm0
mulss  (%rax,%rcx,4),%xmm0
mulss  -0x18(%rbp),%xmm0
movss  %xmm0,-0x138(%rbp)
ff
movss  -0x138(%rbp),%xmm0
ff
ucomiss -0x134(%rbp),%xmm0
jb     11ee <dump_array+0xae>
movss  -0x138(%rbp),%xmm0
ff
movss  %xmm0,-0x134(%rbp)
ff
jmp    11f3 <dump_array+0xb3>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1188 <dump_array+0x48>
jmp    1206 <dump_array+0xc6>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1170 <dump_array+0x30>
lea    -0x130(%rbp),%rdi
mov    -0x4(%rbp),%ecx
mov    -0x10(%rbp),%r8
mov    $0x100,%esi
lea    0xdd6(%rip),%rdx
call   1040 <snprintf@plt>
lea    -0x130(%rbp),%rdi
lea    0xdd3(%rip),%rsi
call   1060 <fopen@plt>
mov    %rax,-0x140(%rbp)
mov    -0x140(%rbp),%rdi
lea    0xdbc(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    -0x140(%rbp),%rdi
mov    -0x14(%rbp),%edx
mov    -0x14(%rbp),%ecx
lea    0xda5(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    -0x140(%rbp),%rdi
cvttss2si -0x134(%rbp),%edx
ff
lea    0xd8b(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    -0x14(%rbp),%eax
mov    %eax,-0x28(%rbp)
cmpl   $0x1,-0x28(%rbp)
jl     1340 <dump_array+0x200>
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x14(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jge    131d <dump_array+0x1dd>
mov    -0x20(%rbp),%rax
mov    -0x24(%rbp),%ecx
mov    -0x14(%rbp),%edx
add    $0x2,%edx
imul   -0x28(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movss  0xd20(%rip),%xmm0
mulss  (%rax,%rcx,4),%xmm0
mulss  -0x18(%rbp),%xmm0
movss  %xmm0,-0x144(%rbp)
ff
mov    -0x140(%rbp),%rdi
cvttss2si -0x144(%rbp),%edx
lea    0xd1a(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    12b1 <dump_array+0x171>
mov    -0x140(%rbp),%rdi
lea    0xcee(%rip),%rsi
mov    $0x0,%al
call   1050 <fprintf@plt>
mov    -0x28(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x28(%rbp)
jmp    12a0 <dump_array+0x160>
mov    -0x140(%rbp),%rdi
call   1030 <fclose@plt>
add    $0x150,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dump_array>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x118,%rsp
mov    %rcx,%r14
mov    %edx,%r15d
mov    %rsi,%r8
mov    %edi,%ecx
mov    %edx,%r12d
test   %edx,%edx
movss  %xmm0,0x4(%rsp)
jle    127f <dump_array+0x11f>
lea    0x2(%r12),%r9
lea    0x1(%r12),%rdx
lea    (%r14,%r12,4),%rsi
add    $0xc,%rsi
lea    0x8(,%r12,4),%r10
mov    %r12d,%ebp
and    $0xfffffffe,%ebp
neg    %rbp
xorps  %xmm1,%xmm1
mov    $0x1,%ebx
movss  0xe40(%rip),%xmm5
jmp    11e0 <dump_array+0x80>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x1,%rbx
add    %r10,%rsi
cmp    %rdx,%rbx
je     1279 <dump_array+0x119>
mov    $0x1,%eax
cmp    $0x2,%edx
je     1242 <dump_array+0xe2>
nopw   0x0(%rax,%rax,1)
movss  -0x4(%rsi,%rax,4),%xmm2
mulss  %xmm5,%xmm2
mulss  %xmm0,%xmm2
movaps %xmm1,%xmm3
cmpless %xmm2,%xmm3
andps  %xmm3,%xmm2
andnps %xmm1,%xmm3
orps   %xmm2,%xmm3
movss  (%rsi,%rax,4),%xmm2
mulss  %xmm5,%xmm2
mulss  %xmm0,%xmm2
movaps %xmm3,%xmm1
cmpless %xmm2,%xmm1
movaps %xmm1,%xmm4
andnps %xmm3,%xmm4
andps  %xmm2,%xmm1
orps   %xmm4,%xmm1
lea    (%rax,%rbp,1),%rdi
add    $0x2,%rdi
add    $0x2,%rax
cmp    $0x1,%rdi
jne    11f0 <dump_array+0x90>
test   $0x1,%r12b
je     11d0 <dump_array+0x70>
mov    %rbx,%rdi
imul   %r9,%rdi
add    %rdi,%rax
movss  (%r14,%rax,4),%xmm2
mulss  %xmm5,%xmm2
mulss  %xmm0,%xmm2
movaps %xmm1,%xmm3
cmpless %xmm2,%xmm3
andps  %xmm3,%xmm2
andnps %xmm1,%xmm3
orps   %xmm2,%xmm3
movaps %xmm3,%xmm1
jmp    11d0 <dump_array+0x70>
cvttss2si %xmm1,%ebp
jmp    1281 <dump_array+0x121>
xor    %ebp,%ebp
lea    0xd7c(%rip),%rdx
lea    0x10(%rsp),%rbx
mov    %rbx,%rdi
mov    $0x100,%esi
call   1040 <snprintf@plt>
lea    0xd73(%rip),%rsi
mov    %rbx,%rdi
call   1070 <fopen@plt>
mov    %rax,%rbx
lea    0xd64(%rip),%rdi
mov    $0x3,%esi
mov    $0x1,%edx
mov    %rax,%rcx
call   1080 <fwrite@plt>
lea    0xd4f(%rip),%rsi
mov    %rbx,%rdi
mov    %r15d,%edx
mov    %r15d,%ecx
xor    %eax,%eax
call   1060 <fprintf@plt>
lea    0xd3b(%rip),%rsi
mov    %rbx,%rdi
mov    %ebp,%edx
xor    %eax,%eax
call   1060 <fprintf@plt>
test   %r15d,%r15d
jle    137f <dump_array+0x21f>
lea    0x2(%r12),%rax
add    $0x1,%r15d
imul   %r12,%rax
lea    (%r14,%rax,4),%rbp
lea    0x8(,%r12,4),%rax
neg    %rax
mov    %rax,0x8(%rsp)
lea    0xd02(%rip),%r14
mov    $0x1,%r13d
cs nopw 0x0(%rax,%rax,1)
movss  0x0(%rbp,%r13,4),%xmm0
mulss  0xcc1(%rip),%xmm0
mulss  0x4(%rsp),%xmm0
cvttss2si %xmm0,%edx
mov    %rbx,%rdi
mov    %r14,%rsi
xor    %eax,%eax
call   1060 <fprintf@plt>
add    $0x1,%r13
cmp    %r13,%r15
jne    1330 <dump_array+0x1d0>
mov    $0xa,%edi
mov    %rbx,%rsi
call   1050 <fputc@plt>
lea    -0x1(%r12),%rax
add    0x8(%rsp),%rbp
cmp    $0x1,%r12
mov    %rax,%r12
jg     1320 <dump_array+0x1c0>
mov    %rbx,%rdi
call   1030 <fclose@plt>
add    $0x118,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [16 x i8] c"out/%04d-%s.ppm\00"
@.str.1 = [3 x i8] c"w+\00"
@.str.2 = [4 x i8] c"P2\0A\00"
@.str.3 = [7 x i8] c"%d %d\0A\00"
@.str.4 = [4 x i8] c"%d\0A\00"
@.str.5 = [6 x i8] c"% 4d \00"
@.str.6 = [2 x i8] c"\0A\00"
define void @dump_array(i32 %0, i8* %1, i32 %2, float %3, float* %4) {
%6 = alloca i32
%7 = alloca i8*
%8 = alloca i32
%9 = alloca float
%10 = alloca float*
%11 = alloca i32
%12 = alloca i32
%13 = alloca [256 x i8]
%14 = alloca float
%15 = alloca float
%16 = alloca i32*
%17 = alloca float
store i32 %0, i32* %6
store i8* %1, i8** %7
store i32 %2, i32* %8
store float %3, float* %9
store float* %4, float** %10
store float 0.000000e+00, float* %14
store i32 1, i32* %12
br label %18
18: ; preds = %53, %5
%19 = load i32, i32* %12
%20 = load i32, i32* %8
%21 = add nsw i32 %20, 1
%22 = icmp slt i32 %19, %21
br i1 %22, label %23, label %56
23: ; preds = %18
store i32 1, i32* %11
br label %24
24: ; preds = %49, %23
%25 = load i32, i32* %11
%26 = load i32, i32* %8
%27 = add nsw i32 %26, 1
%28 = icmp slt i32 %25, %27
br i1 %28, label %29, label %52
29: ; preds = %24
%30 = load float*, float** %10
%31 = load i32, i32* %11
%32 = load i32, i32* %8
%33 = add nsw i32 %32, 2
%34 = load i32, i32* %12
%35 = mul nsw i32 %33, %34
%36 = add nsw i32 %31, %35
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds float, float* %30, i64 %37
%39 = load float, float* %38
%40 = fmul float %39, 2.550000e+02
%41 = load float, float* %9
%42 = fmul float %40, %41
store float %42, float* %15
%43 = load float, float* %15
%44 = load float, float* %14
%45 = fcmp oge float %43, %44
br i1 %45, label %46, label %48
46: ; preds = %29
%47 = load float, float* %15
store float %47, float* %14
br label %48
48: ; preds = %46, %29
br label %49
49: ; preds = %48
%50 = load i32, i32* %11
%51 = add nsw i32 %50, 1
store i32 %51, i32* %11
br label %24
52: ; preds = %24
br label %53
53: ; preds = %52
%54 = load i32, i32* %12
%55 = add nsw i32 %54, 1
store i32 %55, i32* %12
br label %18
56: ; preds = %18
%57 = getelementptr inbounds [256 x i8], [256 x i8]* %13, i64 0, i64 0
%58 = load i32, i32* %6
%59 = load i8*, i8** %7
%60 = call i32 @snprintf(i8* %57, i32 256, i8* getelementptr inbounds ([16 x i8], [16 x i8]* @.str, i64 0, i64 0), i32 %58, i8* %59)
%61 = getelementptr inbounds [256 x i8], [256 x i8]* %13, i64 0, i64 0
%62 = call i32* @fopen(i8* %61, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0))
store i32* %62, i32** %16
%63 = load i32*, i32** %16
%64 = call i32 (i32*, i8*, ...) @fprintf(i32* %63, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0))
%65 = load i32*, i32** %16
%66 = load i32, i32* %8
%67 = load i32, i32* %8
%68 = call i32 (i32*, i8*, ...) @fprintf(i32* %65, i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.3, i64 0, i64 0), i32 %66, i32 %67)
%69 = load i32*, i32** %16
%70 = load float, float* %14
%71 = fptosi float %70 to i32
%72 = call i32 (i32*, i8*, ...) @fprintf(i32* %69, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i32 %71)
%73 = load i32, i32* %8
store i32 %73, i32* %12
br label %74
74: ; preds = %107, %56
%75 = load i32, i32* %12
%76 = icmp sge i32 %75, 1
br i1 %76, label %77, label %110
77: ; preds = %74
store i32 1, i32* %11
br label %78
78: ; preds = %101, %77
%79 = load i32, i32* %11
%80 = load i32, i32* %8
%81 = add nsw i32 %80, 1
%82 = icmp slt i32 %79, %81
br i1 %82, label %83, label %104
83: ; preds = %78
%84 = load float*, float** %10
%85 = load i32, i32* %11
%86 = load i32, i32* %8
%87 = add nsw i32 %86, 2
%88 = load i32, i32* %12
%89 = mul nsw i32 %87, %88
%90 = add nsw i32 %85, %89
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds float, float* %84, i64 %91
%93 = load float, float* %92
%94 = fmul float %93, 2.550000e+02
%95 = load float, float* %9
%96 = fmul float %94, %95
store float %96, float* %17
%97 = load i32*, i32** %16
%98 = load float, float* %17
%99 = fptosi float %98 to i32
%100 = call i32 (i32*, i8*, ...) @fprintf(i32* %97, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.5, i64 0, i64 0), i32 %99)
br label %101
101: ; preds = %83
%102 = load i32, i32* %11
%103 = add nsw i32 %102, 1
store i32 %103, i32* %11
br label %78
104: ; preds = %78
%105 = load i32*, i32** %16
%106 = call i32 (i32*, i8*, ...) @fprintf(i32* %105, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.6, i64 0, i64 0))
br label %107
107: ; preds = %104
%108 = load i32, i32* %12
%109 = add nsw i32 %108, -1
store i32 %109, i32* %12
br label %74
110: ; preds = %74
%111 = load i32*, i32** %16
%112 = call i32 @fclose(i32* %111)
ret void
}

LLVM IR (-O2):
@.str = [16 x i8] c"out/%04d-%s.ppm\00"
@.str.1 = [3 x i8] c"w+\00"
@.str.2 = [4 x i8] c"P2\0A\00"
@.str.3 = [7 x i8] c"%d %d\0A\00"
@.str.4 = [4 x i8] c"%d\0A\00"
@.str.5 = [6 x i8] c"% 4d \00"
define void @dump_array(i32 %0, i8* %1, i32 %2, float %3, float* nocapture %4) {
%6 = alloca [256 x i8]
%7 = getelementptr inbounds [256 x i8], [256 x i8]* %6, i64 0, i64 0
%8 = icmp slt i32 %2, 1
br i1 %8, label %63, label %9
9: ; preds = %5
%10 = add nuw nsw i32 %2, 2
%11 = add nuw i32 %2, 1
%12 = zext i32 %10 to i64
%13 = zext i32 %11 to i64
%14 = add nsw i64 %13, -1
%15 = and i64 %14, 1
%16 = icmp eq i32 %11, 2
%17 = and i64 %14, -2
%18 = icmp eq i64 %15, 0
br label %19
19: ; preds = %57, %9
%20 = phi i64 [ 1, %9 ], [ %59, %57 ]
%21 = phi float [ 0.000000e+00, %9 ], [ %58, %57 ]
%22 = mul nsw i64 %20, %12
br i1 %16, label %45, label %23
23: ; preds = %19, %23
%24 = phi i64 [ %42, %23 ], [ 1, %19 ]
%25 = phi float [ %41, %23 ], [ %21, %19 ]
%26 = phi i64 [ %43, %23 ], [ 0, %19 ]
%27 = add nuw nsw i64 %24, %22
%28 = getelementptr inbounds float, float* %4, i64 %27
%29 = load float, float* %28
%30 = fmul float %29, 2.550000e+02
%31 = fmul float %30, %3
%32 = fcmp oge float %31, %25
%33 = select i1 %32, float %31, float %25
%34 = add nuw nsw i64 %24, 1
%35 = add nuw nsw i64 %34, %22
%36 = getelementptr inbounds float, float* %4, i64 %35
%37 = load float, float* %36
%38 = fmul float %37, 2.550000e+02
%39 = fmul float %38, %3
%40 = fcmp oge float %39, %33
%41 = select i1 %40, float %39, float %33
%42 = add nuw nsw i64 %24, 2
%43 = add i64 %26, 2
%44 = icmp eq i64 %43, %17
br i1 %44, label %45, label %23
45: ; preds = %23, %19
%46 = phi float [ undef, %19 ], [ %41, %23 ]
%47 = phi i64 [ 1, %19 ], [ %42, %23 ]
%48 = phi float [ %21, %19 ], [ %41, %23 ]
br i1 %18, label %57, label %49
49: ; preds = %45
%50 = add nuw nsw i64 %47, %22
%51 = getelementptr inbounds float, float* %4, i64 %50
%52 = load float, float* %51
%53 = fmul float %52, 2.550000e+02
%54 = fmul float %53, %3
%55 = fcmp oge float %54, %48
%56 = select i1 %55, float %54, float %48
br label %57
57: ; preds = %45, %49
%58 = phi float [ %46, %45 ], [ %56, %49 ]
%59 = add nuw nsw i64 %20, 1
%60 = icmp eq i64 %59, %13
br i1 %60, label %61, label %19
61: ; preds = %57
%62 = fptosi float %58 to i32
br label %63
63: ; preds = %61, %5
%64 = phi i32 [ 0, %5 ], [ %62, %61 ]
%65 = call i32 @snprintf(i8* %7, i32 256, i8* getelementptr inbounds ([16 x i8], [16 x i8]* @.str, i64 0, i64 0), i32 %0, i8* %1)
%66 = call i32* @fopen(i8* %7, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str.1, i64 0, i64 0))
%67 = call i64 @fwrite(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.2, i64 0, i64 0), i64 3, i64 1, i32* %66)
%68 = call i32 (i32*, i8*, ...) @fprintf(i32* %66, i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.3, i64 0, i64 0), i32 %2, i32 %2)
%69 = call i32 (i32*, i8*, ...) @fprintf(i32* %66, i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str.4, i64 0, i64 0), i32 %64)
%70 = icmp sgt i32 %2, 0
br i1 %70, label %71, label %95
71: ; preds = %63
%72 = add nuw nsw i32 %2, 2
%73 = add nuw i32 %2, 1
%74 = zext i32 %2 to i64
%75 = zext i32 %72 to i64
%76 = zext i32 %73 to i64
br label %77
77: ; preds = %91, %71
%78 = phi i64 [ %74, %71 ], [ %93, %91 ]
%79 = mul nsw i64 %78, %75
br label %80
80: ; preds = %77, %80
%81 = phi i64 [ 1, %77 ], [ %89, %80 ]
%82 = add nsw i64 %81, %79
%83 = getelementptr inbounds float, float* %4, i64 %82
%84 = load float, float* %83
%85 = fmul float %84, 2.550000e+02
%86 = fmul float %85, %3
%87 = fptosi float %86 to i32
%88 = call i32 (i32*, i8*, ...) @fprintf(i32* %66, i8* getelementptr inbounds ([6 x i8], [6 x i8]* @.str.5, i64 0, i64 0), i32 %87)
%89 = add nuw nsw i64 %81, 1
%90 = icmp eq i64 %89, %76
br i1 %90, label %91, label %80
91: ; preds = %80
%92 = call i32 @fputc(i32 10, i32* %66)
%93 = add nsw i64 %78, -1
%94 = icmp sgt i64 %78, 1
br i1 %94, label %77, label %95
95: ; preds = %91, %63
%96 = call i32 @fclose(i32* %66)
ret void
}