void blasDSCAL(int n, double sa, double x[], int incx) {
  int i, ix, m;
  if (n <= 0) {
  } else if (incx == 1) {
    m = n % 5;
    for (i = 0; i < m; i++) {
      x[i] = sa * x[i];
    }
    for (i = m; i < n; i = i + 5) {
      x[i] = sa * x[i];
      x[i + 1] = sa * x[i + 1];
      x[i + 2] = sa * x[i + 2];
      x[i + 3] = sa * x[i + 3];
      x[i + 4] = sa * x[i + 4];
    }
  } else {
    if (0 <= incx) {
      ix = 0;
    } else {
      ix = (-n + 1) * incx;
    }
    for (i = 0; i < n; i++) {
      x[ix] = sa * x[ix];
      ix = ix + incx;
    }
  }
}


x86 assembly (clang, -O0):
<blasDSCAL>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
movsd  %xmm0,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
cmpl   $0x0,-0x4(%rbp)
jg     1122 <blasDSCAL+0x22>
jmp    12db <blasDSCAL+0x1db>
cmpl   $0x1,-0x1c(%rbp)
jne    1262 <blasDSCAL+0x162>
mov    -0x4(%rbp),%eax
mov    $0x5,%ecx
cltd
idiv   %ecx
mov    %edx,-0x28(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x28(%rbp),%eax
jge    117a <blasDSCAL+0x7a>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1141 <blasDSCAL+0x41>
mov    -0x28(%rbp),%eax
mov    %eax,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    125d <blasDSCAL+0x15d>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x2,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x2,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x3,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x3,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x4,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x20(%rbp),%ecx
add    $0x4,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%eax
add    $0x5,%eax
mov    %eax,-0x20(%rbp)
jmp    1180 <blasDSCAL+0x80>
jmp    12d6 <blasDSCAL+0x1d6>
xor    %eax,%eax
cmp    -0x1c(%rbp),%eax
jg     1279 <blasDSCAL+0x179>
movl   $0x0,-0x24(%rbp)
jmp    1288 <blasDSCAL+0x188>
xor    %eax,%eax
sub    -0x4(%rbp),%eax
add    $0x1,%eax
imul   -0x1c(%rbp),%eax
mov    %eax,-0x24(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    12d1 <blasDSCAL+0x1d1>
movsd  -0x10(%rbp),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    -0x1c(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    128f <blasDSCAL+0x18f>
jmp    12d6 <blasDSCAL+0x1d6>
jmp    12db <blasDSCAL+0x1db>
pop    %rbp
ret

x86 assembly (clang, -O2):
<blasDSCAL>:
test   %edi,%edi
jle    1343 <blasDSCAL+0x243>
cmp    $0x1,%edx
jne    1140 <blasDSCAL+0x40>
mov    %edi,%r8d
mov    $0xcccccccd,%eax
imul   %r8,%rax
shr    $0x22,%rax
lea    (%rax,%rax,4),%eax
mov    %edi,%r9d
sub    %eax,%r9d
je     12d7 <blasDSCAL+0x1d7>
mov    %r9d,%r11d
cmp    $0x4,%r9d
jae    1208 <blasDSCAL+0x108>
xor    %edx,%edx
jmp    12c0 <blasDSCAL+0x1c0>
mov    $0x1,%eax
sub    %edi,%eax
imul   %edx,%eax
movslq %edx,%r8
sar    $0x1f,%edx
and    %eax,%edx
movslq %edx,%rcx
lea    -0x1(%rdi),%r9d
mov    %edi,%edx
xor    %r11d,%r11d
and    $0x3,%edx
je     118a <blasDSCAL+0x8a>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  (%rsi,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rsi,%rcx,8)
add    %r8,%rcx
add    $0x1,%r11d
cmp    %r11d,%edx
jne    1170 <blasDSCAL+0x70>
cmp    $0x3,%r9d
jb     1343 <blasDSCAL+0x243>
lea    (%rsi,%rcx,8),%rdx
mov    %r8,%r9
shl    $0x5,%r9
lea    0x0(,%r8,8),%rax
lea    (%rax,%rax,2),%r10
add    %r8,%rcx
shl    $0x4,%r8
lea    (%rsi,%rcx,8),%rcx
sub    %r11d,%edi
nopl   0x0(%rax)
movsd  (%rdx),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rdx)
movsd  (%rcx),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx)
movsd  (%rdx,%r8,1),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rdx,%r8,1)
movsd  (%rdx,%r10,1),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rdx,%r10,1)
add    %r9,%rdx
add    %r9,%rcx
add    $0xfffffffc,%edi
jne    11c0 <blasDSCAL+0xc0>
jmp    1343 <blasDSCAL+0x243>
mov    %r11d,%edx
and    $0x4,%edx
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
lea    -0x4(%rdx),%rax
mov    %rax,%r10
shr    $0x2,%r10
add    $0x1,%r10
test   %rax,%rax
je     1344 <blasDSCAL+0x244>
mov    %r10,%rax
and    $0xfffffffffffffffe,%rax
xor    %ecx,%ecx
nopw   0x0(%rax,%rax,1)
movupd (%rsi,%rcx,8),%xmm2
movupd 0x10(%rsi,%rcx,8),%xmm3
movupd 0x20(%rsi,%rcx,8),%xmm4
movupd 0x30(%rsi,%rcx,8),%xmm5
mulpd  %xmm1,%xmm2
mulpd  %xmm1,%xmm3
movupd %xmm2,(%rsi,%rcx,8)
movupd %xmm3,0x10(%rsi,%rcx,8)
mulpd  %xmm1,%xmm4
mulpd  %xmm1,%xmm5
movupd %xmm4,0x20(%rsi,%rcx,8)
movupd %xmm5,0x30(%rsi,%rcx,8)
add    $0x8,%rcx
add    $0xfffffffffffffffe,%rax
jne    1240 <blasDSCAL+0x140>
test   $0x1,%r10b
je     12ac <blasDSCAL+0x1ac>
movupd (%rsi,%rcx,8),%xmm2
movupd 0x10(%rsi,%rcx,8),%xmm3
mulpd  %xmm1,%xmm2
mulpd  %xmm1,%xmm3
movupd %xmm2,(%rsi,%rcx,8)
movupd %xmm3,0x10(%rsi,%rcx,8)
cmp    %r11,%rdx
je     12d7 <blasDSCAL+0x1d7>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rsi,%rdx,8),%xmm1
mulsd  %xmm0,%xmm1
movsd  %xmm1,(%rsi,%rdx,8)
add    $0x1,%rdx
cmp    %rdx,%r11
jne    12c0 <blasDSCAL+0x1c0>
cmp    %edi,%r9d
jge    1343 <blasDSCAL+0x243>
movapd %xmm0,%xmm1
unpcklpd %xmm0,%xmm1
mov    $0xcccccccd,%ecx
imul   %r8,%rcx
shr    $0x22,%rcx
lea    (%rcx,%rcx,4),%rax
sub    %rax,%r8
lea    (%rsi,%r8,8),%rax
add    $0x20,%rax
lea    (%rcx,%rcx,4),%edx
mov    %edi,%ecx
sub    %edx,%ecx
nopw   0x0(%rax,%rax,1)
movupd -0x20(%rax),%xmm2
movupd -0x10(%rax),%xmm3
mulpd  %xmm1,%xmm2
movupd %xmm2,-0x20(%rax)
mulpd  %xmm1,%xmm3
movupd %xmm3,-0x10(%rax)
movsd  (%rax),%xmm2
mulsd  %xmm0,%xmm2
movsd  %xmm2,(%rax)
add    $0x28,%rax
add    $0x5,%ecx
cmp    %edi,%ecx
jl     1310 <blasDSCAL+0x210>
ret
xor    %ecx,%ecx
test   $0x1,%r10b
jne    128e <blasDSCAL+0x18e>
jmp    12ac <blasDSCAL+0x1ac>

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

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