void scaluv(double *fu, double *rclat, int nlat, int lot) {
  int l, lat;
  for (l = 0; l < lot; l++)
    for (lat = 0; lat < nlat; lat++) {
      *fu *= rclat[lat];
      fu++;
    }
}


x86 assembly (clang, -O0):
<scaluv>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    117e <scaluv+0x7e>
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    116b <scaluv+0x6b>
mov    -0x10(%rbp),%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x8(%rbp),%rax
mulsd  (%rax),%xmm0
movsd  %xmm0,(%rax)
mov    -0x8(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x8(%rbp)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    112c <scaluv+0x2c>
jmp    1170 <scaluv+0x70>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1119 <scaluv+0x19>
pop    %rbp
ret

x86 assembly (clang, -O2):
<scaluv>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
test   %ecx,%ecx
jle    12cd <scaluv+0x1cd>
mov    %edx,%r13d
lea    (%rsi,%r13,8),%r8
mov    %r13d,%r9d
and    $0xfffffffc,%r9d
lea    -0x4(%r9),%r10
mov    %r10,%r11
shr    $0x2,%r11
add    $0x1,%r11
mov    %r11,%r14
and    $0xfffffffffffffffe,%r14
mov    %r13d,%r15d
and    $0x3,%r15d
xor    %r12d,%r12d
jmp    115d <scaluv+0x5d>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x1,%r12d
cmp    %ecx,%r12d
je     12cd <scaluv+0x1cd>
test   %edx,%edx
jle    1150 <scaluv+0x50>
cmp    $0x4,%edx
jb     117c <scaluv+0x7c>
cmp    %r8,%rdi
jae    120f <scaluv+0x10f>
lea    (%rdi,%r13,8),%rax
cmp    %rsi,%rax
jbe    120f <scaluv+0x10f>
xor    %ebx,%ebx
mov    %rbx,%rax
not    %rax
add    %r13,%rax
test   %r15,%r15
je     11ab <scaluv+0xab>
mov    %r15,%rbp
nop
movsd  (%rsi,%rbx,8),%xmm0
mulsd  (%rdi),%xmm0
movsd  %xmm0,(%rdi)
add    $0x8,%rdi
add    $0x1,%rbx
add    $0xffffffffffffffff,%rbp
jne    1190 <scaluv+0x90>
cmp    $0x3,%rax
jb     1150 <scaluv+0x50>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%rsi,%rbx,8),%xmm0
mulsd  (%rdi),%xmm0
movsd  %xmm0,(%rdi)
movsd  0x8(%rsi,%rbx,8),%xmm0
mulsd  0x8(%rdi),%xmm0
movsd  %xmm0,0x8(%rdi)
movsd  0x10(%rsi,%rbx,8),%xmm0
mulsd  0x10(%rdi),%xmm0
movsd  %xmm0,0x10(%rdi)
movsd  0x18(%rsi,%rbx,8),%xmm0
mulsd  0x18(%rdi),%xmm0
movsd  %xmm0,0x18(%rdi)
add    $0x20,%rdi
add    $0x4,%rbx
cmp    %rbx,%r13
jne    11c0 <scaluv+0xc0>
jmp    1150 <scaluv+0x50>
test   %r10,%r10
je     12c3 <scaluv+0x1c3>
mov    %r14,%rax
xor    %ebx,%ebx
nopl   (%rax)
movupd (%rsi,%rbx,8),%xmm0
movupd 0x10(%rsi,%rbx,8),%xmm1
movupd (%rdi,%rbx,8),%xmm2
mulpd  %xmm0,%xmm2
movupd 0x10(%rdi,%rbx,8),%xmm0
mulpd  %xmm1,%xmm0
movupd 0x20(%rdi,%rbx,8),%xmm1
movupd 0x30(%rdi,%rbx,8),%xmm3
movupd %xmm2,(%rdi,%rbx,8)
movupd %xmm0,0x10(%rdi,%rbx,8)
movupd 0x20(%rsi,%rbx,8),%xmm0
mulpd  %xmm1,%xmm0
movupd 0x30(%rsi,%rbx,8),%xmm1
mulpd  %xmm3,%xmm1
movupd %xmm0,0x20(%rdi,%rbx,8)
movupd %xmm1,0x30(%rdi,%rbx,8)
add    $0x8,%rbx
add    $0xfffffffffffffffe,%rax
jne    1220 <scaluv+0x120>
test   $0x1,%r11b
je     12ae <scaluv+0x1ae>
movupd (%rsi,%rbx,8),%xmm0
movupd 0x10(%rsi,%rbx,8),%xmm1
movupd (%rdi,%rbx,8),%xmm2
mulpd  %xmm0,%xmm2
movupd 0x10(%rdi,%rbx,8),%xmm0
mulpd  %xmm1,%xmm0
movupd %xmm2,(%rdi,%rbx,8)
movupd %xmm0,0x10(%rdi,%rbx,8)
lea    (%rdi,%r9,8),%rdi
mov    %r9,%rbx
cmp    %r13,%r9
je     1150 <scaluv+0x50>
jmp    117e <scaluv+0x7e>
xor    %ebx,%ebx
test   $0x1,%r11b
jne    1285 <scaluv+0x185>
jmp    12ae <scaluv+0x1ae>
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @scaluv(double* %0, double* %1, i32 %2, i32 %3) {
%5 = alloca double*
%6 = alloca double*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
store double* %0, double** %5
store double* %1, double** %6
store i32 %2, i32* %7
store i32 %3, i32* %8
store i32 0, i32* %9
br label %11
11: ; preds = %35, %4
%12 = load i32, i32* %9
%13 = load i32, i32* %8
%14 = icmp slt i32 %12, %13
br i1 %14, label %15, label %38
15: ; preds = %11
store i32 0, i32* %10
br label %16
16: ; preds = %31, %15
%17 = load i32, i32* %10
%18 = load i32, i32* %7
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %34
20: ; preds = %16
%21 = load double*, double** %6
%22 = load i32, i32* %10
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds double, double* %21, i64 %23
%25 = load double, double* %24
%26 = load double*, double** %5
%27 = load double, double* %26
%28 = fmul double %27, %25
store double %28, double* %26
%29 = load double*, double** %5
%30 = getelementptr inbounds double, double* %29, i32 1
store double* %30, double** %5
br label %31
31: ; preds = %20
%32 = load i32, i32* %10
%33 = add nsw i32 %32, 1
store i32 %33, i32* %10
br label %16
34: ; preds = %16
br label %35
35: ; preds = %34
%36 = load i32, i32* %9
%37 = add nsw i32 %36, 1
store i32 %37, i32* %9
br label %11
38: ; preds = %11
ret void
}

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