double Similarity(const double *x, const double *y, int len) {
  int i, numeq = 0;
  double xy, yx;
  if (len < 1)
    return 0.0;
  for (i = 0; i < len; i++) {
    xy = x[i] - y[i];
    yx = y[i] - x[i];
    if (xy < 0.00001 && yx < 0.00001)
      numeq++;
  }
  return ((double)numeq / (double)len);
}


x86 assembly (clang, -O0):
<Similarity>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
movl   $0x0,-0x24(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jge    112d <Similarity+0x2d>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    11d3 <Similarity+0xd3>
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    11c0 <Similarity+0xc0>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xe7a(%rip),%xmm0
ucomisd -0x30(%rbp),%xmm0
jbe    11ad <Similarity+0xad>
movsd  0xe67(%rip),%xmm0
ucomisd -0x38(%rbp),%xmm0
jbe    11ad <Similarity+0xad>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11b2 <Similarity+0xb2>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1134 <Similarity+0x34>
cvtsi2sdl -0x24(%rbp),%xmm0
cvtsi2sdl -0x1c(%rbp),%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<Similarity>:
test   %edx,%edx
jle    1116 <Similarity+0x16>
mov    %edx,%r8d
cmp    $0x4,%edx
jae    111a <Similarity+0x1a>
xor    %r10d,%r10d
xor    %eax,%eax
jmp    11c9 <Similarity+0xc9>
xorps  %xmm0,%xmm0
ret
mov    %r8d,%r10d
and    $0xfffffffc,%r10d
lea    0x0(,%r8,8),%r9
and    $0xffffffffffffffe0,%r9
pxor   %xmm0,%xmm0
xor    %eax,%eax
movapd 0xec4(%rip),%xmm8
pxor   %xmm1,%xmm1
movupd (%rdi,%rax,1),%xmm3
movupd 0x10(%rdi,%rax,1),%xmm2
movupd (%rsi,%rax,1),%xmm5
movupd 0x10(%rsi,%rax,1),%xmm6
movapd %xmm3,%xmm7
subpd  %xmm5,%xmm7
movapd %xmm2,%xmm4
subpd  %xmm6,%xmm4
subpd  %xmm3,%xmm5
subpd  %xmm2,%xmm6
cmpltpd %xmm8,%xmm7
cmpltpd %xmm8,%xmm4
cmpltpd %xmm8,%xmm5
andpd  %xmm7,%xmm5
cmpltpd %xmm8,%xmm6
andpd  %xmm4,%xmm6
psrlq  $0x3f,%xmm5
psrlq  $0x3f,%xmm6
pshufd $0xe8,%xmm5,%xmm2
paddd  %xmm2,%xmm0
pshufd $0xe8,%xmm6,%xmm2
paddd  %xmm2,%xmm1
add    $0x20,%rax
cmp    %rax,%r9
jne    1140 <Similarity+0x40>
paddd  %xmm0,%xmm1
pshufd $0x55,%xmm1,%xmm0
paddd  %xmm1,%xmm0
movd   %xmm0,%eax
cmp    %r8,%r10
je     1218 <Similarity+0x118>
movsd  0xe3f(%rip),%xmm0
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rdi,%r10,8),%xmm1
movsd  (%rsi,%r10,8),%xmm2
movapd %xmm1,%xmm3
subsd  %xmm2,%xmm3
subsd  %xmm1,%xmm2
ucomisd %xmm3,%xmm0
seta   %r9b
ucomisd %xmm2,%xmm0
seta   %cl
and    %r9b,%cl
movzbl %cl,%ecx
add    %ecx,%eax
add    $0x1,%r10
cmp    %r10,%r8
jne    11e0 <Similarity+0xe0>
xorps  %xmm0,%xmm0
cvtsi2sd %eax,%xmm0
xorps  %xmm1,%xmm1
cvtsi2sd %edx,%xmm1
divsd  %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @Similarity(double* %0, double* %1, i32 %2) {
%4 = alloca double
%5 = alloca double*
%6 = alloca double*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca double
%11 = alloca double
store double* %0, double** %5
store double* %1, double** %6
store i32 %2, i32* %7
store i32 0, i32* %9
%12 = load i32, i32* %7
%13 = icmp slt i32 %12, 1
br i1 %13, label %14, label %15
14: ; preds = %3
store double 0.000000e+00, double* %4
br label %61
15: ; preds = %3
store i32 0, i32* %8
br label %16
16: ; preds = %52, %15
%17 = load i32, i32* %8
%18 = load i32, i32* %7
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %55
20: ; preds = %16
%21 = load double*, double** %5
%22 = load i32, i32* %8
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds double, double* %21, i64 %23
%25 = load double, double* %24
%26 = load double*, double** %6
%27 = load i32, i32* %8
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds double, double* %26, i64 %28
%30 = load double, double* %29
%31 = fsub double %25, %30
store double %31, double* %10
%32 = load double*, double** %6
%33 = load i32, i32* %8
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds double, double* %32, i64 %34
%36 = load double, double* %35
%37 = load double*, double** %5
%38 = load i32, i32* %8
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds double, double* %37, i64 %39
%41 = load double, double* %40
%42 = fsub double %36, %41
store double %42, double* %11
%43 = load double, double* %10
%44 = fcmp olt double %43, 1.000000e-05
br i1 %44, label %45, label %51
45: ; preds = %20
%46 = load double, double* %11
%47 = fcmp olt double %46, 1.000000e-05
br i1 %47, label %48, label %51
48: ; preds = %45
%49 = load i32, i32* %9
%50 = add nsw i32 %49, 1
store i32 %50, i32* %9
br label %51
51: ; preds = %48, %45, %20
br label %52
52: ; preds = %51
%53 = load i32, i32* %8
%54 = add nsw i32 %53, 1
store i32 %54, i32* %8
br label %16
55: ; preds = %16
%56 = load i32, i32* %9
%57 = sitofp i32 %56 to double
%58 = load i32, i32* %7
%59 = sitofp i32 %58 to double
%60 = fdiv double %57, %59
store double %60, double* %4
br label %61
61: ; preds = %55, %14
%62 = load double, double* %4
ret double %62
}

