int texture_feature_contrast(double ***glcm, int n_object, double *contrast) {
  unsigned int i = 0, j = 0, k = 0;
  for (i = 0; i < n_object; i++) {
    for (j = 0; j < 256; j++) {
      for (k = 0; k < 256; k++) {
        contrast[i] += (j - k) * (j - k) * glcm[i][j][k];
      }
    }
  }
  return 1;
}


x86 assembly (clang, -O0):
<texture_feature_contrast>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x24(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jae    11d6 <texture_feature_contrast+0xd6>
movl   $0x0,-0x20(%rbp)
cmpl   $0x100,-0x20(%rbp)
jae    11c3 <texture_feature_contrast+0xc3>
movl   $0x0,-0x24(%rbp)
cmpl   $0x100,-0x24(%rbp)
jae    11b0 <texture_feature_contrast+0xb0>
mov    -0x20(%rbp),%eax
mov    -0x24(%rbp),%ecx
sub    %ecx,%eax
imul   %eax,%eax
cvtsi2sd %rax,%xmm0
mov    -0x8(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    (%rax,%rcx,8),%rax
mov    -0x20(%rbp),%ecx
mov    (%rax,%rcx,8),%rax
mov    -0x24(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm2
mov    -0x18(%rbp),%rax
mov    -0x1c(%rbp),%ecx
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1152 <texture_feature_contrast+0x52>
jmp    11b5 <texture_feature_contrast+0xb5>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    113e <texture_feature_contrast+0x3e>
jmp    11c8 <texture_feature_contrast+0xc8>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    112b <texture_feature_contrast+0x2b>
mov    $0x1,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<texture_feature_contrast>:
push   %r14
push   %rbx
test   %esi,%esi
je     11b8 <texture_feature_contrast+0xb8>
mov    %esi,%r8d
xor    %r14d,%r14d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
mov    (%rdi,%r14,8),%r9
movsd  (%rdx,%r14,8),%xmm0
mov    $0xffffffff,%r10d
xor    %r11d,%r11d
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    (%r9,%r11,8),%rax
mov    %r10d,%esi
xor    %ebx,%ebx
nopl   0x0(%rax)
lea    0x1(%rsi),%ecx
imul   %ecx,%ecx
xorps  %xmm1,%xmm1
cvtsi2sd %rcx,%xmm1
mulsd  (%rax,%rbx,8),%xmm1
addsd  %xmm0,%xmm1
mov    %esi,%ecx
imul   %ecx,%ecx
xorps  %xmm0,%xmm0
cvtsi2sd %rcx,%xmm0
movsd  %xmm1,(%rdx,%r14,8)
mulsd  0x8(%rax,%rbx,8),%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rdx,%r14,8)
add    $0x2,%rbx
add    $0xfffffffe,%esi
cmp    $0x100,%rbx
jne    1150 <texture_feature_contrast+0x50>
add    $0x1,%r11
add    $0x1,%r10d
cmp    $0x100,%r11
jne    1140 <texture_feature_contrast+0x40>
add    $0x1,%r14
cmp    %r8,%r14
jne    1120 <texture_feature_contrast+0x20>
mov    $0x1,%eax
pop    %rbx
pop    %r14
ret

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

LLVM IR (-O2):
define i32 @texture_feature_contrast(double*** nocapture %0, i32 %1, double* nocapture %2) {
%4 = icmp eq i32 %1, 0
br i1 %4, label %44, label %5
5: ; preds = %3
%6 = zext i32 %1 to i64
br label %7
7: ; preds = %5, %41
%8 = phi i64 [ 0, %5 ], [ %42, %41 ]
%9 = getelementptr inbounds double**, double*** %0, i64 %8
%10 = load double**, double*** %9
%11 = getelementptr inbounds double, double* %2, i64 %8
%12 = load double, double* %11
br label %13
13: ; preds = %7, %38
%14 = phi double [ %12, %7 ], [ %35, %38 ]
%15 = phi i64 [ 0, %7 ], [ %39, %38 ]
%16 = getelementptr inbounds double*, double** %10, i64 %15
%17 = load double*, double** %16
br label %18
18: ; preds = %18, %13
%19 = phi double [ %14, %13 ], [ %35, %18 ]
%20 = phi i64 [ 0, %13 ], [ %36, %18 ]
%21 = sub nsw i64 %15, %20
%22 = trunc i64 %21 to i32
%23 = mul i32 %22, %22
%24 = uitofp i32 %23 to double
%25 = getelementptr inbounds double, double* %17, i64 %20
%26 = load double, double* %25
%27 = tail call double @llvm.fmuladd.f64(double %24, double %26, double %19)
store double %27, double* %11
%28 = or i64 %20, 1
%29 = sub nsw i64 %15, %28
%30 = trunc i64 %29 to i32
%31 = mul i32 %30, %30
%32 = uitofp i32 %31 to double
%33 = getelementptr inbounds double, double* %17, i64 %28
%34 = load double, double* %33
%35 = tail call double @llvm.fmuladd.f64(double %32, double %34, double %27)
store double %35, double* %11
%36 = add nuw nsw i64 %20, 2
%37 = icmp eq i64 %36, 256
br i1 %37, label %38, label %18
38: ; preds = %18
%39 = add nuw nsw i64 %15, 1
%40 = icmp eq i64 %39, 256
br i1 %40, label %41, label %13
41: ; preds = %38
%42 = add nuw nsw i64 %8, 1
%43 = icmp eq i64 %42, %6
br i1 %43, label %44, label %7
44: ; preds = %41, %3
ret i32 1
}