void tapr(s, nt, it0, it1, it2, it3) float *s;
int nt, it0, it1, it2, it3;
{
  float fac;
  float pi = 3.14159265;
  int it;
  fac = pi / (float)(it1 - it0);
  for (it = 0; it < it0; it++)
    s[it] = 0.0;
  for (it = it0; it < it1; it++)
    s[it] = s[it] * 0.5 * (1.0 - cos((it - it0) * fac));
  if (it2 < nt) {
    if (it3 > nt)
      it3 = nt;
    fac = pi / (float)(it3 - it2);
    for (it = it2; it < it3; it++)
      s[it] = s[it] * 0.5 * (1.0 + cos((it - it2) * fac));
    for (it = it3; it < nt; it++)
      s[it] = 0.0;
  }
}


x86 assembly (clang, -O0):
<tapr>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    %r8d,-0x18(%rbp)
mov    %r9d,-0x1c(%rbp)
movss  0xecb(%rip),%xmm0
movss  %xmm0,-0x24(%rbp)
movss  -0x24(%rbp),%xmm0
mov    -0x14(%rbp),%eax
sub    -0x10(%rbp),%eax
cvtsi2ss %eax,%xmm1
divss  %xmm1,%xmm0
movss  %xmm0,-0x20(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    1183 <tapr+0x73>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1159 <tapr+0x49>
mov    -0x10(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1206 <tapr+0xf6>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  0xe62(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x30(%rbp)
mov    -0x28(%rbp),%eax
sub    -0x10(%rbp),%eax
cvtsi2ss %eax,%xmm0
mulss  -0x20(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
call   1030 <cos@plt>
movaps %xmm0,%xmm2
movsd  -0x30(%rbp),%xmm0
movsd  0xe29(%rip),%xmm1
subsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1189 <tapr+0x79>
mov    -0x18(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12f4 <tapr+0x1e4>
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jle    1224 <tapr+0x114>
mov    -0xc(%rbp),%eax
mov    %eax,-0x1c(%rbp)
movss  -0x24(%rbp),%xmm0
mov    -0x1c(%rbp),%eax
sub    -0x18(%rbp),%eax
cvtsi2ss %eax,%xmm1
divss  %xmm1,%xmm0
movss  %xmm0,-0x20(%rbp)
mov    -0x18(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    12bf <tapr+0x1af>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
movsd  0xda9(%rip),%xmm1
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x28(%rbp),%eax
sub    -0x18(%rbp),%eax
cvtsi2ss %eax,%xmm0
mulss  -0x20(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
call   1030 <cos@plt>
movaps %xmm0,%xmm2
movsd  -0x38(%rbp),%xmm0
movsd  0xd70(%rip),%xmm1
addsd  %xmm2,%xmm1
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1242 <tapr+0x132>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12ef <tapr+0x1df>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12c5 <tapr+0x1b5>
jmp    12f4 <tapr+0x1e4>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<tapr>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %r9d,0xc(%rsp)
mov    %r8d,%r13d
mov    %ecx,%ebp
mov    %edx,%ebx
mov    %esi,%r12d
mov    %rdi,%r15
test   %edx,%edx
jle    1154 <tapr+0x34>
mov    %ebx,%edx
shl    $0x2,%rdx
mov    %r15,%rdi
xor    %esi,%esi
call   1030 <memset@plt>
cmp    %ebx,%ebp
jle    11d7 <tapr+0xb7>
movslq %ebp,%r14
sub    %ebx,%ebp
cvtsi2ss %ebp,%xmm0
movss  0xe97(%rip),%xmm1
divss  %xmm0,%xmm1
movss  %xmm1,0x8(%rsp)
movslq %ebx,%rax
lea    (%r15,%rax,4),%rbx
sub    %rax,%r14
xor    %ebp,%ebp
nop
movss  (%rbx,%rbp,4),%xmm0
xorps  %xmm1,%xmm1
cvtsi2ss %ebp,%xmm1
cvtss2sd %xmm0,%xmm0
mulsd  0xe70(%rip),%xmm0
movsd  %xmm0,0x10(%rsp)
mulss  0x8(%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
call   1040 <cos@plt>
movsd  0xe58(%rip),%xmm1
subsd  %xmm0,%xmm1
mulsd  0x10(%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtsd2ss %xmm1,%xmm0
movss  %xmm0,(%rbx,%rbp,4)
add    $0x1,%rbp
cmp    %rbp,%r14
jne    1180 <tapr+0x60>
cmp    %r12d,%r13d
jge    12a2 <tapr+0x182>
mov    0xc(%rsp),%eax
cmp    %r12d,%eax
cmovg  %r12d,%eax
movslq %eax,%r14
sub    %r13d,%eax
movss  0xe07(%rip),%xmm0
movss  %xmm0,0x8(%rsp)
jle    1282 <tapr+0x162>
xorps  %xmm0,%xmm0
cvtsi2ss %eax,%xmm0
movss  0x8(%rsp),%xmm1
divss  %xmm0,%xmm1
movss  %xmm1,0x8(%rsp)
movslq %r13d,%rax
lea    (%r15,%rax,4),%rbp
mov    %r14,%r13
sub    %rax,%r13
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
movss  0x0(%rbp,%rbx,4),%xmm0
xorps  %xmm1,%xmm1
cvtsi2ss %ebx,%xmm1
cvtss2sd %xmm0,%xmm0
mulsd  0xdbf(%rip),%xmm0
movsd  %xmm0,0x10(%rsp)
mulss  0x8(%rsp),%xmm1
xorps  %xmm0,%xmm0
cvtss2sd %xmm1,%xmm0
call   1040 <cos@plt>
addsd  0xda7(%rip),%xmm0
mulsd  0x10(%rsp),%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,0x0(%rbp,%rbx,4)
add    $0x1,%rbx
cmp    %rbx,%r13
jne    1230 <tapr+0x110>
cmp    0xc(%rsp),%r12d
jle    12a2 <tapr+0x182>
lea    (%r15,%r14,4),%rdi
not    %r14d
add    %r12d,%r14d
lea    0x4(,%r14,4),%rdx
xor    %esi,%esi
call   1030 <memset@plt>
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @tapr(float* nocapture %0, i32 %1, i32 %2, i32 %3, i32 %4, i32 %5) {
%7 = sub nsw i32 %3, %2
%8 = sitofp i32 %7 to float
%9 = fdiv float 0x400921FB60000000, %8
%10 = icmp sgt i32 %2, 0
br i1 %10, label %11, label %15
11: ; preds = %6
%12 = bitcast float* %0 to i8*
%13 = zext i32 %2 to i64
%14 = shl nuw nsw i64 %13, 2
br label %15
15: ; preds = %11, %6
%16 = icmp sgt i32 %3, %2
br i1 %16, label %17, label %37
17: ; preds = %15
%18 = sext i32 %2 to i64
%19 = sext i32 %3 to i64
br label %20
20: ; preds = %17, %20
%21 = phi i64 [ %18, %17 ], [ %35, %20 ]
%22 = getelementptr inbounds float, float* %0, i64 %21
%23 = load float, float* %22
%24 = fpext float %23 to double
%25 = fmul double %24, 5.000000e-01
%26 = trunc i64 %21 to i32
%27 = sub i32 %26, %2
%28 = sitofp i32 %27 to float
%29 = fmul float %9, %28
%30 = fpext float %29 to double
%31 = tail call double @cos(double %30)
%32 = fsub double 1.000000e+00, %31
%33 = fmul double %25, %32
%34 = fptrunc double %33 to float
store float %34, float* %22
%35 = add nsw i64 %21, 1
%36 = icmp eq i64 %35, %19
br i1 %36, label %37, label %20
37: ; preds = %20, %15
%38 = icmp slt i32 %4, %1
br i1 %38, label %39, label %77
39: ; preds = %37
%40 = icmp sgt i32 %5, %1
%41 = select i1 %40, i32 %1, i32 %5
%42 = sub nsw i32 %41, %4
%43 = sitofp i32 %42 to float
%44 = fdiv float 0x400921FB60000000, %43
%45 = icmp sgt i32 %41, %4
br i1 %45, label %46, label %49
46: ; preds = %39
%47 = sext i32 %4 to i64
%48 = sext i32 %41 to i64
br label %60
49: ; preds = %60, %39
%50 = icmp sgt i32 %1, %5
br i1 %50, label %51, label %77
51: ; preds = %49
%52 = sext i32 %41 to i64
%53 = getelementptr float, float* %0, i64 %52
%54 = bitcast float* %53 to i8*
%55 = xor i32 %41, -1
%56 = add i32 %55, %1
%57 = zext i32 %56 to i64
%58 = shl nuw nsw i64 %57, 2
%59 = add nuw nsw i64 %58, 4
br label %77
60: ; preds = %46, %60
%61 = phi i64 [ %47, %46 ], [ %75, %60 ]
%62 = getelementptr inbounds float, float* %0, i64 %61
%63 = load float, float* %62
%64 = fpext float %63 to double
%65 = fmul double %64, 5.000000e-01
%66 = trunc i64 %61 to i32
%67 = sub i32 %66, %4
%68 = sitofp i32 %67 to float
%69 = fmul float %44, %68
%70 = fpext float %69 to double
%71 = tail call double @cos(double %70)
%72 = fadd double %71, 1.000000e+00
%73 = fmul double %65, %72
%74 = fptrunc double %73 to float
store float %74, float* %62
%75 = add nsw i64 %61, 1
%76 = icmp eq i64 %75, %48
br i1 %76, label %49, label %60
77: ; preds = %51, %49, %37
ret void
}