void cl(double *vec, double *fact, int p) {
  int i, j, k;
  for (i = p - 1; i > 0; --i) {
    for (j = 0; j < p - i; ++j) {
      k = p * i + (p - i) + j * p;
      vec[k] = vec[k - p] * fact[i + j - 1];
    }
  }
}


x86 assembly (clang, -O0):
<cl>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    -0x14(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x18(%rbp)
cmpl   $0x0,-0x18(%rbp)
jle    11aa <cl+0xaa>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    -0x18(%rbp),%ecx
cmp    %ecx,%eax
jge    1197 <cl+0x97>
mov    -0x14(%rbp),%eax
imul   -0x18(%rbp),%eax
mov    -0x14(%rbp),%ecx
sub    -0x18(%rbp),%ecx
add    %ecx,%eax
mov    -0x1c(%rbp),%ecx
imul   -0x14(%rbp),%ecx
add    %ecx,%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%ecx
sub    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
mov    -0x18(%rbp),%ecx
add    -0x1c(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mulsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1129 <cl+0x29>
jmp    119c <cl+0x9c>
mov    -0x18(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x18(%rbp)
jmp    1118 <cl+0x18>
pop    %rbp
ret

x86 assembly (clang, -O2):
<cl>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
cmp    $0x2,%edx
jl     1295 <cl+0x195>
mov    %edx,%r10d
lea    -0x2(%rdx),%r9d
lea    -0x1(%rdx),%r14d
mov    %edx,%r13d
imul   %r14d,%r13d
add    $0x1,%r13d
mov    $0x1,%eax
sub    %edx,%eax
mov    %eax,-0x14(%rsp)
mov    %r9d,%ecx
imul   %edx,%ecx
add    $0x1,%ecx
mov    %edx,%eax
imul   %edx,%eax
add    $0x1,%eax
lea    (%rdx,%rdx,1),%r11d
mov    $0x1,%r12d
xor    %r15d,%r15d
mov    %edx,%ebp
mov    %rbp,-0x20(%rsp)
mov    %r10,-0x8(%rsp)
jmp    118c <cl+0x8c>
add    $0x1,%r12
add    $0x1,%r15
add    $0xffffffffffffffff,%r9
mov    -0x14(%rsp),%ebp
add    %ebp,%r13d
mov    -0xc(%rsp),%ecx
add    %ebp,%ecx
mov    -0x10(%rsp),%eax
add    %ebp,%eax
add    $0xffffffffffffffff,%r14
cmp    %r10,%r12
je     1295 <cl+0x195>
mov    -0x20(%rsp),%rbp
mov    %ebp,%ebx
lea    -0x1(%rbx),%ebp
mov    %rbp,-0x20(%rsp)
cmp    $0x1,%edx
mov    %ecx,-0xc(%rsp)
mov    %eax,-0x10(%rsp)
jne    1210 <cl+0x110>
movsd  (%rdi),%xmm0
mov    %rbx,%rbp
test   %r15,%r15
je     124d <cl+0x14d>
mov    %r12,%rbx
and    $0xfffffffffffffffe,%rbx
mov    %r13d,%ecx
mov    %r13d,%r10d
mov    %eax,%r13d
xor    %r8d,%r8d
nopl   0x0(%rax,%rax,1)
lea    (%r9,%r8,1),%eax
cltq
mulsd  (%rsi,%rax,8),%xmm0
movslq %r10d,%r10
movsd  %xmm0,(%rdi,%r10,8)
lea    (%r14,%r8,1),%eax
cltq
mulsd  (%rsi,%rax,8),%xmm0
movslq %r13d,%r13
movsd  %xmm0,(%rdi,%r13,8)
add    $0x2,%r8
add    %r11d,%r13d
add    %r11d,%r10d
cmp    %r8,%rbx
jne    11d0 <cl+0xd0>
jmp    1253 <cl+0x153>
nopl   0x0(%rax)
mov    %ecx,%ebx
mov    %r13d,%eax
xor    %ebp,%ebp
nopw   0x0(%rax,%rax,1)
movslq %ebx,%rbx
movsd  (%rdi,%rbx,8),%xmm0
lea    (%r9,%rbp,1),%ecx
movslq %ecx,%rcx
mulsd  (%rsi,%rcx,8),%xmm0
cltq
movsd  %xmm0,(%rdi,%rax,8)
add    $0x1,%rbp
add    %edx,%eax
add    %edx,%ebx
cmp    %rbp,%r12
jne    1220 <cl+0x120>
jmp    1160 <cl+0x60>
mov    %r13d,%ecx
xor    %r8d,%r8d
test   $0x1,%r12b
mov    -0x8(%rsp),%r10
mov    %ecx,%r13d
je     1160 <cl+0x60>
mov    %edx,%eax
mov    -0x20(%rsp),%rcx
sub    %ecx,%eax
mov    %rbp,%rbx
add    $0xfffffffe,%ebx
lea    (%rcx,%r8,1),%ebp
imul   %edx,%ebp
add    %eax,%ebp
add    %r8d,%ebx
movslq %ebx,%rax
mulsd  (%rsi,%rax,8),%xmm0
movslq %ebp,%rax
movsd  %xmm0,(%rdi,%rax,8)
jmp    1160 <cl+0x60>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @cl(double* %0, double* %1, i32 %2) {
%4 = alloca double*
%5 = alloca double*
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
store double* %0, double** %4
store double* %1, double** %5
store i32 %2, i32* %6
%10 = load i32, i32* %6
%11 = sub nsw i32 %10, 1
store i32 %11, i32* %7
br label %12
12: ; preds = %58, %3
%13 = load i32, i32* %7
%14 = icmp sgt i32 %13, 0
br i1 %14, label %15, label %61
15: ; preds = %12
store i32 0, i32* %8
br label %16
16: ; preds = %54, %15
%17 = load i32, i32* %8
%18 = load i32, i32* %6
%19 = load i32, i32* %7
%20 = sub nsw i32 %18, %19
%21 = icmp slt i32 %17, %20
br i1 %21, label %22, label %57
22: ; preds = %16
%23 = load i32, i32* %6
%24 = load i32, i32* %7
%25 = mul nsw i32 %23, %24
%26 = load i32, i32* %6
%27 = load i32, i32* %7
%28 = sub nsw i32 %26, %27
%29 = add nsw i32 %25, %28
%30 = load i32, i32* %8
%31 = load i32, i32* %6
%32 = mul nsw i32 %30, %31
%33 = add nsw i32 %29, %32
store i32 %33, i32* %9
%34 = load double*, double** %4
%35 = load i32, i32* %9
%36 = load i32, i32* %6
%37 = sub nsw i32 %35, %36
%38 = sext i32 %37 to i64
%39 = getelementptr inbounds double, double* %34, i64 %38
%40 = load double, double* %39
%41 = load double*, double** %5
%42 = load i32, i32* %7
%43 = load i32, i32* %8
%44 = add nsw i32 %42, %43
%45 = sub nsw i32 %44, 1
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds double, double* %41, i64 %46
%48 = load double, double* %47
%49 = fmul double %40, %48
%50 = load double*, double** %4
%51 = load i32, i32* %9
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds double, double* %50, i64 %52
store double %49, double* %53
br label %54
54: ; preds = %22
%55 = load i32, i32* %8
%56 = add nsw i32 %55, 1
store i32 %56, i32* %8
br label %16
57: ; preds = %16
br label %58
58: ; preds = %57
%59 = load i32, i32* %7
%60 = add nsw i32 %59, -1
store i32 %60, i32* %7
br label %12
61: ; preds = %12
ret void
}

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