void init_flag(char **flag, int imax, int jmax, double delx, double dely,
               int *ibound) {
  int i, j;
  double mx, my, x, y, rad1;
  mx = 20.0 / 41.0 * jmax * dely;
  my = mx;
  rad1 = 5.0 / 41.0 * jmax * dely;
  for (i = 1; i <= imax; i++) {
    for (j = 1; j <= jmax; j++) {
      x = (i - 0.5) * delx - mx;
      y = (j - 0.5) * dely - my;
      flag[i][j] = (x * x + y * y <= rad1 * rad1) ? 0x0000 : 0x0010;
    }
  }
  for (i = 0; i <= imax + 1; i++) {
    flag[i][0] = 0x0000;
    flag[i][jmax + 1] = 0x0000;
  }
  for (j = 1; j <= jmax; j++) {
    flag[0][j] = 0x0000;
    flag[imax + 1][j] = 0x0000;
  }
  *ibound = 0;
  for (i = 1; i <= imax; i++) {
    for (j = 1; j <= jmax; j++) {
      if (!(flag[i][j] & 0x0010)) {
        (*ibound)++;
        if (flag[i - 1][j] & 0x0010)
          flag[i][j] |= 0x0004;
        if (flag[i + 1][j] & 0x0010)
          flag[i][j] |= 0x0008;
        if (flag[i][j - 1] & 0x0010)
          flag[i][j] |= 0x0002;
        if (flag[i][j + 1] & 0x0010)
          flag[i][j] |= 0x0001;
      }
    }
  }
}