LLVM IR (-O2):
define double @Similarity(double* nocapture %0, double* nocapture %1, i32 %2) {
%4 = icmp slt i32 %2, 1
br i1 %4, label %70, label %5
5: ; preds = %3
%6 = zext i32 %2 to i64
%7 = icmp ult i32 %2, 4
br i1 %7, label %46, label %8
8: ; preds = %5
%9 = and i64 %6, 4294967292
br label %10
10: ; preds = %10, %8
%11 = phi i64 [ 0, %8 ], [ %40, %10 ]
%12 = phi <2 x i32> [ zeroinitializer, %8 ], [ %38, %10 ]
%13 = phi <2 x i32> [ zeroinitializer, %8 ], [ %39, %10 ]
%14 = getelementptr inbounds double, double* %0, i64 %11
%15 = bitcast double* %14 to <2 x double>*
%16 = load <2 x double>, <2 x double>* %15
%17 = getelementptr inbounds double, double* %14, i64 2
%18 = bitcast double* %17 to <2 x double>*
%19 = load <2 x double>, <2 x double>* %18
%20 = getelementptr inbounds double, double* %1, i64 %11
%21 = bitcast double* %20 to <2 x double>*
%22 = load <2 x double>, <2 x double>* %21
%23 = getelementptr inbounds double, double* %20, i64 2
%24 = bitcast double* %23 to <2 x double>*
%25 = load <2 x double>, <2 x double>* %24
%26 = fsub <2 x double> %16, %22
%27 = fsub <2 x double> %19, %25
%28 = fsub <2 x double> %22, %16
%29 = fsub <2 x double> %25, %19
%30 = fcmp olt <2 x double> %26, <double 1.000000e-05, double 1.000000e-05>
%31 = fcmp olt <2 x double> %27, <double 1.000000e-05, double 1.000000e-05>
%32 = fcmp olt <2 x double> %28, <double 1.000000e-05, double 1.000000e-05>
%33 = fcmp olt <2 x double> %29, <double 1.000000e-05, double 1.000000e-05>
%34 = and <2 x i1> %30, %32
%35 = and <2 x i1> %31, %33
%36 = zext <2 x i1> %34 to <2 x i32>
%37 = zext <2 x i1> %35 to <2 x i32>
%38 = add <2 x i32> %12, %36
%39 = add <2 x i32> %13, %37
%40 = add nuw i64 %11, 4
%41 = icmp eq i64 %40, %9
br i1 %41, label %42, label %10
42: ; preds = %10
%43 = add <2 x i32> %39, %38
%44 = call i32 @llvm.vector.reduce.add.v2i32(<2 x i32> %43)
%45 = icmp eq i64 %9, %6
br i1 %45, label %65, label %46
46: ; preds = %5, %42
%47 = phi i64 [ 0, %5 ], [ %9, %42 ]
%48 = phi i32 [ 0, %5 ], [ %44, %42 ]
br label %49
49: ; preds = %46, %49
%50 = phi i64 [ %63, %49 ], [ %47, %46 ]
%51 = phi i32 [ %62, %49 ], [ %48, %46 ]
%52 = getelementptr inbounds double, double* %0, i64 %50
%53 = load double, double* %52
%54 = getelementptr inbounds double, double* %1, i64 %50
%55 = load double, double* %54
%56 = fsub double %53, %55
%57 = fsub double %55, %53
%58 = fcmp olt double %56, 1.000000e-05
%59 = fcmp olt double %57, 1.000000e-05
%60 = and i1 %58, %59
%61 = zext i1 %60 to i32
%62 = add nuw nsw i32 %51, %61
%63 = add nuw nsw i64 %50, 1
%64 = icmp eq i64 %63, %6
br i1 %64, label %65, label %49
65: ; preds = %49, %42
%66 = phi i32 [ %44, %42 ], [ %62, %49 ]
%67 = sitofp i32 %66 to double
%68 = sitofp i32 %2 to double
%69 = fdiv double %67, %68
br label %70
70: ; preds = %3, %65
%71 = phi double [ %69, %65 ], [ 0.000000e+00, %3 ]
ret double %71
}