void oi_rr_first(int *no, double *innov, double *SRinv, double *vec) {
  int nov = no[0];
  int i, j, k;
  k = 0;
  for (i = 0; i < nov; i++) {
    vec[i] = 0;
    for (j = 0; j < nov; j++) {
      vec[i] = vec[i] + SRinv[k] * innov[j];
      k++;
    }
  }
  return;
}


x86 assembly (clang, -O0):
<oi_rr_first>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x24(%rbp)
movl   $0x0,-0x30(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    11c0 <oi_rr_first+0xc0>
mov    -0x20(%rbp),%rax
movslq -0x28(%rbp),%rcx
xorps  %xmm0,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    11ad <oi_rr_first+0xad>
mov    -0x20(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x18(%rbp),%rax
movslq -0x30(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x10(%rbp),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mov    -0x20(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    114e <oi_rr_first+0x4e>
jmp    11b2 <oi_rr_first+0xb2>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    112b <oi_rr_first+0x2b>
pop    %rbp
ret

x86 assembly (clang, -O2):
<oi_rr_first>:
push   %rbx
mov    (%rdi),%r9d
test   %r9d,%r9d
jle    11b7 <oi_rr_first+0xb7>
mov    %r9d,%r11d
and    $0xfffffffe,%r11d
lea    0x8(%rdx),%r8
xor    %eax,%eax
xor    %r10d,%r10d
jmp    112d <oi_rr_first+0x2d>
nop
add    $0x1,%rax
cmp    %r9,%rax
je     11b7 <oi_rr_first+0xb7>
movq   $0x0,(%rcx,%rax,8)
movslq %r10d,%r10
cmp    $0x1,%r9d
jne    1150 <oi_rr_first+0x50>
xorpd  %xmm0,%xmm0
xor    %edi,%edi
test   $0x1,%r9b
je     1120 <oi_rr_first+0x20>
jmp    119a <oi_rr_first+0x9a>
nopl   0x0(%rax)
lea    (%r8,%r10,8),%rbx
xorpd  %xmm0,%xmm0
xor    %edi,%edi
nopw   0x0(%rax,%rax,1)
movsd  -0x8(%rbx,%rdi,8),%xmm1
mulsd  (%rsi,%rdi,8),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx,%rax,8)
movsd  (%rbx,%rdi,8),%xmm0
mulsd  0x8(%rsi,%rdi,8),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rcx,%rax,8)
add    $0x2,%rdi
cmp    %rdi,%r11
jne    1160 <oi_rr_first+0x60>
add    %rdi,%r10
test   $0x1,%r9b
je     1120 <oi_rr_first+0x20>
movsd  (%rdx,%r10,8),%xmm1
mulsd  (%rsi,%rdi,8),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%rcx,%rax,8)
add    $0x1,%r10
jmp    1120 <oi_rr_first+0x20>
pop    %rbx
ret

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

LLVM IR (-O2):
define void @oi_rr_first(i32* nocapture %0, double* nocapture %1, double* nocapture %2, double* nocapture %3) {
%5 = load i32, i32* %0
%6 = icmp sgt i32 %5, 0
br i1 %6, label %7, label %56
7: ; preds = %4
%8 = zext i32 %5 to i64
%9 = and i64 %8, 1
%10 = icmp eq i32 %5, 1
%11 = and i64 %8, 4294967294
%12 = icmp eq i64 %9, 0
br label %13
13: ; preds = %52, %7
%14 = phi i64 [ 0, %7 ], [ %54, %52 ]
%15 = phi i64 [ 0, %7 ], [ %53, %52 ]
%16 = getelementptr inbounds double, double* %3, i64 %14
store double 0.000000e+00, double* %16
%17 = shl i64 %15, 32
%18 = ashr exact i64 %17, 32
br i1 %10, label %40, label %19
19: ; preds = %13, %19
%20 = phi double [ %35, %19 ], [ 0.000000e+00, %13 ]
%21 = phi i64 [ %37, %19 ], [ 0, %13 ]
%22 = phi i64 [ %36, %19 ], [ %18, %13 ]
%23 = phi i64 [ %38, %19 ], [ 0, %13 ]
%24 = getelementptr inbounds double, double* %2, i64 %22
%25 = load double, double* %24
%26 = getelementptr inbounds double, double* %1, i64 %21
%27 = load double, double* %26
%28 = tail call double @llvm.fmuladd.f64(double %25, double %27, double %20)
store double %28, double* %16
%29 = add nsw i64 %22, 1
%30 = or i64 %21, 1
%31 = getelementptr inbounds double, double* %2, i64 %29
%32 = load double, double* %31
%33 = getelementptr inbounds double, double* %1, i64 %30
%34 = load double, double* %33
%35 = tail call double @llvm.fmuladd.f64(double %32, double %34, double %28)
store double %35, double* %16
%36 = add nsw i64 %22, 2
%37 = add nuw nsw i64 %21, 2
%38 = add i64 %23, 2
%39 = icmp eq i64 %38, %11
br i1 %39, label %40, label %19
40: ; preds = %19, %13
%41 = phi i64 [ undef, %13 ], [ %36, %19 ]
%42 = phi double [ 0.000000e+00, %13 ], [ %35, %19 ]
%43 = phi i64 [ 0, %13 ], [ %37, %19 ]
%44 = phi i64 [ %18, %13 ], [ %36, %19 ]
br i1 %12, label %52, label %45
45: ; preds = %40
%46 = getelementptr inbounds double, double* %2, i64 %44
%47 = load double, double* %46
%48 = getelementptr inbounds double, double* %1, i64 %43
%49 = load double, double* %48
%50 = tail call double @llvm.fmuladd.f64(double %47, double %49, double %42)
store double %50, double* %16
%51 = add nsw i64 %44, 1
br label %52
52: ; preds = %40, %45
%53 = phi i64 [ %41, %40 ], [ %51, %45 ]
%54 = add nuw nsw i64 %14, 1
%55 = icmp eq i64 %54, %8
br i1 %55, label %56, label %13
56: ; preds = %52, %4
ret void
}