x86 assembly (clang, -O0):
<init_flag>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
movsd  %xmm1,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
cvtsi2sdl -0x10(%rbp),%xmm1
movsd  0xedf(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
cvtsi2sdl -0x10(%rbp),%xmm1
movsd  0xeb2(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x58(%rbp)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     126a <init_flag+0x16a>
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     1257 <init_flag+0x157>
cvtsi2sdl -0x2c(%rbp),%xmm0
movsd  0xe81(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  -0x18(%rbp),%xmm2
movsd  -0x38(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x48(%rbp)
cvtsi2sdl -0x30(%rbp),%xmm0
movsd  0xe42(%rip),%xmm1
subsd  %xmm1,%xmm0
movsd  -0x20(%rbp),%xmm2
movsd  -0x40(%rbp),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x48(%rbp),%xmm1
movsd  -0x48(%rbp),%xmm2
movsd  -0x50(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
mulsd  %xmm2,%xmm1
addsd  %xmm0,%xmm1
movsd  -0x58(%rbp),%xmm0
mulsd  -0x58(%rbp),%xmm0
mov    $0x10,%eax
xor    %ecx,%ecx
ucomisd %xmm1,%xmm0
cmovae %ecx,%eax
mov    %al,%dl
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1176 <init_flag+0x76>
jmp    125c <init_flag+0x15c>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1163 <init_flag+0x63>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jg     12b8 <init_flag+0x1b8>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movb   $0x0,(%rax)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x10(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1271 <init_flag+0x171>
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     1301 <init_flag+0x201>
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movslq -0x30(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    12bf <init_flag+0x1bf>
mov    -0x28(%rbp),%rax
movl   $0x0,(%rax)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1483 <init_flag+0x383>
movl   $0x1,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     1470 <init_flag+0x370>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
and    $0x10,%eax
cmp    $0x0,%eax
jne    145d <init_flag+0x35d>
mov    -0x28(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
and    $0x10,%eax
cmp    $0x0,%eax
je     139b <init_flag+0x29b>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%edx
or     $0x4,%edx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
and    $0x10,%eax
cmp    $0x0,%eax
je     13da <init_flag+0x2da>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%edx
or     $0x8,%edx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
and    $0x10,%eax
cmp    $0x0,%eax
je     1419 <init_flag+0x319>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%edx
or     $0x2,%edx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    -0x30(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsbl (%rax,%rcx,1),%eax
and    $0x10,%eax
cmp    $0x0,%eax
je     1458 <init_flag+0x358>
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x30(%rbp),%rcx
movsbl (%rax,%rcx,1),%edx
or     $0x1,%edx
mov    %dl,(%rax,%rcx,1)
jmp    145d <init_flag+0x35d>
jmp    1462 <init_flag+0x362>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    1325 <init_flag+0x225>
jmp    1475 <init_flag+0x375>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1312 <init_flag+0x212>
pop    %rbp
ret

x86 assembly (clang, -O2):
<init_flag>:
push   %r15
push   %r14
push   %r12
push   %rbx
test   %esi,%esi
jle    1253 <init_flag+0x153>
cvtsi2sd %edx,%xmm2
movsd  0xee5(%rip),%xmm3
mulsd  %xmm2,%xmm3
mulsd  %xmm1,%xmm3
mulsd  0xedd(%rip),%xmm2
mulsd  %xmm1,%xmm2
mulsd  %xmm3,%xmm3
lea    0x1(%rdx),%r9d
lea    0x1(%rsi),%r8d
lea    -0x1(%r9),%r10
mov    %r10,%r11
and    $0xfffffffffffffffe,%r11
mov    $0x1,%r14d
movsd  0xebc(%rip),%xmm4
jmp    116d <init_flag+0x6d>
cs nopw 0x0(%rax,%rax,1)
add    $0x1,%r14
cmp    %r8,%r14
je     1257 <init_flag+0x157>
test   %edx,%edx
jle    1160 <init_flag+0x60>
xorps  %xmm5,%xmm5
cvtsi2sd %r14d,%xmm5
addsd  %xmm4,%xmm5
mulsd  %xmm0,%xmm5
addsd  %xmm2,%xmm5
mov    $0x1,%r15d
cmp    $0x2,%r9d
je     1212 <init_flag+0x112>
mov    $0x1,%r15d
nopl   0x0(%rax,%rax,1)
xorps  %xmm6,%xmm6
cvtsi2sd %r15d,%xmm6
addsd  %xmm4,%xmm6
mulsd  %xmm1,%xmm6
addsd  %xmm2,%xmm6
mulsd  %xmm6,%xmm6
movapd %xmm5,%xmm7
mulsd  %xmm5,%xmm7
addsd  %xmm7,%xmm6
ucomisd %xmm6,%xmm3
setb   %al
shl    $0x4,%al
mov    (%rdi,%r14,8),%rbx
mov    %al,(%rbx,%r15,1)
lea    0x1(%r15),%r12
xorps  %xmm6,%xmm6
cvtsi2sd %r12d,%xmm6
addsd  %xmm4,%xmm6
mulsd  %xmm1,%xmm6
addsd  %xmm2,%xmm6
mulsd  %xmm6,%xmm6
addsd  %xmm7,%xmm6
ucomisd %xmm6,%xmm3
setb   %bl
shl    $0x4,%bl
mov    (%rdi,%r14,8),%rax
mov    %bl,0x1(%rax,%r15,1)
add    $0x2,%r15
cmp    %r11,%r12
jne    11a0 <init_flag+0xa0>
test   $0x1,%r10b
je     1160 <init_flag+0x60>
xorps  %xmm6,%xmm6
cvtsi2sd %r15d,%xmm6
addsd  %xmm4,%xmm6
mulsd  %xmm1,%xmm6
addsd  %xmm2,%xmm6
mulsd  %xmm6,%xmm6
mulsd  %xmm5,%xmm5
addsd  %xmm6,%xmm5
ucomisd %xmm5,%xmm3
setb   %al
shl    $0x4,%al
mov    (%rdi,%r14,8),%rbx
mov    %al,(%rbx,%r15,1)
jmp    1160 <init_flag+0x60>
lea    0x1(%rsi),%r8d
cmp    $0xffffffff,%esi
jl     130a <init_flag+0x20a>
xor    %ebx,%ebx
test   %r8d,%r8d
mov    $0x0,%eax
cmovg  %r8d,%eax
movslq %edx,%r11
lea    0x1(%rax),%r10
mov    %r10d,%r9d
and    $0x3,%r9d
cmp    $0x3,%eax
jb     12e3 <init_flag+0x1e3>
and    $0xfffffffc,%r10d
xor    %ebx,%ebx
nopw   0x0(%rax,%rax,1)
mov    (%rdi,%rbx,8),%rax
movb   $0x0,(%rax)
mov    (%rdi,%rbx,8),%rax
movb   $0x0,0x1(%rax,%r11,1)
mov    0x8(%rdi,%rbx,8),%rax
movb   $0x0,(%rax)
mov    0x8(%rdi,%rbx,8),%rax
movb   $0x0,0x1(%rax,%r11,1)
mov    0x10(%rdi,%rbx,8),%rax
movb   $0x0,(%rax)
mov    0x10(%rdi,%rbx,8),%rax
movb   $0x0,0x1(%rax,%r11,1)
mov    0x18(%rdi,%rbx,8),%rax
movb   $0x0,(%rax)
mov    0x18(%rdi,%rbx,8),%rax
movb   $0x0,0x1(%rax,%r11,1)
add    $0x4,%rbx
cmp    %rbx,%r10
jne    1290 <init_flag+0x190>
test   %r9,%r9
je     130a <init_flag+0x20a>
lea    (%rdi,%rbx,8),%r10
xor    %eax,%eax
xchg   %ax,%ax
mov    (%r10,%rax,8),%rbx
movb   $0x0,(%rbx)
mov    (%r10,%rax,8),%rbx
movb   $0x0,0x1(%rbx,%r11,1)
add    $0x1,%rax
cmp    %rax,%r9
jne    12f0 <init_flag+0x1f0>
test   %edx,%edx
jle    1377 <init_flag+0x277>
movslq %r8d,%r11
mov    %edx,%r9d
mov    $0x1,%ebx
cmp    $0x1,%edx
je     1362 <init_flag+0x262>
mov    %r9d,%r10d
and    $0xfffffffe,%r10d
neg    %r10
mov    $0x1,%ebx
nopl   (%rax)
mov    (%rdi),%rax
movb   $0x0,(%rax,%rbx,1)
mov    (%rdi,%r11,8),%rax
movb   $0x0,(%rax,%rbx,1)
mov    (%rdi),%rax
movb   $0x0,0x1(%rax,%rbx,1)
mov    (%rdi,%r11,8),%rax
movb   $0x0,0x1(%rax,%rbx,1)
lea    (%r10,%rbx,1),%rax
add    $0x2,%rax
add    $0x2,%rbx
cmp    $0x1,%rax
jne    1330 <init_flag+0x230>
test   $0x1,%r9b
je     1377 <init_flag+0x277>
mov    (%rdi),%rax
movb   $0x0,(%rax,%rbx,1)
mov    (%rdi,%r11,8),%rax
movb   $0x0,(%rax,%rbx,1)
movl   $0x0,(%rcx)
test   %esi,%esi
jle    1450 <init_flag+0x350>
lea    0x1(%rdx),%r11d
mov    %r8d,%r8d
mov    $0x1,%r14d
jmp    13ac <init_flag+0x2ac>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %r9,%r14
cmp    %r8,%r9
je     1450 <init_flag+0x350>
test   %edx,%edx
jle    1440 <init_flag+0x340>
lea    0x1(%r14),%r9
mov    %r9d,%r10d
mov    $0x1,%ebx
jmp    13df <init_flag+0x2df>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x1,%rbx
mov    %rbx,%rsi
mov    %rsi,%rbx
cmp    %r11,%rsi
je     13a0 <init_flag+0x2a0>
mov    (%rdi,%r14,8),%rax
testb  $0x10,(%rax,%rbx,1)
jne    13d0 <init_flag+0x2d0>
addl   $0x1,(%rcx)
mov    -0x8(%rdi,%r14,8),%rsi
testb  $0x10,(%rsi,%rbx,1)
je     13fb <init_flag+0x2fb>
orb    $0x4,(%rax,%rbx,1)
mov    (%rdi,%r10,8),%rax
testb  $0x10,(%rax,%rbx,1)
je     140d <init_flag+0x30d>
mov    (%rdi,%r14,8),%rax
orb    $0x8,(%rax,%rbx,1)
mov    (%rdi,%r14,8),%r15
testb  $0x10,-0x1(%rbx,%r15,1)
je     1422 <init_flag+0x322>
orb    $0x2,(%r15,%rbx,1)
mov    (%rdi,%r14,8),%r15
lea    0x1(%rbx),%rsi
mov    %esi,%eax
testb  $0x10,(%r15,%rax,1)
je     13d7 <init_flag+0x2d7>
orb    $0x1,(%r15,%rbx,1)
jmp    13d7 <init_flag+0x2d7>
cs nopw 0x0(%rax,%rax,1)
add    $0x1,%r14
mov    %r14,%r9
cmp    %r8,%r9
jne    13ac <init_flag+0x2ac>
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define void @init_flag(i8** %0, i32 %1, i32 %2, double %3, double %4, i32* %5) {
%7 = alloca i8**
%8 = alloca i32
%9 = alloca i32
%10 = alloca double
%11 = alloca double
%12 = alloca i32*
%13 = alloca i32
%14 = alloca i32
%15 = alloca double
%16 = alloca double
%17 = alloca double
%18 = alloca double
%19 = alloca double
store i8** %0, i8*** %7
store i32 %1, i32* %8
store i32 %2, i32* %9
store double %3, double* %10
store double %4, double* %11
store i32* %5, i32** %12
%20 = load i32, i32* %9
%21 = sitofp i32 %20 to double
%22 = fmul double 0x3FDF3831F3831F38, %21
%23 = load double, double* %11
%24 = fmul double %22, %23
store double %24, double* %15
%25 = load double, double* %15
store double %25, double* %16
%26 = load i32, i32* %9
%27 = sitofp i32 %26 to double
%28 = fmul double 0x3FBF3831F3831F38, %27
%29 = load double, double* %11
%30 = fmul double %28, %29
store double %30, double* %19
store i32 1, i32* %13
br label %31
31: ; preds = %80, %6
%32 = load i32, i32* %13
%33 = load i32, i32* %8
%34 = icmp sle i32 %32, %33
br i1 %34, label %35, label %83
35: ; preds = %31
store i32 1, i32* %14
br label %36
36: ; preds = %76, %35
%37 = load i32, i32* %14
%38 = load i32, i32* %9
%39 = icmp sle i32 %37, %38
br i1 %39, label %40, label %79
40: ; preds = %36
%41 = load i32, i32* %13
%42 = sitofp i32 %41 to double
%43 = fsub double %42, 5.000000e-01
%44 = load double, double* %10
%45 = load double, double* %15
%46 = fneg double %45
%47 = call double @llvm.fmuladd.f64(double %43, double %44, double %46)
store double %47, double* %17
%48 = load i32, i32* %14
%49 = sitofp i32 %48 to double
%50 = fsub double %49, 5.000000e-01
%51 = load double, double* %11
%52 = load double, double* %16
%53 = fneg double %52
%54 = call double @llvm.fmuladd.f64(double %50, double %51, double %53)
store double %54, double* %18
%55 = load double, double* %17
%56 = load double, double* %17
%57 = load double, double* %18
%58 = load double, double* %18
%59 = fmul double %57, %58
%60 = call double @llvm.fmuladd.f64(double %55, double %56, double %59)
%61 = load double, double* %19
%62 = load double, double* %19
%63 = fmul double %61, %62
%64 = fcmp ole double %60, %63
%65 = zext i1 %64 to i64
%66 = select i1 %64, i32 0, i32 16
%67 = trunc i32 %66 to i8
%68 = load i8**, i8*** %7
%69 = load i32, i32* %13
%70 = sext i32 %69 to i64
%71 = getelementptr inbounds i8*, i8** %68, i64 %70
%72 = load i8*, i8** %71
%73 = load i32, i32* %14
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds i8, i8* %72, i64 %74
store i8 %67, i8* %75
br label %76
76: ; preds = %40
%77 = load i32, i32* %14
%78 = add nsw i32 %77, 1
store i32 %78, i32* %14
br label %36
79: ; preds = %36
br label %80
80: ; preds = %79
%81 = load i32, i32* %13
%82 = add nsw i32 %81, 1
store i32 %82, i32* %13
br label %31
83: ; preds = %31
store i32 0, i32* %13
br label %84
84: ; preds = %105, %83
%85 = load i32, i32* %13
%86 = load i32, i32* %8
%87 = add nsw i32 %86, 1
%88 = icmp sle i32 %85, %87
br i1 %88, label %89, label %108
89: ; preds = %84
%90 = load i8**, i8*** %7
%91 = load i32, i32* %13
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds i8*, i8** %90, i64 %92
%94 = load i8*, i8** %93
%95 = getelementptr inbounds i8, i8* %94, i64 0
store i8 0, i8* %95
%96 = load i8**, i8*** %7
%97 = load i32, i32* %13
%98 = sext i32 %97 to i64
%99 = getelementptr inbounds i8*, i8** %96, i64 %98
%100 = load i8*, i8** %99
%101 = load i32, i32* %9
%102 = add nsw i32 %101, 1
%103 = sext i32 %102 to i64
%104 = getelementptr inbounds i8, i8* %100, i64 %103
store i8 0, i8* %104
br label %105
105: ; preds = %89
%106 = load i32, i32* %13
%107 = add nsw i32 %106, 1
store i32 %107, i32* %13
br label %84
108: ; preds = %84
store i32 1, i32* %14
br label %109
109: ; preds = %129, %108
%110 = load i32, i32* %14
%111 = load i32, i32* %9
%112 = icmp sle i32 %110, %111
br i1 %112, label %113, label %132
113: ; preds = %109
%114 = load i8**, i8*** %7
%115 = getelementptr inbounds i8*, i8** %114, i64 0
%116 = load i8*, i8** %115
%117 = load i32, i32* %14
%118 = sext i32 %117 to i64
%119 = getelementptr inbounds i8, i8* %116, i64 %118
store i8 0, i8* %119
%120 = load i8**, i8*** %7
%121 = load i32, i32* %8
%122 = add nsw i32 %121, 1
%123 = sext i32 %122 to i64
%124 = getelementptr inbounds i8*, i8** %120, i64 %123
%125 = load i8*, i8** %124
%126 = load i32, i32* %14
%127 = sext i32 %126 to i64
%128 = getelementptr inbounds i8, i8* %125, i64 %127
store i8 0, i8* %128
br label %129
129: ; preds = %113
%130 = load i32, i32* %14
%131 = add nsw i32 %130, 1
store i32 %131, i32* %14
br label %109
132: ; preds = %109
%133 = load i32*, i32** %12
store i32 0, i32* %133
store i32 1, i32* %13
br label %134
134: ; preds = %273, %132
%135 = load i32, i32* %13
%136 = load i32, i32* %8
%137 = icmp sle i32 %135, %136
br i1 %137, label %138, label %276
138: ; preds = %134
store i32 1, i32* %14
br label %139
139: ; preds = %269, %138
%140 = load i32, i32* %14
%141 = load i32, i32* %9
%142 = icmp sle i32 %140, %141
br i1 %142, label %143, label %272
143: ; preds = %139
%144 = load i8**, i8*** %7
%145 = load i32, i32* %13
%146 = sext i32 %145 to i64
%147 = getelementptr inbounds i8*, i8** %144, i64 %146
%148 = load i8*, i8** %147
%149 = load i32, i32* %14
%150 = sext i32 %149 to i64
%151 = getelementptr inbounds i8, i8* %148, i64 %150
%152 = load i8, i8* %151
%153 = sext i8 %152 to i32
%154 = and i32 %153, 16
%155 = icmp ne i32 %154, 0
br i1 %155, label %268, label %156
156: ; preds = %143
%157 = load i32*, i32** %12
%158 = load i32, i32* %157
%159 = add nsw i32 %158, 1
store i32 %159, i32* %157
%160 = load i8**, i8*** %7
%161 = load i32, i32* %13
%162 = sub nsw i32 %161, 1
%163 = sext i32 %162 to i64
%164 = getelementptr inbounds i8*, i8** %160, i64 %163
%165 = load i8*, i8** %164
%166 = load i32, i32* %14
%167 = sext i32 %166 to i64
%168 = getelementptr inbounds i8, i8* %165, i64 %167
%169 = load i8, i8* %168
%170 = sext i8 %169 to i32
%171 = and i32 %170, 16
%172 = icmp ne i32 %171, 0
br i1 %172, label %173, label %186
173: ; preds = %156
%174 = load i8**, i8*** %7
%175 = load i32, i32* %13
%176 = sext i32 %175 to i64
%177 = getelementptr inbounds i8*, i8** %174, i64 %176
%178 = load i8*, i8** %177
%179 = load i32, i32* %14
%180 = sext i32 %179 to i64
%181 = getelementptr inbounds i8, i8* %178, i64 %180
%182 = load i8, i8* %181
%183 = sext i8 %182 to i32
%184 = or i32 %183, 4
%185 = trunc i32 %184 to i8
store i8 %185, i8* %181
br label %186
186: ; preds = %173, %156
%187 = load i8**, i8*** %7
%188 = load i32, i32* %13
%189 = add nsw i32 %188, 1
%190 = sext i32 %189 to i64
%191 = getelementptr inbounds i8*, i8** %187, i64 %190
%192 = load i8*, i8** %191
%193 = load i32, i32* %14
%194 = sext i32 %193 to i64
%195 = getelementptr inbounds i8, i8* %192, i64 %194
%196 = load i8, i8* %195
%197 = sext i8 %196 to i32
%198 = and i32 %197, 16
%199 = icmp ne i32 %198, 0
br i1 %199, label %200, label %213
200: ; preds = %186
%201 = load i8**, i8*** %7
%202 = load i32, i32* %13
%203 = sext i32 %202 to i64
%204 = getelementptr inbounds i8*, i8** %201, i64 %203
%205 = load i8*, i8** %204
%206 = load i32, i32* %14
%207 = sext i32 %206 to i64
%208 = getelementptr inbounds i8, i8* %205, i64 %207
%209 = load i8, i8* %208
%210 = sext i8 %209 to i32
%211 = or i32 %210, 8
%212 = trunc i32 %211 to i8
store i8 %212, i8* %208
br label %213
213: ; preds = %200, %186
%214 = load i8**, i8*** %7
%215 = load i32, i32* %13
%216 = sext i32 %215 to i64
%217 = getelementptr inbounds i8*, i8** %214, i64 %216
%218 = load i8*, i8** %217
%219 = load i32, i32* %14
%220 = sub nsw i32 %219, 1
%221 = sext i32 %220 to i64
%222 = getelementptr inbounds i8, i8* %218, i64 %221
%223 = load i8, i8* %222
%224 = sext i8 %223 to i32
%225 = and i32 %224, 16
%226 = icmp ne i32 %225, 0
br i1 %226, label %227, label %240
227: ; preds = %213
%228 = load i8**, i8*** %7
%229 = load i32, i32* %13
%230 = sext i32 %229 to i64
%231 = getelementptr inbounds i8*, i8** %228, i64 %230
%232 = load i8*, i8** %231
%233 = load i32, i32* %14
%234 = sext i32 %233 to i64
%235 = getelementptr inbounds i8, i8* %232, i64 %234
%236 = load i8, i8* %235
%237 = sext i8 %236 to i32
%238 = or i32 %237, 2
%239 = trunc i32 %238 to i8
store i8 %239, i8* %235
br label %240
240: ; preds = %227, %213
%241 = load i8**, i8*** %7
%242 = load i32, i32* %13
%243 = sext i32 %242 to i64
%244 = getelementptr inbounds i8*, i8** %241, i64 %243
%245 = load i8*, i8** %244
%246 = load i32, i32* %14
%247 = add nsw i32 %246, 1
%248 = sext i32 %247 to i64
%249 = getelementptr inbounds i8, i8* %245, i64 %248
%250 = load i8, i8* %249
%251 = sext i8 %250 to i32
%252 = and i32 %251, 16
%253 = icmp ne i32 %252, 0
br i1 %253, label %254, label %267
254: ; preds = %240
%255 = load i8**, i8*** %7
%256 = load i32, i32* %13
%257 = sext i32 %256 to i64
%258 = getelementptr inbounds i8*, i8** %255, i64 %257
%259 = load i8*, i8** %258
%260 = load i32, i32* %14
%261 = sext i32 %260 to i64
%262 = getelementptr inbounds i8, i8* %259, i64 %261
%263 = load i8, i8* %262
%264 = sext i8 %263 to i32
%265 = or i32 %264, 1
%266 = trunc i32 %265 to i8
store i8 %266, i8* %262
br label %267
267: ; preds = %254, %240
br label %268
268: ; preds = %267, %143
br label %269
269: ; preds = %268
%270 = load i32, i32* %14
%271 = add nsw i32 %270, 1
store i32 %271, i32* %14
br label %139
272: ; preds = %139
br label %273
273: ; preds = %272
%274 = load i32, i32* %13
%275 = add nsw i32 %274, 1
store i32 %275, i32* %13
br label %134
276: ; preds = %134
ret void
}

LLVM IR (-O2):
define void @init_flag(i8** nocapture %0, i32 %1, i32 %2, double %3, double %4, i32* nocapture %5) {
%7 = sitofp i32 %2 to double
%8 = icmp slt i32 %1, 1
br i1 %8, label %9, label %11
9: ; preds = %6
%10 = add nsw i32 %1, 1
br label %35
11: ; preds = %6
%12 = fmul double %7, 0x3FBF3831F3831F38
%13 = fmul double %12, %4
%14 = icmp slt i32 %2, 1
%15 = fmul double %7, 0xBFDF3831F3831F38
%16 = fmul double %15, %4
%17 = fmul double %13, %13
%18 = add i32 %2, 1
%19 = add nuw i32 %1, 1
%20 = zext i32 %19 to i64
%21 = zext i32 %18 to i64
%22 = add nsw i64 %21, -1
%23 = and i64 %22, 1
%24 = icmp eq i32 %18, 2
%25 = and i64 %22, -2
%26 = icmp eq i64 %23, 0
br label %27
27: ; preds = %11, %89
%28 = phi i64 [ 1, %11 ], [ %90, %89 ]
br i1 %14, label %89, label %29
29: ; preds = %27
%30 = trunc i64 %28 to i32
%31 = sitofp i32 %30 to double
%32 = fadd double %31, -5.000000e-01
%33 = tail call double @llvm.fmuladd.f64(double %32, double %3, double %16)
%34 = getelementptr inbounds i8*, i8** %0, i64 %28
br i1 %24, label %76, label %49
35: ; preds = %89, %9
%36 = phi i32 [ %10, %9 ], [ %19, %89 ]
%37 = icmp slt i32 %1, -1
br i1 %37, label %105, label %38
38: ; preds = %35
%39 = add nsw i32 %2, 1
%40 = sext i32 %39 to i64
%41 = call i32 @llvm.smax.i32(i32 %36, i32 0)
%42 = add nuw i32 %41, 1
%43 = zext i32 %42 to i64
%44 = add nsw i64 %43, -1
%45 = and i64 %43, 3
%46 = icmp ult i64 %44, 3
br i1 %46, label %92, label %47
47: ; preds = %38
%48 = and i64 %43, 4294967292
br label %115
49: ; preds = %29, %49
%50 = phi i64 [ %73, %49 ], [ 1, %29 ]
%51 = phi i64 [ %74, %49 ], [ 0, %29 ]
%52 = trunc i64 %50 to i32
%53 = sitofp i32 %52 to double
%54 = fadd double %53, -5.000000e-01
%55 = tail call double @llvm.fmuladd.f64(double %54, double %4, double %16)
%56 = fmul double %55, %55
%57 = tail call double @llvm.fmuladd.f64(double %33, double %33, double %56)
%58 = fcmp ole double %57, %17
%59 = select i1 %58, i8 0, i8 16
%60 = load i8*, i8** %34
%61 = getelementptr inbounds i8, i8* %60, i64 %50
store i8 %59, i8* %61
%62 = add nuw nsw i64 %50, 1
%63 = trunc i64 %62 to i32
%64 = sitofp i32 %63 to double
%65 = fadd double %64, -5.000000e-01
%66 = tail call double @llvm.fmuladd.f64(double %65, double %4, double %16)
%67 = fmul double %66, %66
%68 = tail call double @llvm.fmuladd.f64(double %33, double %33, double %67)
%69 = fcmp ole double %68, %17
%70 = select i1 %69, i8 0, i8 16
%71 = load i8*, i8** %34
%72 = getelementptr inbounds i8, i8* %71, i64 %62
store i8 %70, i8* %72
%73 = add nuw nsw i64 %50, 2
%74 = add i64 %51, 2
%75 = icmp eq i64 %74, %25
br i1 %75, label %76, label %49
76: ; preds = %49, %29
%77 = phi i64 [ 1, %29 ], [ %73, %49 ]
br i1 %26, label %89, label %78
78: ; preds = %76
%79 = trunc i64 %77 to i32
%80 = sitofp i32 %79 to double
%81 = fadd double %80, -5.000000e-01
%82 = tail call double @llvm.fmuladd.f64(double %81, double %4, double %16)
%83 = fmul double %82, %82
%84 = tail call double @llvm.fmuladd.f64(double %33, double %33, double %83)
%85 = fcmp ole double %84, %17
%86 = select i1 %85, i8 0, i8 16
%87 = load i8*, i8** %34
%88 = getelementptr inbounds i8, i8* %87, i64 %77
store i8 %86, i8* %88
br label %89
89: ; preds = %78, %76, %27
%90 = add nuw nsw i64 %28, 1
%91 = icmp eq i64 %90, %20
br i1 %91, label %35, label %27
92: ; preds = %115, %38
%93 = phi i64 [ 0, %38 ], [ %137, %115 ]
%94 = icmp eq i64 %45, 0
br i1 %94, label %105, label %95
95: ; preds = %92, %95
%96 = phi i64 [ %102, %95 ], [ %93, %92 ]
%97 = phi i64 [ %103, %95 ], [ 0, %92 ]
%98 = getelementptr inbounds i8*, i8** %0, i64 %96
%99 = load i8*, i8** %98
store i8 0, i8* %99
%100 = load i8*, i8** %98
%101 = getelementptr inbounds i8, i8* %100, i64 %40
store i8 0, i8* %101
%102 = add nuw nsw i64 %96, 1
%103 = add i64 %97, 1
%104 = icmp eq i64 %103, %45
br i1 %104, label %105, label %95
105: ; preds = %92, %95, %35
%106 = icmp slt i32 %2, 1
br i1 %106, label %163, label %107
107: ; preds = %105
%108 = sext i32 %36 to i64
%109 = getelementptr inbounds i8*, i8** %0, i64 %108
%110 = zext i32 %2 to i64
%111 = and i64 %110, 1
%112 = icmp eq i32 %2, 1
br i1 %112, label %155, label %113
113: ; preds = %107
%114 = and i64 %110, 4294967294
br label %140
115: ; preds = %115, %47
%116 = phi i64 [ 0, %47 ], [ %137, %115 ]
%117 = phi i64 [ 0, %47 ], [ %138, %115 ]
%118 = getelementptr inbounds i8*, i8** %0, i64 %116
%119 = load i8*, i8** %118
store i8 0, i8* %119
%120 = load i8*, i8** %118
%121 = getelementptr inbounds i8, i8* %120, i64 %40
store i8 0, i8* %121
%122 = or i64 %116, 1
%123 = getelementptr inbounds i8*, i8** %0, i64 %122
%124 = load i8*, i8** %123
store i8 0, i8* %124
%125 = load i8*, i8** %123
%126 = getelementptr inbounds i8, i8* %125, i64 %40
store i8 0, i8* %126
%127 = or i64 %116, 2
%128 = getelementptr inbounds i8*, i8** %0, i64 %127
%129 = load i8*, i8** %128
store i8 0, i8* %129
%130 = load i8*, i8** %128
%131 = getelementptr inbounds i8, i8* %130, i64 %40
store i8 0, i8* %131
%132 = or i64 %116, 3
%133 = getelementptr inbounds i8*, i8** %0, i64 %132
%134 = load i8*, i8** %133
store i8 0, i8* %134
%135 = load i8*, i8** %133
%136 = getelementptr inbounds i8, i8* %135, i64 %40
store i8 0, i8* %136
%137 = add nuw nsw i64 %116, 4
%138 = add i64 %117, 4
%139 = icmp eq i64 %138, %48
br i1 %139, label %92, label %115
140: ; preds = %140, %113
%141 = phi i64 [ 1, %113 ], [ %152, %140 ]
%142 = phi i64 [ 0, %113 ], [ %153, %140 ]
%143 = load i8*, i8** %0
%144 = getelementptr inbounds i8, i8* %143, i64 %141
store i8 0, i8* %144
%145 = load i8*, i8** %109
%146 = getelementptr inbounds i8, i8* %145, i64 %141
store i8 0, i8* %146
%147 = add nuw nsw i64 %141, 1
%148 = load i8*, i8** %0
%149 = getelementptr inbounds i8, i8* %148, i64 %147
store i8 0, i8* %149
%150 = load i8*, i8** %109
%151 = getelementptr inbounds i8, i8* %150, i64 %147
store i8 0, i8* %151
%152 = add nuw nsw i64 %141, 2
%153 = add i64 %142, 2
%154 = icmp eq i64 %153, %114
br i1 %154, label %155, label %140
155: ; preds = %140, %107
%156 = phi i64 [ 1, %107 ], [ %152, %140 ]
%157 = icmp eq i64 %111, 0
br i1 %157, label %163, label %158
158: ; preds = %155
%159 = load i8*, i8** %0
%160 = getelementptr inbounds i8, i8* %159, i64 %156
store i8 0, i8* %160
%161 = load i8*, i8** %109
%162 = getelementptr inbounds i8, i8* %161, i64 %156
store i8 0, i8* %162
br label %163
163: ; preds = %158, %155, %105
store i32 0, i32* %5
br i1 %8, label %240, label %164
164: ; preds = %163
%165 = add i32 %2, 1
%166 = zext i32 %36 to i64
%167 = zext i32 %165 to i64
br label %168
168: ; preds = %164, %237
%169 = phi i64 [ 1, %164 ], [ %238, %237 ]
br i1 %106, label %170, label %172
170: ; preds = %168
%171 = add nuw nsw i64 %169, 1
br label %237
172: ; preds = %168
%173 = getelementptr inbounds i8*, i8** %0, i64 %169
%174 = add nsw i64 %169, -1
%175 = getelementptr inbounds i8*, i8** %0, i64 %174
%176 = add nuw nsw i64 %169, 1
%177 = and i64 %176, 4294967295
%178 = getelementptr inbounds i8*, i8** %0, i64 %177
br label %179
179: ; preds = %172, %234
%180 = phi i64 [ 1, %172 ], [ %235, %234 ]
%181 = load i8*, i8** %173
%182 = getelementptr inbounds i8, i8* %181, i64 %180
%183 = load i8, i8* %182
%184 = and i8 %183, 16
%185 = icmp eq i8 %184, 0
br i1 %185, label %188, label %186
186: ; preds = %179
%187 = add nuw nsw i64 %180, 1
br label %234
188: ; preds = %179
%189 = load i32, i32* %5
%190 = add nsw i32 %189, 1
store i32 %190, i32* %5
%191 = load i8*, i8** %175
%192 = getelementptr inbounds i8, i8* %191, i64 %180
%193 = load i8, i8* %192
%194 = and i8 %193, 16
%195 = icmp eq i8 %194, 0
br i1 %195, label %199, label %196
196: ; preds = %188
%197 = load i8, i8* %182
%198 = or i8 %197, 4
store i8 %198, i8* %182
br label %199
199: ; preds = %196, %188
%200 = load i8*, i8** %178
%201 = getelementptr inbounds i8, i8* %200, i64 %180
%202 = load i8, i8* %201
%203 = and i8 %202, 16
%204 = icmp eq i8 %203, 0
br i1 %204, label %210, label %205
205: ; preds = %199
%206 = load i8*, i8** %173
%207 = getelementptr inbounds i8, i8* %206, i64 %180
%208 = load i8, i8* %207
%209 = or i8 %208, 8
store i8 %209, i8* %207
br label %210
210: ; preds = %205, %199
%211 = load i8*, i8** %173
%212 = add nsw i64 %180, -1
%213 = getelementptr inbounds i8, i8* %211, i64 %212
%214 = load i8, i8* %213
%215 = and i8 %214, 16
%216 = icmp eq i8 %215, 0
br i1 %216, label %222, label %217
217: ; preds = %210
%218 = getelementptr inbounds i8, i8* %211, i64 %180
%219 = load i8, i8* %218
%220 = or i8 %219, 2
store i8 %220, i8* %218
%221 = load i8*, i8** %173
br label %222
222: ; preds = %217, %210
%223 = phi i8* [ %221, %217 ], [ %211, %210 ]
%224 = add nuw nsw i64 %180, 1
%225 = and i64 %224, 4294967295
%226 = getelementptr inbounds i8, i8* %223, i64 %225
%227 = load i8, i8* %226
%228 = and i8 %227, 16
%229 = icmp eq i8 %228, 0
br i1 %229, label %234, label %230
230: ; preds = %222
%231 = getelementptr inbounds i8, i8* %223, i64 %180
%232 = load i8, i8* %231
%233 = or i8 %232, 1
store i8 %233, i8* %231
br label %234
234: ; preds = %186, %230, %222
%235 = phi i64 [ %187, %186 ], [ %224, %230 ], [ %224, %222 ]
%236 = icmp eq i64 %235, %167
br i1 %236, label %237, label %179
237: ; preds = %234, %170
%238 = phi i64 [ %171, %170 ], [ %176, %234 ]
%239 = icmp eq i64 %238, %166
br i1 %239, label %240, label %168
240: ; preds = %237, %163
ret void
}