void CreateDenseGrid(int r, int numtaps, int numband, double bands[],
                     double des[], double weight[], int *gridsize,
                     double Grid[], double D[], double W[], int symmetry) {
  int i, j, k, band;
  double delf, lowf, highf;
  delf = 0.5 / (16 * r);
  if ((symmetry == 0) && (delf > bands[0]))
    bands[0] = delf;
  j = 0;
  for (band = 0; band < numband; band++) {
    Grid[j] = bands[2 * band];
    lowf = bands[2 * band];
    highf = bands[2 * band + 1];
    k = (int)((highf - lowf) / delf + 0.5);
    for (i = 0; i < k; i++) {
      D[j] = des[band];
      W[j] = weight[band];
      Grid[j] = lowf;
      lowf += delf;
      j++;
    }
    Grid[j - 1] = highf;
  }
  if ((symmetry == 0) && (Grid[*gridsize - 1] > (0.5 - delf)) &&
      (numtaps % 2)) {
    Grid[*gridsize - 1] = 0.5 - delf;
  }
}


x86 assembly (clang, -O0):
<CreateDenseGrid>:
push   %rbp
mov    %rsp,%rbp
mov    0x30(%rbp),%eax
mov    0x28(%rbp),%rax
mov    0x20(%rbp),%rax
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9,-0x28(%rbp)
mov    -0x4(%rbp),%eax
shl    $0x4,%eax
cvtsi2sd %eax,%xmm1
movsd  0xec2(%rip),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x40(%rbp)
cmpl   $0x0,0x30(%rbp)
jne    1171 <CreateDenseGrid+0x71>
movsd  -0x40(%rbp),%xmm0
mov    -0x18(%rbp),%rax
ucomisd (%rax),%xmm0
jbe    1171 <CreateDenseGrid+0x71>
movsd  -0x40(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x0,-0x30(%rbp)
movl   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12a1 <CreateDenseGrid+0x1a1>
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x18(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x18(%rbp),%rax
mov    -0x38(%rbp),%ecx
shl    $0x1,%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x50(%rbp)
movsd  -0x50(%rbp),%xmm0
subsd  -0x48(%rbp),%xmm0
divsd  -0x40(%rbp),%xmm0
movsd  0xe0e(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%eax
mov    %eax,-0x34(%rbp)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x34(%rbp),%eax
jge    127c <CreateDenseGrid+0x17c>
mov    -0x20(%rbp),%rax
movslq -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x20(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%rax
movslq -0x38(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    0x28(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x48(%rbp),%xmm0
mov    0x18(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
addsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1204 <CreateDenseGrid+0x104>
movsd  -0x50(%rbp),%xmm0
mov    0x18(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x38(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x38(%rbp)
jmp    117f <CreateDenseGrid+0x7f>
cmpl   $0x0,0x30(%rbp)
jne    130d <CreateDenseGrid+0x20d>
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rcx
mov    (%rcx),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xd38(%rip),%xmm1
subsd  -0x40(%rbp),%xmm1
ucomisd %xmm1,%xmm0
jbe    130d <CreateDenseGrid+0x20d>
mov    -0x8(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
je     130d <CreateDenseGrid+0x20d>
movsd  0xd0d(%rip),%xmm0
subsd  -0x40(%rbp),%xmm0
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rcx
mov    (%rcx),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
pop    %rbp
ret

x86 assembly (clang, -O2):
<CreateDenseGrid>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
shl    $0x4,%edi
cvtsi2sd %edi,%xmm2
mov    0x50(%rsp),%r10d
movsd  0xee4(%rip),%xmm0
movapd %xmm0,%xmm1
divsd  %xmm2,%xmm1
test   %r10d,%r10d
jne    1133 <CreateDenseGrid+0x33>
ucomisd (%rcx),%xmm1
jbe    1133 <CreateDenseGrid+0x33>
movsd  %xmm1,(%rcx)
mov    0x38(%rsp),%r11
test   %edx,%edx
jle    123b <CreateDenseGrid+0x13b>
mov    0x48(%rsp),%rdi
mov    0x40(%rsp),%rax
mov    %edx,%r14d
xor    %ebx,%ebx
xor    %r12d,%r12d
jmp    117a <CreateDenseGrid+0x7a>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
mov    %edx,%r12d
movslq %r12d,%rdx
movsd  %xmm2,-0x8(%r11,%rdx,8)
add    $0x1,%rbx
cmp    %r14,%rbx
je     123b <CreateDenseGrid+0x13b>
mov    %rbx,%rbp
shl    $0x4,%rbp
movsd  (%rcx,%rbp,1),%xmm2
movslq %r12d,%rdx
movsd  %xmm2,(%r11,%rdx,8)
movsd  (%rcx,%rbp,1),%xmm3
movsd  0x8(%rcx,%rbp,1),%xmm2
movapd %xmm2,%xmm4
subsd  %xmm3,%xmm4
divsd  %xmm1,%xmm4
addsd  %xmm0,%xmm4
cvttsd2si %xmm4,%r15d
test   %r15d,%r15d
jle    1163 <CreateDenseGrid+0x63>
cmp    $0x1,%r15d
je     120c <CreateDenseGrid+0x10c>
mov    %r15d,%ebp
and    $0xfffffffe,%ebp
movsd  (%r8,%rbx,8),%xmm4
movsd  %xmm4,(%rax,%rdx,8)
movsd  (%r9,%rbx,8),%xmm4
movsd  %xmm4,(%rdi,%rdx,8)
movsd  %xmm3,(%r11,%rdx,8)
addsd  %xmm1,%xmm3
movsd  (%r8,%rbx,8),%xmm4
movsd  %xmm4,0x8(%rax,%rdx,8)
movsd  (%r9,%rbx,8),%xmm4
movsd  %xmm4,0x8(%rdi,%rdx,8)
movsd  %xmm3,0x8(%r11,%rdx,8)
addsd  %xmm1,%xmm3
add    $0x2,%rdx
add    $0xfffffffe,%ebp
jne    11c0 <CreateDenseGrid+0xc0>
test   $0x1,%r15b
je     1160 <CreateDenseGrid+0x60>
movsd  (%r8,%rbx,8),%xmm4
movsd  %xmm4,(%rax,%rdx,8)
movsd  (%r9,%rbx,8),%xmm4
movsd  %xmm4,(%rdi,%rdx,8)
movsd  %xmm3,(%r11,%rdx,8)
add    $0x1,%rdx
jmp    1160 <CreateDenseGrid+0x60>
test   %r10d,%r10d
jne    1266 <CreateDenseGrid+0x166>
test   $0x1,%sil
je     1266 <CreateDenseGrid+0x166>
mov    0x30(%rsp),%rax
movslq (%rax),%rax
movsd  -0x8(%r11,%rax,8),%xmm2
subsd  %xmm1,%xmm0
ucomisd %xmm0,%xmm2
jbe    1266 <CreateDenseGrid+0x166>
movsd  %xmm0,-0x8(%r11,%rax,8)
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @CreateDenseGrid(i32 %0, i32 %1, i32 %2, double* %3, double* %4, double* %5, i32* %6, double* %7, double* %8, double* %9, i32 %10) {
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca double*
%16 = alloca double*
%17 = alloca double*
%18 = alloca i32*
%19 = alloca double*
%20 = alloca double*
%21 = alloca double*
%22 = alloca i32
%23 = alloca i32
%24 = alloca i32
%25 = alloca i32
%26 = alloca i32
%27 = alloca double
%28 = alloca double
%29 = alloca double
store i32 %0, i32* %12
store i32 %1, i32* %13
store i32 %2, i32* %14
store double* %3, double** %15
store double* %4, double** %16
store double* %5, double** %17
store i32* %6, i32** %18
store double* %7, double** %19
store double* %8, double** %20
store double* %9, double** %21
store i32 %10, i32* %22
%30 = load i32, i32* %12
%31 = mul nsw i32 16, %30
%32 = sitofp i32 %31 to double
%33 = fdiv double 5.000000e-01, %32
store double %33, double* %27
%34 = load i32, i32* %22
%35 = icmp eq i32 %34, 0
br i1 %35, label %36, label %46
36: ; preds = %11
%37 = load double, double* %27
%38 = load double*, double** %15
%39 = getelementptr inbounds double, double* %38, i64 0
%40 = load double, double* %39
%41 = fcmp ogt double %37, %40
br i1 %41, label %42, label %46
42: ; preds = %36
%43 = load double, double* %27
%44 = load double*, double** %15
%45 = getelementptr inbounds double, double* %44, i64 0
store double %43, double* %45
br label %46
46: ; preds = %42, %36, %11
store i32 0, i32* %24
store i32 0, i32* %26
br label %47
47: ; preds = %125, %46
%48 = load i32, i32* %26
%49 = load i32, i32* %14
%50 = icmp slt i32 %48, %49
br i1 %50, label %51, label %128
51: ; preds = %47
%52 = load double*, double** %15
%53 = load i32, i32* %26
%54 = mul nsw i32 2, %53
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds double, double* %52, i64 %55
%57 = load double, double* %56
%58 = load double*, double** %19
%59 = load i32, i32* %24
%60 = sext i32 %59 to i64
%61 = getelementptr inbounds double, double* %58, i64 %60
store double %57, double* %61
%62 = load double*, double** %15
%63 = load i32, i32* %26
%64 = mul nsw i32 2, %63
%65 = sext i32 %64 to i64
%66 = getelementptr inbounds double, double* %62, i64 %65
%67 = load double, double* %66
store double %67, double* %28
%68 = load double*, double** %15
%69 = load i32, i32* %26
%70 = mul nsw i32 2, %69
%71 = add nsw i32 %70, 1
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds double, double* %68, i64 %72
%74 = load double, double* %73
store double %74, double* %29
%75 = load double, double* %29
%76 = load double, double* %28
%77 = fsub double %75, %76
%78 = load double, double* %27
%79 = fdiv double %77, %78
%80 = fadd double %79, 5.000000e-01
%81 = fptosi double %80 to i32
store i32 %81, i32* %25
store i32 0, i32* %23
br label %82
82: ; preds = %115, %51
%83 = load i32, i32* %23
%84 = load i32, i32* %25
%85 = icmp slt i32 %83, %84
br i1 %85, label %86, label %118
86: ; preds = %82
%87 = load double*, double** %16
%88 = load i32, i32* %26
%89 = sext i32 %88 to i64
%90 = getelementptr inbounds double, double* %87, i64 %89
%91 = load double, double* %90
%92 = load double*, double** %20
%93 = load i32, i32* %24
%94 = sext i32 %93 to i64
%95 = getelementptr inbounds double, double* %92, i64 %94
store double %91, double* %95
%96 = load double*, double** %17
%97 = load i32, i32* %26
%98 = sext i32 %97 to i64
%99 = getelementptr inbounds double, double* %96, i64 %98
%100 = load double, double* %99
%101 = load double*, double** %21
%102 = load i32, i32* %24
%103 = sext i32 %102 to i64
%104 = getelementptr inbounds double, double* %101, i64 %103
store double %100, double* %104
%105 = load double, double* %28
%106 = load double*, double** %19
%107 = load i32, i32* %24
%108 = sext i32 %107 to i64
%109 = getelementptr inbounds double, double* %106, i64 %108
store double %105, double* %109
%110 = load double, double* %27
%111 = load double, double* %28
%112 = fadd double %111, %110
store double %112, double* %28
%113 = load i32, i32* %24
%114 = add nsw i32 %113, 1
store i32 %114, i32* %24
br label %115
115: ; preds = %86
%116 = load i32, i32* %23
%117 = add nsw i32 %116, 1
store i32 %117, i32* %23
br label %82
118: ; preds = %82
%119 = load double, double* %29
%120 = load double*, double** %19
%121 = load i32, i32* %24
%122 = sub nsw i32 %121, 1
%123 = sext i32 %122 to i64
%124 = getelementptr inbounds double, double* %120, i64 %123
store double %119, double* %124
br label %125
125: ; preds = %118
%126 = load i32, i32* %26
%127 = add nsw i32 %126, 1
store i32 %127, i32* %26
br label %47
128: ; preds = %47
%129 = load i32, i32* %22
%130 = icmp eq i32 %129, 0
br i1 %130, label %131, label %155
131: ; preds = %128
%132 = load double*, double** %19
%133 = load i32*, i32** %18
%134 = load i32, i32* %133
%135 = sub nsw i32 %134, 1
%136 = sext i32 %135 to i64
%137 = getelementptr inbounds double, double* %132, i64 %136
%138 = load double, double* %137
%139 = load double, double* %27
%140 = fsub double 5.000000e-01, %139
%141 = fcmp ogt double %138, %140
br i1 %141, label %142, label %155
142: ; preds = %131
%143 = load i32, i32* %13
%144 = srem i32 %143, 2
%145 = icmp ne i32 %144, 0
br i1 %145, label %146, label %155
146: ; preds = %142
%147 = load double, double* %27
%148 = fsub double 5.000000e-01, %147
%149 = load double*, double** %19
%150 = load i32*, i32** %18
%151 = load i32, i32* %150
%152 = sub nsw i32 %151, 1
%153 = sext i32 %152 to i64
%154 = getelementptr inbounds double, double* %149, i64 %153
store double %148, double* %154
br label %155
155: ; preds = %146, %142, %131, %128
ret void
}

LLVM IR (-O2):
define void @CreateDenseGrid(i32 %0, i32 %1, i32 %2, double* nocapture %3, double* nocapture %4, double* nocapture %5, i32* nocapture %6, double* nocapture %7, double* nocapture writeonly %8, double* nocapture writeonly %9, i32 %10) {
%12 = shl nsw i32 %0, 4
%13 = sitofp i32 %12 to double
%14 = fdiv double 5.000000e-01, %13
%15 = icmp eq i32 %10, 0
br i1 %15, label %16, label %20
16: ; preds = %11
%17 = load double, double* %3
%18 = fcmp ogt double %14, %17
br i1 %18, label %19, label %20
19: ; preds = %16
store double %14, double* %3
br label %20
20: ; preds = %19, %16, %11
%21 = icmp sgt i32 %2, 0
br i1 %21, label %22, label %90
22: ; preds = %20
%23 = zext i32 %2 to i64
br label %24
24: ; preds = %22, %83
%25 = phi i64 [ 0, %22 ], [ %88, %83 ]
%26 = phi i32 [ 0, %22 ], [ %84, %83 ]
%27 = shl nuw nsw i64 %25, 1
%28 = getelementptr inbounds double, double* %3, i64 %27
%29 = load double, double* %28
%30 = sext i32 %26 to i64
%31 = getelementptr inbounds double, double* %7, i64 %30
store double %29, double* %31
%32 = load double, double* %28
%33 = or i64 %27, 1
%34 = getelementptr inbounds double, double* %3, i64 %33
%35 = load double, double* %34
%36 = fsub double %35, %32
%37 = fdiv double %36, %14
%38 = fadd double %37, 5.000000e-01
%39 = fptosi double %38 to i32
%40 = icmp sgt i32 %39, 0
br i1 %40, label %41, label %83
41: ; preds = %24
%42 = getelementptr inbounds double, double* %4, i64 %25
%43 = getelementptr inbounds double, double* %5, i64 %25
%44 = and i32 %39, 1
%45 = icmp eq i32 %39, 1
br i1 %45, label %68, label %46
46: ; preds = %41
%47 = and i32 %39, -2
br label %48
48: ; preds = %48, %46
%49 = phi i64 [ %30, %46 ], [ %65, %48 ]
%50 = phi double [ %32, %46 ], [ %64, %48 ]
%51 = phi i32 [ 0, %46 ], [ %66, %48 ]
%52 = load double, double* %42
%53 = getelementptr inbounds double, double* %8, i64 %49
store double %52, double* %53
%54 = load double, double* %43
%55 = getelementptr inbounds double, double* %9, i64 %49
store double %54, double* %55
%56 = getelementptr inbounds double, double* %7, i64 %49
store double %50, double* %56
%57 = fadd double %14, %50
%58 = add nsw i64 %49, 1
%59 = load double, double* %42
%60 = getelementptr inbounds double, double* %8, i64 %58
store double %59, double* %60
%61 = load double, double* %43
%62 = getelementptr inbounds double, double* %9, i64 %58
store double %61, double* %62
%63 = getelementptr inbounds double, double* %7, i64 %58
store double %57, double* %63
%64 = fadd double %14, %57
%65 = add nsw i64 %49, 2
%66 = add i32 %51, 2
%67 = icmp eq i32 %66, %47
br i1 %67, label %68, label %48
68: ; preds = %48, %41
%69 = phi i64 [ undef, %41 ], [ %65, %48 ]
%70 = phi i64 [ %30, %41 ], [ %65, %48 ]
%71 = phi double [ %32, %41 ], [ %64, %48 ]
%72 = icmp eq i32 %44, 0
br i1 %72, label %80, label %73
73: ; preds = %68
%74 = load double, double* %42
%75 = getelementptr inbounds double, double* %8, i64 %70
store double %74, double* %75
%76 = load double, double* %43
%77 = getelementptr inbounds double, double* %9, i64 %70
store double %76, double* %77
%78 = getelementptr inbounds double, double* %7, i64 %70
store double %71, double* %78
%79 = add nsw i64 %70, 1
br label %80
80: ; preds = %68, %73
%81 = phi i64 [ %69, %68 ], [ %79, %73 ]
%82 = trunc i64 %81 to i32
br label %83
83: ; preds = %80, %24
%84 = phi i32 [ %26, %24 ], [ %82, %80 ]
%85 = add nsw i32 %84, -1
%86 = sext i32 %85 to i64
%87 = getelementptr inbounds double, double* %7, i64 %86
store double %35, double* %87
%88 = add nuw nsw i64 %25, 1
%89 = icmp eq i64 %88, %23
br i1 %89, label %90, label %24
90: ; preds = %83, %20
br i1 %15, label %91, label %103
91: ; preds = %90
%92 = load i32, i32* %6
%93 = add nsw i32 %92, -1
%94 = sext i32 %93 to i64
%95 = getelementptr inbounds double, double* %7, i64 %94
%96 = load double, double* %95
%97 = fsub double 5.000000e-01, %14
%98 = fcmp ule double %96, %97
%99 = and i32 %1, 1
%100 = icmp eq i32 %99, 0
%101 = or i1 %100, %98
br i1 %101, label %103, label %102
102: ; preds = %91
store double %97, double* %95
br label %103
103: ; preds = %102, %91, %90
ret void
}