char circle(double xcen, double ycen, double rad, double xcol, double ycol) {
  double r2, dx, dy, dlen;
  dx = xcol - xcen;
  dy = ycol - ycen;
  dx *= dx;
  dy *= dy;
  dlen = dx + dy;
  r2 = rad * rad;
  if (dlen <= r2)
    return (1);
  else
    return (0);
}


x86 assembly (clang, -O0):
<circle>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
movsd  %xmm3,-0x28(%rbp)
movsd  %xmm4,-0x30(%rbp)
movsd  -0x28(%rbp),%xmm0
subsd  -0x10(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x30(%rbp),%xmm0
subsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x40(%rbp),%xmm0
mulsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  -0x48(%rbp),%xmm0
mulsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
movsd  -0x40(%rbp),%xmm0
addsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x20(%rbp),%xmm0
mulsd  -0x20(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  -0x50(%rbp),%xmm1
movsd  -0x38(%rbp),%xmm0
ucomisd %xmm1,%xmm0
jb     1194 <circle+0x94>
movb   $0x1,-0x1(%rbp)
jmp    1198 <circle+0x98>
movb   $0x0,-0x1(%rbp)
movsbl -0x1(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<circle>:
unpcklpd %xmm4,%xmm3
unpcklpd %xmm1,%xmm0
subpd  %xmm0,%xmm3
mulpd  %xmm3,%xmm3
movapd %xmm3,%xmm0
unpckhpd %xmm3,%xmm0
addsd  %xmm3,%xmm0
mulsd  %xmm2,%xmm2
ucomisd %xmm0,%xmm2
setae  %al
ret

LLVM IR (-O0):
define signext i8 @circle(double %0, double %1, double %2, double %3, double %4) {
%6 = alloca i8
%7 = alloca double
%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 %0, double* %7
store double %1, double* %8
store double %2, double* %9
store double %3, double* %10
store double %4, double* %11
%16 = load double, double* %10
%17 = load double, double* %7
%18 = fsub double %16, %17
store double %18, double* %13
%19 = load double, double* %11
%20 = load double, double* %8
%21 = fsub double %19, %20
store double %21, double* %14
%22 = load double, double* %13
%23 = load double, double* %13
%24 = fmul double %23, %22
store double %24, double* %13
%25 = load double, double* %14
%26 = load double, double* %14
%27 = fmul double %26, %25
store double %27, double* %14
%28 = load double, double* %13
%29 = load double, double* %14
%30 = fadd double %28, %29
store double %30, double* %15
%31 = load double, double* %9
%32 = load double, double* %9
%33 = fmul double %31, %32
store double %33, double* %12
%34 = load double, double* %15
%35 = load double, double* %12
%36 = fcmp ole double %34, %35
br i1 %36, label %37, label %38
37: ; preds = %5
store i8 1, i8* %6
br label %39
38: ; preds = %5
store i8 0, i8* %6
br label %39
39: ; preds = %38, %37
%40 = load i8, i8* %6
ret i8 %40
}

LLVM IR (-O2):
define signext i8 @circle(double %0, double %1, double %2, double %3, double %4) {
%6 = insertelement <2 x double> poison, double %3, i64 0
%7 = insertelement <2 x double> %6, double %4, i64 1
%8 = insertelement <2 x double> poison, double %0, i64 0
%9 = insertelement <2 x double> %8, double %1, i64 1
%10 = fsub <2 x double> %7, %9
%11 = fmul <2 x double> %10, %10
%12 = shufflevector <2 x double> %11, <2 x double> poison, <2 x i32> <i32 1, i32 undef>
%13 = fadd <2 x double> %11, %12
%14 = extractelement <2 x double> %13, i64 0
%15 = fmul double %2, %2
%16 = fcmp ole double %14, %15
%17 = zext i1 %16 to i8
ret i8 %17
}