float eval_spline(float xa[], float ya[], float y2a[], int n, float x) {
  int klo, khi, k;
  float h, b, a;
  klo = 0;
  khi = n - 1;
  while (khi - klo > 1) {
    k = (khi + klo) >> 1;
    if (xa[k] > x)
      khi = k;
    else
      klo = k;
  }
  h = xa[khi] - xa[klo];
  a = (xa[khi] - x) / h;
  b = (x - xa[klo]) / h;
  return (a * ya[klo] + b * ya[khi] +
          ((a * a * a - a) * y2a[klo] + (b * b * b - b) * y2a[khi]) * (h * h) /
              6.0);
}


x86 assembly (clang, -O0):
<eval_spline>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movss  %xmm0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x1c(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
sub    -0x24(%rbp),%eax
cmp    $0x1,%eax
jle    1170 <eval_spline+0x70>
mov    -0x28(%rbp),%eax
add    -0x24(%rbp),%eax
sar    $0x1,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
ucomiss -0x20(%rbp),%xmm0
jbe    1165 <eval_spline+0x65>
mov    -0x2c(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    116b <eval_spline+0x6b>
mov    -0x2c(%rbp),%eax
mov    %eax,-0x24(%rbp)
jmp    1128 <eval_spline+0x28>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x30(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
subss  -0x20(%rbp),%xmm0
divss  -0x30(%rbp),%xmm0
movss  %xmm0,-0x38(%rbp)
movss  -0x20(%rbp),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
subss  (%rax,%rcx,4),%xmm0
divss  -0x30(%rbp),%xmm0
movss  %xmm0,-0x34(%rbp)
movss  -0x38(%rbp),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm2
movss  -0x34(%rbp),%xmm1
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
mulss  (%rax,%rcx,4),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x38(%rbp),%xmm1
mulss  -0x38(%rbp),%xmm1
movss  -0x38(%rbp),%xmm3
movss  -0x38(%rbp),%xmm2
movd   %xmm2,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm2
mulss  %xmm3,%xmm1
addss  %xmm2,%xmm1
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm3
movss  -0x34(%rbp),%xmm2
mulss  -0x34(%rbp),%xmm2
movss  -0x34(%rbp),%xmm5
movss  -0x34(%rbp),%xmm4
movd   %xmm4,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm4
mulss  %xmm5,%xmm2
addss  %xmm4,%xmm2
mov    -0x18(%rbp),%rax
movslq -0x28(%rbp),%rcx
mulss  (%rax,%rcx,4),%xmm2
mulss  %xmm3,%xmm1
addss  %xmm2,%xmm1
movss  -0x30(%rbp),%xmm2
mulss  -0x30(%rbp),%xmm2
mulss  %xmm2,%xmm1
cvtss2sd %xmm1,%xmm1
movsd  0xd7b(%rip),%xmm2
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<eval_spline>:
lea    -0x1(%rcx),%r9d
xor    %r8d,%r8d
cmp    $0x3,%ecx
jge    111e <eval_spline+0x1e>
jmp    1139 <eval_spline+0x39>
xchg   %ax,%ax
mov    %ecx,%r8d
mov    %r9d,%eax
sub    %r8d,%eax
cmp    $0x1,%eax
jle    1136 <eval_spline+0x36>
lea    (%r8,%r9,1),%ecx
sar    %ecx
movslq %ecx,%rax
movss  (%rdi,%rax,4),%xmm1
ucomiss %xmm0,%xmm1
jbe    1110 <eval_spline+0x10>
mov    %ecx,%r9d
jmp    1113 <eval_spline+0x13>
movslq %r8d,%r8
movslq %r9d,%rax
movss  (%rdi,%rax,4),%xmm2
movss  (%rdi,%r8,4),%xmm3
movaps %xmm2,%xmm1
subss  %xmm3,%xmm1
subss  %xmm0,%xmm2
divss  %xmm1,%xmm2
subss  %xmm3,%xmm0
divss  %xmm1,%xmm0
movss  (%rsi,%rax,4),%xmm3
mulss  %xmm0,%xmm3
movss  (%rsi,%r8,4),%xmm4
mulss  %xmm2,%xmm4
addss  %xmm3,%xmm4
movaps %xmm2,%xmm3
mulss  %xmm2,%xmm3
mulss  %xmm2,%xmm3
subss  %xmm2,%xmm3
movaps %xmm0,%xmm2
mulss  %xmm0,%xmm2
mulss  %xmm0,%xmm2
subss  %xmm0,%xmm2
mulss  (%rdx,%rax,4),%xmm2
mulss  (%rdx,%r8,4),%xmm3
addss  %xmm2,%xmm3
mulss  %xmm1,%xmm1
mulss  %xmm3,%xmm1
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
divsd  0xe47(%rip),%xmm0
xorps  %xmm1,%xmm1
cvtss2sd %xmm4,%xmm1
addsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
ret

LLVM IR (-O0):
define float @eval_spline(float* %0, float* %1, float* %2, i32 %3, float %4) {
%6 = alloca float*
%7 = alloca float*
%8 = alloca float*
%9 = alloca i32
%10 = alloca float
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca float
%15 = alloca float
%16 = alloca float
store float* %0, float** %6
store float* %1, float** %7
store float* %2, float** %8
store i32 %3, i32* %9
store float %4, float* %10
store i32 0, i32* %11
%17 = load i32, i32* %9
%18 = sub nsw i32 %17, 1
store i32 %18, i32* %12
br label %19
19: ; preds = %40, %5
%20 = load i32, i32* %12
%21 = load i32, i32* %11
%22 = sub nsw i32 %20, %21
%23 = icmp sgt i32 %22, 1
br i1 %23, label %24, label %41
24: ; preds = %19
%25 = load i32, i32* %12
%26 = load i32, i32* %11
%27 = add nsw i32 %25, %26
%28 = ashr i32 %27, 1
store i32 %28, i32* %13
%29 = load float*, float** %6
%30 = load i32, i32* %13
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds float, float* %29, i64 %31
%33 = load float, float* %32
%34 = load float, float* %10
%35 = fcmp ogt float %33, %34
br i1 %35, label %36, label %38
36: ; preds = %24
%37 = load i32, i32* %13
store i32 %37, i32* %12
br label %40
38: ; preds = %24
%39 = load i32, i32* %13
store i32 %39, i32* %11
br label %40
40: ; preds = %38, %36
br label %19
41: ; preds = %19
%42 = load float*, float** %6
%43 = load i32, i32* %12
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds float, float* %42, i64 %44
%46 = load float, float* %45
%47 = load float*, float** %6
%48 = load i32, i32* %11
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds float, float* %47, i64 %49
%51 = load float, float* %50
%52 = fsub float %46, %51
store float %52, float* %14
%53 = load float*, float** %6
%54 = load i32, i32* %12
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds float, float* %53, i64 %55
%57 = load float, float* %56
%58 = load float, float* %10
%59 = fsub float %57, %58
%60 = load float, float* %14
%61 = fdiv float %59, %60
store float %61, float* %16
%62 = load float, float* %10
%63 = load float*, float** %6
%64 = load i32, i32* %11
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds float, float* %63, i64 %65
%67 = load float, float* %66
%68 = fsub float %62, %67
%69 = load float, float* %14
%70 = fdiv float %68, %69
store float %70, float* %15
%71 = load float, float* %16
%72 = load float*, float** %7
%73 = load i32, i32* %11
%74 = sext i32 %73 to i64
%75 = getelementptr inbounds float, float* %72, i64 %74
%76 = load float, float* %75
%77 = load float, float* %15
%78 = load float*, float** %7
%79 = load i32, i32* %12
%80 = sext i32 %79 to i64
%81 = getelementptr inbounds float, float* %78, i64 %80
%82 = load float, float* %81
%83 = fmul float %77, %82
%84 = call float @llvm.fmuladd.f32(float %71, float %76, float %83)
%85 = fpext float %84 to double
%86 = load float, float* %16
%87 = load float, float* %16
%88 = fmul float %86, %87
%89 = load float, float* %16
%90 = load float, float* %16
%91 = fneg float %90
%92 = call float @llvm.fmuladd.f32(float %88, float %89, float %91)
%93 = load float*, float** %8
%94 = load i32, i32* %11
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds float, float* %93, i64 %95
%97 = load float, float* %96
%98 = load float, float* %15
%99 = load float, float* %15
%100 = fmul float %98, %99
%101 = load float, float* %15
%102 = load float, float* %15
%103 = fneg float %102
%104 = call float @llvm.fmuladd.f32(float %100, float %101, float %103)
%105 = load float*, float** %8
%106 = load i32, i32* %12
%107 = sext i32 %106 to i64
%108 = getelementptr inbounds float, float* %105, i64 %107
%109 = load float, float* %108
%110 = fmul float %104, %109
%111 = call float @llvm.fmuladd.f32(float %92, float %97, float %110)
%112 = load float, float* %14
%113 = load float, float* %14
%114 = fmul float %112, %113
%115 = fmul float %111, %114
%116 = fpext float %115 to double
%117 = fdiv double %116, 6.000000e+00
%118 = fadd double %85, %117
%119 = fptrunc double %118 to float
ret float %119
}

LLVM IR (-O2):
define float @eval_spline(float* nocapture %0, float* nocapture %1, float* nocapture %2, i32 %3, float %4) {
%6 = add nsw i32 %3, -1
%7 = icmp sgt i32 %3, 2
br i1 %7, label %8, label %23
8: ; preds = %5, %8
%9 = phi i32 [ %18, %8 ], [ 0, %5 ]
%10 = phi i32 [ %17, %8 ], [ %6, %5 ]
%11 = add nsw i32 %9, %10
%12 = ashr i32 %11, 1
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds float, float* %0, i64 %13
%15 = load float, float* %14
%16 = fcmp ogt float %15, %4
%17 = select i1 %16, i32 %12, i32 %10
%18 = select i1 %16, i32 %9, i32 %12
%19 = sub nsw i32 %17, %18
%20 = icmp sgt i32 %19, 1
br i1 %20, label %8, label %21
21: ; preds = %8
%22 = sext i32 %18 to i64
br label %23
23: ; preds = %21, %5
%24 = phi i32 [ %6, %5 ], [ %17, %21 ]
%25 = phi i64 [ 0, %5 ], [ %22, %21 ]
%26 = sext i32 %24 to i64
%27 = getelementptr inbounds float, float* %0, i64 %26
%28 = load float, float* %27
%29 = getelementptr inbounds float, float* %0, i64 %25
%30 = load float, float* %29
%31 = fsub float %28, %30
%32 = fsub float %28, %4
%33 = fdiv float %32, %31
%34 = fsub float %4, %30
%35 = fdiv float %34, %31
%36 = getelementptr inbounds float, float* %1, i64 %25
%37 = load float, float* %36
%38 = getelementptr inbounds float, float* %1, i64 %26
%39 = load float, float* %38
%40 = fmul float %35, %39
%41 = tail call float @llvm.fmuladd.f32(float %33, float %37, float %40)
%42 = fpext float %41 to double
%43 = fmul float %33, %33
%44 = fneg float %33
%45 = tail call float @llvm.fmuladd.f32(float %43, float %33, float %44)
%46 = getelementptr inbounds float, float* %2, i64 %25
%47 = load float, float* %46
%48 = fmul float %35, %35
%49 = fneg float %35
%50 = tail call float @llvm.fmuladd.f32(float %48, float %35, float %49)
%51 = getelementptr inbounds float, float* %2, i64 %26
%52 = load float, float* %51
%53 = fmul float %50, %52
%54 = tail call float @llvm.fmuladd.f32(float %45, float %47, float %53)
%55 = fmul float %31, %31
%56 = fmul float %55, %54
%57 = fpext float %56 to double
%58 = fdiv double %57, 6.000000e+00
%59 = fadd double %58, %42
%60 = fptrunc double %59 to float
ret float %60
}