void rebin(float rc, int nd, float r[], float xin[], float xi[]) {
  int i, k = 0;
  float dr = 0.0, xn = 0.0, xo;
  for (i = 1; i < nd; i++) {
    while (rc > dr) {
      dr += r[++k];
      xo = xn;
      xn = xi[k];
    }
    dr -= rc;
    xin[i] = xn - (xn - xo) * dr / r[k];
  }
  for (i = 1; i < nd; i++)
    xi[i] = xin[i];
  xi[nd] = 1.0;
}


x86 assembly (clang, -O0):
<rebin>:
push   %rbp
mov    %rsp,%rbp
movss  %xmm0,-0x4(%rbp)
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
movl   $0x0,-0x28(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x2c(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x30(%rbp)
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    11e9 <rebin+0xe9>
jmp    1147 <rebin+0x47>
movss  -0x4(%rbp),%xmm0
ucomiss -0x2c(%rbp),%xmm0
jbe    1196 <rebin+0x96>
mov    -0x10(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,-0x28(%rbp)
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
addss  -0x2c(%rbp),%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  -0x30(%rbp),%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x30(%rbp)
jmp    1147 <rebin+0x47>
movss  -0x4(%rbp),%xmm1
movss  -0x2c(%rbp),%xmm0
subss  %xmm1,%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  -0x30(%rbp),%xmm0
movss  -0x30(%rbp),%xmm1
subss  -0x34(%rbp),%xmm1
mulss  -0x2c(%rbp),%xmm1
mov    -0x10(%rbp),%rax
movslq -0x28(%rbp),%rcx
divss  (%rax,%rcx,4),%xmm1
subss  %xmm1,%xmm0
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1136 <rebin+0x36>
movl   $0x1,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1224 <rebin+0x124>
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x20(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11f0 <rebin+0xf0>
mov    -0x20(%rbp),%rax
movslq -0x8(%rbp),%rcx
movss  0xdcc(%rip),%xmm0
movss  %xmm0,(%rax,%rcx,4)
pop    %rbp
ret

x86 assembly (clang, -O2):
<rebin>:
push   %r15
push   %r14
push   %rbx
cmp    $0x2,%edi
jl     12f7 <rebin+0x1f7>
mov    %edi,%r10d
lea    0x4(%rsi),%r8
lea    0x4(%rcx),%r9
xor    %r11d,%r11d
xorps  %xmm1,%xmm1
mov    $0x1,%r14d
xorps  %xmm2,%xmm2
jmp    115d <rebin+0x5d>
nopw   0x0(%rax,%rax,1)
subss  %xmm0,%xmm2
movaps %xmm1,%xmm4
subss  %xmm3,%xmm4
mulss  %xmm2,%xmm4
movslq %r11d,%rax
divss  (%rsi,%rax,4),%xmm4
movaps %xmm1,%xmm5
subss  %xmm4,%xmm5
movss  %xmm5,(%rdx,%r14,4)
add    $0x1,%r14
cmp    %r10,%r14
je     118c <rebin+0x8c>
ucomiss %xmm2,%xmm0
jbe    1130 <rebin+0x30>
movslq %r11d,%rax
lea    (%r8,%rax,4),%r15
lea    (%r9,%rax,4),%rax
xor    %ebx,%ebx
nop
movaps %xmm1,%xmm3
addss  (%r15,%rbx,4),%xmm2
movss  (%rax,%rbx,4),%xmm1
add    $0x1,%rbx
ucomiss %xmm2,%xmm0
ja     1170 <rebin+0x70>
add    %ebx,%r11d
jmp    1130 <rebin+0x30>
cmp    $0x2,%edi
jl     12f7 <rebin+0x1f7>
lea    -0x1(%r10),%r8
mov    $0x1,%esi
cmp    $0x8,%r8
jb     1281 <rebin+0x181>
lea    (%rdx,%r10,4),%rax
cmp    %rax,%r9
jae    11c2 <rebin+0xc2>
lea    (%rcx,%r10,4),%rax
lea    0x4(%rdx),%rbx
cmp    %rax,%rbx
jb     1281 <rebin+0x181>
mov    %r8,%rsi
and    $0xfffffffffffffff8,%rsi
lea    -0x8(%rsi),%rax
mov    %rax,%r11
shr    $0x3,%r11
add    $0x1,%r11
mov    %r11d,%r9d
and    $0x3,%r9d
cmp    $0x18,%rax
jae    11e9 <rebin+0xe9>
xor    %eax,%eax
jmp    124a <rebin+0x14a>
and    $0xfffffffffffffffc,%r11
xor    %eax,%eax
nop
movups 0x4(%rdx,%rax,4),%xmm0
movups 0x14(%rdx,%rax,4),%xmm1
movups %xmm0,0x4(%rcx,%rax,4)
movups %xmm1,0x14(%rcx,%rax,4)
movups 0x24(%rdx,%rax,4),%xmm0
movups 0x34(%rdx,%rax,4),%xmm1
movups %xmm0,0x24(%rcx,%rax,4)
movups %xmm1,0x34(%rcx,%rax,4)
movups 0x44(%rdx,%rax,4),%xmm0
movups 0x54(%rdx,%rax,4),%xmm1
movups %xmm0,0x44(%rcx,%rax,4)
movups %xmm1,0x54(%rcx,%rax,4)
movups 0x64(%rdx,%rax,4),%xmm0
movups 0x74(%rdx,%rax,4),%xmm1
movups %xmm0,0x64(%rcx,%rax,4)
movups %xmm1,0x74(%rcx,%rax,4)
add    $0x20,%rax
add    $0xfffffffffffffffc,%r11
jne    11f0 <rebin+0xf0>
test   %r9,%r9
je     1278 <rebin+0x178>
nop
lea    0x0(,%rax,4),%rbx
or     $0x4,%rbx
movups (%rdx,%rbx,1),%xmm0
movups 0x10(%rdx,%rbx,1),%xmm1
movups %xmm0,(%rcx,%rbx,1)
movups %xmm1,0x10(%rcx,%rbx,1)
add    $0x8,%rax
add    $0xffffffffffffffff,%r9
jne    1250 <rebin+0x150>
cmp    %rsi,%r8
je     12f7 <rebin+0x1f7>
or     $0x1,%rsi
mov    %r10d,%eax
sub    %esi,%eax
mov    %rsi,%r8
not    %r8
add    %r10,%r8
and    $0x3,%rax
je     12b4 <rebin+0x1b4>
cs nopw 0x0(%rax,%rax,1)
nop
movss  (%rdx,%rsi,4),%xmm0
movss  %xmm0,(%rcx,%rsi,4)
add    $0x1,%rsi
add    $0xffffffffffffffff,%rax
jne    12a0 <rebin+0x1a0>
cmp    $0x3,%r8
jb     12f7 <rebin+0x1f7>
nopw   0x0(%rax,%rax,1)
movss  (%rdx,%rsi,4),%xmm0
movss  %xmm0,(%rcx,%rsi,4)
movss  0x4(%rdx,%rsi,4),%xmm0
movss  %xmm0,0x4(%rcx,%rsi,4)
movss  0x8(%rdx,%rsi,4),%xmm0
movss  %xmm0,0x8(%rcx,%rsi,4)
movss  0xc(%rdx,%rsi,4),%xmm0
movss  %xmm0,0xc(%rcx,%rsi,4)
add    $0x4,%rsi
cmp    %rsi,%r10
jne    12c0 <rebin+0x1c0>
movslq %edi,%rax
movl   $0x3f800000,(%rcx,%rax,4)
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
define void @rebin(float %0, i32 %1, float* %2, float* %3, float* %4) {
%6 = alloca float
%7 = alloca i32
%8 = alloca float*
%9 = alloca float*
%10 = alloca float*
%11 = alloca i32
%12 = alloca i32
%13 = alloca float
%14 = alloca float
%15 = alloca float
store float %0, float* %6
store i32 %1, i32* %7
store float* %2, float** %8
store float* %3, float** %9
store float* %4, float** %10
store i32 0, i32* %12
store float 0.000000e+00, float* %13
store float 0.000000e+00, float* %14
store i32 1, i32* %11
br label %16
16: ; preds = %61, %5
%17 = load i32, i32* %11
%18 = load i32, i32* %7
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %64
20: ; preds = %16
br label %21
21: ; preds = %25, %20
%22 = load float, float* %6
%23 = load float, float* %13
%24 = fcmp ogt float %22, %23
br i1 %24, label %25, label %40
25: ; preds = %21
%26 = load float*, float** %8
%27 = load i32, i32* %12
%28 = add nsw i32 %27, 1
store i32 %28, i32* %12
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds float, float* %26, i64 %29
%31 = load float, float* %30
%32 = load float, float* %13
%33 = fadd float %32, %31
store float %33, float* %13
%34 = load float, float* %14
store float %34, float* %15
%35 = load float*, float** %10
%36 = load i32, i32* %12
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds float, float* %35, i64 %37
%39 = load float, float* %38
store float %39, float* %14
br label %21
40: ; preds = %21
%41 = load float, float* %6
%42 = load float, float* %13
%43 = fsub float %42, %41
store float %43, float* %13
%44 = load float, float* %14
%45 = load float, float* %14
%46 = load float, float* %15
%47 = fsub float %45, %46
%48 = load float, float* %13
%49 = fmul float %47, %48
%50 = load float*, float** %8
%51 = load i32, i32* %12
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds float, float* %50, i64 %52
%54 = load float, float* %53
%55 = fdiv float %49, %54
%56 = fsub float %44, %55
%57 = load float*, float** %9
%58 = load i32, i32* %11
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds float, float* %57, i64 %59
store float %56, float* %60
br label %61
61: ; preds = %40
%62 = load i32, i32* %11
%63 = add nsw i32 %62, 1
store i32 %63, i32* %11
br label %16
64: ; preds = %16
store i32 1, i32* %11
br label %65
65: ; preds = %79, %64
%66 = load i32, i32* %11
%67 = load i32, i32* %7
%68 = icmp slt i32 %66, %67
br i1 %68, label %69, label %82
69: ; preds = %65
%70 = load float*, float** %9
%71 = load i32, i32* %11
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds float, float* %70, i64 %72
%74 = load float, float* %73
%75 = load float*, float** %10
%76 = load i32, i32* %11
%77 = sext i32 %76 to i64
%78 = getelementptr inbounds float, float* %75, i64 %77
store float %74, float* %78
br label %79
79: ; preds = %69
%80 = load i32, i32* %11
%81 = add nsw i32 %80, 1
store i32 %81, i32* %11
br label %65
82: ; preds = %65
%83 = load float*, float** %10
%84 = load i32, i32* %7
%85 = sext i32 %84 to i64
%86 = getelementptr inbounds float, float* %83, i64 %85
store float 1.000000e+00, float* %86
ret void
}

LLVM IR (-O2):
define void @rebin(float %0, i32 %1, float* nocapture %2, float* nocapture %3, float* nocapture %4) {
%6 = icmp sgt i32 %1, 1
br i1 %6, label %7, label %180
7: ; preds = %5
%8 = zext i32 %1 to i64
br label %9
9: ; preds = %7, %145
%10 = phi i64 [ 1, %7 ], [ %159, %145 ]
%11 = phi float [ undef, %7 ], [ %149, %145 ]
%12 = phi float [ 0.000000e+00, %7 ], [ %148, %145 ]
%13 = phi float [ 0.000000e+00, %7 ], [ %150, %145 ]
%14 = phi i32 [ 0, %7 ], [ %146, %145 ]
%15 = fcmp olt float %13, %0
br i1 %15, label %16, label %145
16: ; preds = %9
%17 = sext i32 %14 to i64
br label %132
18: ; preds = %145
br i1 %6, label %19, label %180
19: ; preds = %18
%20 = zext i32 %1 to i64
%21 = add nsw i64 %8, -1
%22 = icmp ult i64 %21, 8
br i1 %22, label %113, label %23
23: ; preds = %19
%24 = getelementptr float, float* %4, i64 1
%25 = getelementptr float, float* %4, i64 %8
%26 = getelementptr float, float* %3, i64 1
%27 = getelementptr float, float* %3, i64 %8
%28 = icmp ult float* %24, %27
%29 = icmp ult float* %26, %25
%30 = and i1 %28, %29
br i1 %30, label %113, label %31
31: ; preds = %23
%32 = and i64 %21, -8
%33 = or i64 %32, 1
%34 = add nsw i64 %32, -8
%35 = lshr exact i64 %34, 3
%36 = add nuw nsw i64 %35, 1
%37 = and i64 %36, 3
%38 = icmp ult i64 %34, 24
br i1 %38, label %91, label %39
39: ; preds = %31
%40 = and i64 %36, 4611686018427387900
br label %41
41: ; preds = %41, %39
%42 = phi i64 [ 0, %39 ], [ %88, %41 ]
%43 = phi i64 [ 0, %39 ], [ %89, %41 ]
%44 = or i64 %42, 1
%45 = getelementptr inbounds float, float* %3, i64 %44
%46 = bitcast float* %45 to <4 x float>*
%47 = load <4 x float>, <4 x float>* %46
%48 = getelementptr inbounds float, float* %45, i64 4
%49 = bitcast float* %48 to <4 x float>*
%50 = load <4 x float>, <4 x float>* %49
%51 = getelementptr inbounds float, float* %4, i64 %44
%52 = bitcast float* %51 to <4 x float>*
store <4 x float> %47, <4 x float>* %52
%53 = getelementptr inbounds float, float* %51, i64 4
%54 = bitcast float* %53 to <4 x float>*
store <4 x float> %50, <4 x float>* %54
%55 = or i64 %42, 9
%56 = getelementptr inbounds float, float* %3, i64 %55
%57 = bitcast float* %56 to <4 x float>*
%58 = load <4 x float>, <4 x float>* %57
%59 = getelementptr inbounds float, float* %56, i64 4
%60 = bitcast float* %59 to <4 x float>*
%61 = load <4 x float>, <4 x float>* %60
%62 = getelementptr inbounds float, float* %4, i64 %55
%63 = bitcast float* %62 to <4 x float>*
store <4 x float> %58, <4 x float>* %63
%64 = getelementptr inbounds float, float* %62, i64 4
%65 = bitcast float* %64 to <4 x float>*
store <4 x float> %61, <4 x float>* %65
%66 = or i64 %42, 17
%67 = getelementptr inbounds float, float* %3, i64 %66
%68 = bitcast float* %67 to <4 x float>*
%69 = load <4 x float>, <4 x float>* %68
%70 = getelementptr inbounds float, float* %67, i64 4
%71 = bitcast float* %70 to <4 x float>*
%72 = load <4 x float>, <4 x float>* %71
%73 = getelementptr inbounds float, float* %4, i64 %66
%74 = bitcast float* %73 to <4 x float>*
store <4 x float> %69, <4 x float>* %74
%75 = getelementptr inbounds float, float* %73, i64 4
%76 = bitcast float* %75 to <4 x float>*
store <4 x float> %72, <4 x float>* %76
%77 = or i64 %42, 25
%78 = getelementptr inbounds float, float* %3, i64 %77
%79 = bitcast float* %78 to <4 x float>*
%80 = load <4 x float>, <4 x float>* %79
%81 = getelementptr inbounds float, float* %78, i64 4
%82 = bitcast float* %81 to <4 x float>*
%83 = load <4 x float>, <4 x float>* %82
%84 = getelementptr inbounds float, float* %4, i64 %77
%85 = bitcast float* %84 to <4 x float>*
store <4 x float> %80, <4 x float>* %85
%86 = getelementptr inbounds float, float* %84, i64 4
%87 = bitcast float* %86 to <4 x float>*
store <4 x float> %83, <4 x float>* %87
%88 = add nuw i64 %42, 32
%89 = add i64 %43, 4
%90 = icmp eq i64 %89, %40
br i1 %90, label %91, label %41
91: ; preds = %41, %31
%92 = phi i64 [ 0, %31 ], [ %88, %41 ]
%93 = icmp eq i64 %37, 0
br i1 %93, label %111, label %94
94: ; preds = %91, %94
%95 = phi i64 [ %108, %94 ], [ %92, %91 ]
%96 = phi i64 [ %109, %94 ], [ 0, %91 ]
%97 = or i64 %95, 1
%98 = getelementptr inbounds float, float* %3, i64 %97
%99 = bitcast float* %98 to <4 x float>*
%100 = load <4 x float>, <4 x float>* %99
%101 = getelementptr inbounds float, float* %98, i64 4
%102 = bitcast float* %101 to <4 x float>*
%103 = load <4 x float>, <4 x float>* %102
%104 = getelementptr inbounds float, float* %4, i64 %97
%105 = bitcast float* %104 to <4 x float>*
store <4 x float> %100, <4 x float>* %105
%106 = getelementptr inbounds float, float* %104, i64 4
%107 = bitcast float* %106 to <4 x float>*
store <4 x float> %103, <4 x float>* %107
%108 = add nuw i64 %95, 8
%109 = add i64 %96, 1
%110 = icmp eq i64 %109, %37
br i1 %110, label %111, label %94
111: ; preds = %94, %91
%112 = icmp eq i64 %21, %32
br i1 %112, label %180, label %113
113: ; preds = %23, %19, %111
%114 = phi i64 [ 1, %23 ], [ 1, %19 ], [ %33, %111 ]
%115 = sub nsw i64 %8, %114
%116 = xor i64 %114, -1
%117 = add nsw i64 %116, %8
%118 = and i64 %115, 3
%119 = icmp eq i64 %118, 0
br i1 %119, label %129, label %120
120: ; preds = %113, %120
%121 = phi i64 [ %126, %120 ], [ %114, %113 ]
%122 = phi i64 [ %127, %120 ], [ 0, %113 ]
%123 = getelementptr inbounds float, float* %3, i64 %121
%124 = load float, float* %123
%125 = getelementptr inbounds float, float* %4, i64 %121
store float %124, float* %125
%126 = add nuw nsw i64 %121, 1
%127 = add i64 %122, 1
%128 = icmp eq i64 %127, %118
br i1 %128, label %129, label %120
129: ; preds = %120, %113
%130 = phi i64 [ %114, %113 ], [ %126, %120 ]
%131 = icmp ult i64 %117, 3
br i1 %131, label %180, label %161
132: ; preds = %16, %132
%133 = phi i64 [ %17, %16 ], [ %136, %132 ]
%134 = phi float [ %12, %16 ], [ %141, %132 ]
%135 = phi float [ %13, %16 ], [ %139, %132 ]
%136 = add i64 %133, 1
%137 = getelementptr inbounds float, float* %2, i64 %136
%138 = load float, float* %137
%139 = fadd float %135, %138
%140 = getelementptr inbounds float, float* %4, i64 %136
%141 = load float, float* %140
%142 = fcmp olt float %139, %0
br i1 %142, label %132, label %143
143: ; preds = %132
%144 = trunc i64 %136 to i32
br label %145
145: ; preds = %143, %9
%146 = phi i32 [ %14, %9 ], [ %144, %143 ]
%147 = phi float [ %13, %9 ], [ %139, %143 ]
%148 = phi float [ %12, %9 ], [ %141, %143 ]
%149 = phi float [ %11, %9 ], [ %134, %143 ]
%150 = fsub float %147, %0
%151 = fsub float %148, %149
%152 = fmul float %150, %151
%153 = sext i32 %146 to i64
%154 = getelementptr inbounds float, float* %2, i64 %153
%155 = load float, float* %154
%156 = fdiv float %152, %155
%157 = fsub float %148, %156
%158 = getelementptr inbounds float, float* %3, i64 %10
store float %157, float* %158
%159 = add nuw nsw i64 %10, 1
%160 = icmp eq i64 %159, %8
br i1 %160, label %18, label %9
161: ; preds = %129, %161
%162 = phi i64 [ %178, %161 ], [ %130, %129 ]
%163 = getelementptr inbounds float, float* %3, i64 %162
%164 = load float, float* %163
%165 = getelementptr inbounds float, float* %4, i64 %162
store float %164, float* %165
%166 = add nuw nsw i64 %162, 1
%167 = getelementptr inbounds float, float* %3, i64 %166
%168 = load float, float* %167
%169 = getelementptr inbounds float, float* %4, i64 %166
store float %168, float* %169
%170 = add nuw nsw i64 %162, 2
%171 = getelementptr inbounds float, float* %3, i64 %170
%172 = load float, float* %171
%173 = getelementptr inbounds float, float* %4, i64 %170
store float %172, float* %173
%174 = add nuw nsw i64 %162, 3
%175 = getelementptr inbounds float, float* %3, i64 %174
%176 = load float, float* %175
%177 = getelementptr inbounds float, float* %4, i64 %174
store float %176, float* %177
%178 = add nuw nsw i64 %162, 4
%179 = icmp eq i64 %178, %20
br i1 %179, label %180, label %161
180: ; preds = %129, %161, %111, %5, %18
%181 = sext i32 %1 to i64
%182 = getelementptr inbounds float, float* %4, i64 %181
store float 1.000000e+00, float* %182
ret void
}