int es_fondo(double x, double y, double ix, double iy, double *image, int xsize,
             int ysize) {
  int r = 0;
  unsigned int mx, my;
  unsigned int ux, uy, uix, uiy;
  ux = (unsigned int)x;
  uy = (unsigned int)y;
  uix = (unsigned int)ix;
  uiy = (unsigned int)iy;
  if (ux >= uix)
    mx = uix + (ux - uix) / 2;
  else
    mx = ux + (uix - ux) / 2;
  if (uy >= uiy)
    my = uiy + (uy - uiy) / 2;
  else
    my = uy + (uiy - uy) / 2;
  if (((mx == ux) && (my == uy)) || ((mx == uix) && (my == uiy)))
    return 0;
  if (image[my * xsize + mx] >= 100)
    r = 1;
  return r;
}


x86 assembly (clang, -O0):
<es_fondo>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
movsd  %xmm3,-0x28(%rbp)
mov    %rdi,-0x30(%rbp)
mov    %esi,-0x34(%rbp)
mov    %edx,-0x38(%rbp)
movl   $0x0,-0x3c(%rbp)
cvttsd2si -0x10(%rbp),%rax
mov    %eax,-0x48(%rbp)
cvttsd2si -0x18(%rbp),%rax
mov    %eax,-0x4c(%rbp)
cvttsd2si -0x20(%rbp),%rax
mov    %eax,-0x50(%rbp)
cvttsd2si -0x28(%rbp),%rax
mov    %eax,-0x54(%rbp)
mov    -0x48(%rbp),%eax
cmp    -0x50(%rbp),%eax
jb     116f <es_fondo+0x6f>
mov    -0x50(%rbp),%eax
mov    -0x48(%rbp),%ecx
sub    -0x50(%rbp),%ecx
shr    $0x1,%ecx
add    %ecx,%eax
mov    %eax,-0x40(%rbp)
jmp    1180 <es_fondo+0x80>
mov    -0x48(%rbp),%eax
mov    -0x50(%rbp),%ecx
sub    -0x48(%rbp),%ecx
shr    $0x1,%ecx
add    %ecx,%eax
mov    %eax,-0x40(%rbp)
mov    -0x4c(%rbp),%eax
cmp    -0x54(%rbp),%eax
jb     11a2 <es_fondo+0xa2>
mov    -0x54(%rbp),%eax
mov    -0x4c(%rbp),%ecx
sub    -0x54(%rbp),%ecx
shr    $0x1,%ecx
add    %ecx,%eax
mov    %eax,-0x44(%rbp)
jmp    11b3 <es_fondo+0xb3>
mov    -0x4c(%rbp),%eax
mov    -0x54(%rbp),%ecx
sub    -0x4c(%rbp),%ecx
shr    $0x1,%ecx
add    %ecx,%eax
mov    %eax,-0x44(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x48(%rbp),%eax
jne    11cb <es_fondo+0xcb>
mov    -0x44(%rbp),%eax
cmp    -0x4c(%rbp),%eax
je     11e3 <es_fondo+0xe3>
mov    -0x40(%rbp),%eax
cmp    -0x50(%rbp),%eax
jne    11ef <es_fondo+0xef>
mov    -0x44(%rbp),%eax
cmp    -0x54(%rbp),%eax
jne    11ef <es_fondo+0xef>
movl   $0x0,-0x4(%rbp)
jmp    1223 <es_fondo+0x123>
mov    -0x30(%rbp),%rax
mov    -0x44(%rbp),%ecx
imul   -0x34(%rbp),%ecx
add    -0x40(%rbp),%ecx
mov    %ecx,%ecx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xdf4(%rip),%xmm1
ucomisd %xmm1,%xmm0
jb     121d <es_fondo+0x11d>
movl   $0x1,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<es_fondo>:
push   %rbp
push   %rbx
cvttsd2si %xmm1,%r9
cvttsd2si %xmm3,%r8
mov    %r9d,%eax
sub    %r8d,%eax
mov    %r8d,%r11d
cmovb  %r9d,%r11d
neg    %eax
mov    %r9d,%ecx
cvttsd2si %xmm0,%rbx
cvttsd2si %xmm2,%r10
sub    %r8d,%ecx
cmovb  %eax,%ecx
mov    %ebx,%eax
sub    %r10d,%eax
mov    %r10d,%ebp
cmovb  %ebx,%ebp
neg    %eax
mov    %ebx,%edx
sub    %r10d,%edx
cmovb  %eax,%edx
shr    %edx
add    %ebp,%edx
shr    %ecx
add    %r11d,%ecx
xor    %eax,%eax
cmp    %ebx,%edx
jne    1157 <es_fondo+0x57>
cmp    %r9d,%ecx
je     1178 <es_fondo+0x78>
cmp    %r10d,%edx
jne    1161 <es_fondo+0x61>
cmp    %r8d,%ecx
je     1178 <es_fondo+0x78>
imul   %esi,%ecx
add    %edx,%ecx
movsd  (%rdi,%rcx,8),%xmm0
xor    %eax,%eax
ucomisd 0xe8b(%rip),%xmm0
setae  %al
pop    %rbx
pop    %rbp
ret

LLVM IR (-O0):
define i32 @es_fondo(double %0, double %1, double %2, double %3, double* %4, i32 %5, i32 %6) {
%8 = alloca i32
%9 = alloca double
%10 = alloca double
%11 = alloca double
%12 = alloca double
%13 = alloca double*
%14 = alloca i32
%15 = alloca i32
%16 = alloca i32
%17 = alloca i32
%18 = alloca i32
%19 = alloca i32
%20 = alloca i32
%21 = alloca i32
%22 = alloca i32
store double %0, double* %9
store double %1, double* %10
store double %2, double* %11
store double %3, double* %12
store double* %4, double** %13
store i32 %5, i32* %14
store i32 %6, i32* %15
store i32 0, i32* %16
%23 = load double, double* %9
%24 = fptoui double %23 to i32
store i32 %24, i32* %19
%25 = load double, double* %10
%26 = fptoui double %25 to i32
store i32 %26, i32* %20
%27 = load double, double* %11
%28 = fptoui double %27 to i32
store i32 %28, i32* %21
%29 = load double, double* %12
%30 = fptoui double %29 to i32
store i32 %30, i32* %22
%31 = load i32, i32* %19
%32 = load i32, i32* %21
%33 = icmp uge i32 %31, %32
br i1 %33, label %34, label %41
34: ; preds = %7
%35 = load i32, i32* %21
%36 = load i32, i32* %19
%37 = load i32, i32* %21
%38 = sub i32 %36, %37
%39 = udiv i32 %38, 2
%40 = add i32 %35, %39
store i32 %40, i32* %17
br label %48
41: ; preds = %7
%42 = load i32, i32* %19
%43 = load i32, i32* %21
%44 = load i32, i32* %19
%45 = sub i32 %43, %44
%46 = udiv i32 %45, 2
%47 = add i32 %42, %46
store i32 %47, i32* %17
br label %48
48: ; preds = %41, %34
%49 = load i32, i32* %20
%50 = load i32, i32* %22
%51 = icmp uge i32 %49, %50
br i1 %51, label %52, label %59
52: ; preds = %48
%53 = load i32, i32* %22
%54 = load i32, i32* %20
%55 = load i32, i32* %22
%56 = sub i32 %54, %55
%57 = udiv i32 %56, 2
%58 = add i32 %53, %57
store i32 %58, i32* %18
br label %66
59: ; preds = %48
%60 = load i32, i32* %20
%61 = load i32, i32* %22
%62 = load i32, i32* %20
%63 = sub i32 %61, %62
%64 = udiv i32 %63, 2
%65 = add i32 %60, %64
store i32 %65, i32* %18
br label %66
66: ; preds = %59, %52
%67 = load i32, i32* %17
%68 = load i32, i32* %19
%69 = icmp eq i32 %67, %68
br i1 %69, label %70, label %74
70: ; preds = %66
%71 = load i32, i32* %18
%72 = load i32, i32* %20
%73 = icmp eq i32 %71, %72
br i1 %73, label %82, label %74
74: ; preds = %70, %66
%75 = load i32, i32* %17
%76 = load i32, i32* %21
%77 = icmp eq i32 %75, %76
br i1 %77, label %78, label %83
78: ; preds = %74
%79 = load i32, i32* %18
%80 = load i32, i32* %22
%81 = icmp eq i32 %79, %80
br i1 %81, label %82, label %83
82: ; preds = %78, %70
store i32 0, i32* %8
br label %97
83: ; preds = %78, %74
%84 = load double*, double** %13
%85 = load i32, i32* %18
%86 = load i32, i32* %14
%87 = mul i32 %85, %86
%88 = load i32, i32* %17
%89 = add i32 %87, %88
%90 = zext i32 %89 to i64
%91 = getelementptr inbounds double, double* %84, i64 %90
%92 = load double, double* %91
%93 = fcmp oge double %92, 1.000000e+02
br i1 %93, label %94, label %95
94: ; preds = %83
store i32 1, i32* %16
br label %95
95: ; preds = %94, %83
%96 = load i32, i32* %16
store i32 %96, i32* %8
br label %97
97: ; preds = %95, %82
%98 = load i32, i32* %8
ret i32 %98
}

LLVM IR (-O2):
define i32 @es_fondo(double %0, double %1, double %2, double %3, double* nocapture %4, i32 %5, i32 %6) {
%8 = fptoui double %0 to i32
%9 = fptoui double %1 to i32
%10 = fptoui double %2 to i32
%11 = fptoui double %3 to i32
%12 = icmp ult i32 %8, %10
%13 = sub i32 %10, %8
%14 = sub i32 %8, %10
%15 = select i1 %12, i32 %13, i32 %14
%16 = select i1 %12, i32 %8, i32 %10
%17 = lshr i32 %15, 1
%18 = add i32 %17, %16
%19 = icmp ult i32 %9, %11
%20 = sub i32 %11, %9
%21 = sub i32 %9, %11
%22 = select i1 %19, i32 %20, i32 %21
%23 = select i1 %19, i32 %9, i32 %11
%24 = lshr i32 %22, 1
%25 = add i32 %24, %23
%26 = icmp eq i32 %18, %8
%27 = icmp eq i32 %25, %9
%28 = select i1 %26, i1 %27, i1 false
br i1 %28, label %41, label %29
29: ; preds = %7
%30 = icmp eq i32 %18, %10
%31 = icmp eq i32 %25, %11
%32 = select i1 %30, i1 %31, i1 false
br i1 %32, label %41, label %33
33: ; preds = %29
%34 = mul i32 %25, %5
%35 = add i32 %34, %18
%36 = zext i32 %35 to i64
%37 = getelementptr inbounds double, double* %4, i64 %36
%38 = load double, double* %37
%39 = fcmp oge double %38, 1.000000e+02
%40 = zext i1 %39 to i32
br label %41
41: ; preds = %7, %29, %33
%42 = phi i32 [ %40, %33 ], [ 0, %29 ], [ 0, %7 ]
ret i32 %42
}