double hermint(double xbar, int n, double *x, double *yc1, double *yc2,
               double *yc3, double *yc4) {
  int klo, khi, k;
  double dx;
  double result;
  klo = 0;
  khi = n - 1;
  while (khi - klo > 1) {
    k = (khi + klo) >> 1;
    if (x[k] > xbar)
      khi = k;
    else
      klo = k;
  }
  dx = xbar - x[klo];
  result = yc1[klo] + dx * (yc2[klo] + dx * (yc3[klo] + dx * yc4[klo]));
  return result;
}


x86 assembly (clang, -O0):
<hermint>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
mov    %edi,-0xc(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8,-0x30(%rbp)
mov    %r9,-0x38(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0xc(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x40(%rbp)
mov    -0x40(%rbp),%eax
sub    -0x3c(%rbp),%eax
cmp    $0x1,%eax
jle    1179 <hermint+0x79>
mov    -0x40(%rbp),%eax
add    -0x3c(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x44(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x44(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x8(%rbp),%xmm0
jbe    116e <hermint+0x6e>
mov    -0x44(%rbp),%eax
mov    %eax,-0x40(%rbp)
jmp    1174 <hermint+0x74>
mov    -0x44(%rbp),%eax
mov    %eax,-0x3c(%rbp)
jmp    1130 <hermint+0x30>
movsd  -0x8(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x3c(%rbp),%rcx
subsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x50(%rbp),%xmm0
mov    -0x28(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm3
movsd  -0x50(%rbp),%xmm2
mov    -0x30(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm5
movsd  -0x50(%rbp),%xmm4
mov    -0x38(%rbp),%rax
movslq -0x3c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm6
mulsd  %xmm6,%xmm4
addsd  %xmm5,%xmm4
mulsd  %xmm4,%xmm2
addsd  %xmm3,%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  -0x58(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<hermint>:
xor    %r10d,%r10d
cmp    $0x3,%edi
jl     113a <hermint+0x3a>
add    $0xffffffff,%edi
jmp    111d <hermint+0x1d>
nopl   (%rax)
mov    %r11d,%r10d
mov    %edi,%eax
sub    %r10d,%eax
cmp    $0x1,%eax
jle    1137 <hermint+0x37>
lea    (%r10,%rdi,1),%r11d
sar    %r11d
movslq %r11d,%rax
movsd  (%rsi,%rax,8),%xmm1
ucomisd %xmm0,%xmm1
jbe    1110 <hermint+0x10>
mov    %r11d,%edi
jmp    1113 <hermint+0x13>
movslq %r10d,%r10
subsd  (%rsi,%r10,8),%xmm0
movsd  (%r9,%r10,8),%xmm1
mulsd  %xmm0,%xmm1
addsd  (%r8,%r10,8),%xmm1
mulsd  %xmm0,%xmm1
addsd  (%rcx,%r10,8),%xmm1
mulsd  %xmm0,%xmm1
addsd  (%rdx,%r10,8),%xmm1
movapd %xmm1,%xmm0
ret

LLVM IR (-O0):
define double @hermint(double %0, i32 %1, double* %2, double* %3, double* %4, double* %5, double* %6) {
%8 = alloca double
%9 = alloca i32
%10 = alloca double*
%11 = alloca double*
%12 = alloca double*
%13 = alloca double*
%14 = alloca double*
%15 = alloca i32
%16 = alloca i32
%17 = alloca i32
%18 = alloca double
%19 = alloca double
store double %0, double* %8
store i32 %1, i32* %9
store double* %2, double** %10
store double* %3, double** %11
store double* %4, double** %12
store double* %5, double** %13
store double* %6, double** %14
store i32 0, i32* %15
%20 = load i32, i32* %9
%21 = sub nsw i32 %20, 1
store i32 %21, i32* %16
br label %22
22: ; preds = %43, %7
%23 = load i32, i32* %16
%24 = load i32, i32* %15
%25 = sub nsw i32 %23, %24
%26 = icmp sgt i32 %25, 1
br i1 %26, label %27, label %44
27: ; preds = %22
%28 = load i32, i32* %16
%29 = load i32, i32* %15
%30 = add nsw i32 %28, %29
%31 = ashr i32 %30, 1
store i32 %31, i32* %17
%32 = load double*, double** %10
%33 = load i32, i32* %17
%34 = sext i32 %33 to i64
%35 = getelementptr inbounds double, double* %32, i64 %34
%36 = load double, double* %35
%37 = load double, double* %8
%38 = fcmp ogt double %36, %37
br i1 %38, label %39, label %41
39: ; preds = %27
%40 = load i32, i32* %17
store i32 %40, i32* %16
br label %43
41: ; preds = %27
%42 = load i32, i32* %17
store i32 %42, i32* %15
br label %43
43: ; preds = %41, %39
br label %22
44: ; preds = %22
%45 = load double, double* %8
%46 = load double*, double** %10
%47 = load i32, i32* %15
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds double, double* %46, i64 %48
%50 = load double, double* %49
%51 = fsub double %45, %50
store double %51, double* %18
%52 = load double*, double** %11
%53 = load i32, i32* %15
%54 = sext i32 %53 to i64
%55 = getelementptr inbounds double, double* %52, i64 %54
%56 = load double, double* %55
%57 = load double, double* %18
%58 = load double*, double** %12
%59 = load i32, i32* %15
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds double, double* %58, i64 %60
%62 = load double, double* %61
%63 = load double, double* %18
%64 = load double*, double** %13
%65 = load i32, i32* %15
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds double, double* %64, i64 %66
%68 = load double, double* %67
%69 = load double, double* %18
%70 = load double*, double** %14
%71 = load i32, i32* %15
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %70, i64 %72
%74 = load double, double* %73
%75 = call double @llvm.fmuladd.f64(double %69, double %74, double %68)
%76 = call double @llvm.fmuladd.f64(double %63, double %75, double %62)
%77 = call double @llvm.fmuladd.f64(double %57, double %76, double %56)
store double %77, double* %19
%78 = load double, double* %19
ret double %78
}

LLVM IR (-O2):
define double @hermint(double %0, i32 %1, double* nocapture %2, double* nocapture %3, double* nocapture %4, double* nocapture %5, double* nocapture %6) {
%8 = icmp sgt i32 %1, 2
br i1 %8, label %9, label %26
9: ; preds = %7
%10 = add nsw i32 %1, -1
br label %11
11: ; preds = %9, %11
%12 = phi i32 [ %21, %11 ], [ 0, %9 ]
%13 = phi i32 [ %20, %11 ], [ %10, %9 ]
%14 = add nsw i32 %12, %13
%15 = ashr i32 %14, 1
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds double, double* %2, i64 %16
%18 = load double, double* %17
%19 = fcmp ogt double %18, %0
%20 = select i1 %19, i32 %15, i32 %13
%21 = select i1 %19, i32 %12, i32 %15
%22 = sub nsw i32 %20, %21
%23 = icmp sgt i32 %22, 1
br i1 %23, label %11, label %24
24: ; preds = %11
%25 = sext i32 %21 to i64
br label %26
26: ; preds = %24, %7
%27 = phi i64 [ 0, %7 ], [ %25, %24 ]
%28 = getelementptr inbounds double, double* %2, i64 %27
%29 = load double, double* %28
%30 = fsub double %0, %29
%31 = getelementptr inbounds double, double* %3, i64 %27
%32 = load double, double* %31
%33 = getelementptr inbounds double, double* %4, i64 %27
%34 = load double, double* %33
%35 = getelementptr inbounds double, double* %5, i64 %27
%36 = load double, double* %35
%37 = getelementptr inbounds double, double* %6, i64 %27
%38 = load double, double* %37
%39 = tail call double @llvm.fmuladd.f64(double %30, double %38, double %36)
%40 = tail call double @llvm.fmuladd.f64(double %30, double %39, double %34)
%41 = tail call double @llvm.fmuladd.f64(double %30, double %40, double %32)
ret double %41
}