#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double sqrt(double);
double colnorm(int m, int r, int c, double **x) {
  int i;
  double sum;
  sum = x[r][c] * x[r][c];
  for (i = c + 1; i < m; i++)
    sum += x[r][i] * x[r][i];
  return sqrt(sum);
}


x86 assembly (clang, -O0):
<colnorm>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %rcx,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0xc(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0xc(%rbp),%rcx
mulsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11b3 <colnorm+0xa3>
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x18(%rbp),%rax
movslq -0x8(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm2
movsd  -0x28(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    115d <colnorm+0x4d>
movsd  -0x28(%rbp),%xmm0
call   1030 <sqrt@plt>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<colnorm>:
movslq %esi,%rax
mov    (%rcx,%rax,8),%rax
movslq %edx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  %xmm0,%xmm0
add    $0x1,%ecx
cmp    %edi,%ecx
jge    119f <colnorm+0x8f>
movslq %ecx,%rcx
mov    %edi,%esi
sub    %edx,%esi
not    %edx
add    %edi,%edx
add    $0xfffffffe,%esi
and    $0x3,%edx
je     1156 <colnorm+0x46>
nopl   (%rax)
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm1,%xmm0
add    $0x1,%rcx
add    $0xffffffff,%edx
jne    1140 <colnorm+0x30>
cmp    $0x3,%esi
jb     119f <colnorm+0x8f>
mov    %edi,%edx
nopl   (%rax)
movsd  (%rax,%rcx,8),%xmm1
movsd  0x8(%rax,%rcx,8),%xmm2
mulsd  %xmm1,%xmm1
addsd  %xmm0,%xmm1
mulsd  %xmm2,%xmm2
addsd  %xmm1,%xmm2
movsd  0x10(%rax,%rcx,8),%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm2,%xmm1
movsd  0x18(%rax,%rcx,8),%xmm0
mulsd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
add    $0x4,%rcx
cmp    %ecx,%edx
jne    1160 <colnorm+0x50>
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     11ae <colnorm+0x9e>
sqrtsd %xmm0,%xmm0
ret
jmp    1030 <sqrt@plt>

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

LLVM IR (-O2):
define double @colnorm(i32 %0, i32 %1, i32 %2, double** nocapture %3) {
%5 = sext i32 %1 to i64
%6 = getelementptr inbounds double*, double** %3, i64 %5
%7 = load double*, double** %6
%8 = sext i32 %2 to i64
%9 = getelementptr inbounds double, double* %7, i64 %8
%10 = load double, double* %9
%11 = fmul double %10, %10
%12 = add i32 %2, 1
%13 = icmp slt i32 %12, %0
br i1 %13, label %14, label %58
14: ; preds = %4
%15 = sext i32 %12 to i64
%16 = xor i32 %2, -1
%17 = add i32 %16, %0
%18 = add i32 %0, -2
%19 = sub i32 %18, %2
%20 = and i32 %17, 3
%21 = icmp eq i32 %20, 0
br i1 %21, label %32, label %22
22: ; preds = %14, %22
%23 = phi i64 [ %29, %22 ], [ %15, %14 ]
%24 = phi double [ %28, %22 ], [ %11, %14 ]
%25 = phi i32 [ %30, %22 ], [ 0, %14 ]
%26 = getelementptr inbounds double, double* %7, i64 %23
%27 = load double, double* %26
%28 = tail call double @llvm.fmuladd.f64(double %27, double %27, double %24)
%29 = add nsw i64 %23, 1
%30 = add i32 %25, 1
%31 = icmp eq i32 %30, %20
br i1 %31, label %32, label %22
32: ; preds = %22, %14
%33 = phi double [ undef, %14 ], [ %28, %22 ]
%34 = phi i64 [ %15, %14 ], [ %29, %22 ]
%35 = phi double [ %11, %14 ], [ %28, %22 ]
%36 = icmp ult i32 %19, 3
br i1 %36, label %58, label %37
37: ; preds = %32, %37
%38 = phi i64 [ %55, %37 ], [ %34, %32 ]
%39 = phi double [ %54, %37 ], [ %35, %32 ]
%40 = getelementptr inbounds double, double* %7, i64 %38
%41 = load double, double* %40
%42 = tail call double @llvm.fmuladd.f64(double %41, double %41, double %39)
%43 = add nsw i64 %38, 1
%44 = getelementptr inbounds double, double* %7, i64 %43
%45 = load double, double* %44
%46 = tail call double @llvm.fmuladd.f64(double %45, double %45, double %42)
%47 = add nsw i64 %38, 2
%48 = getelementptr inbounds double, double* %7, i64 %47
%49 = load double, double* %48
%50 = tail call double @llvm.fmuladd.f64(double %49, double %49, double %46)
%51 = add nsw i64 %38, 3
%52 = getelementptr inbounds double, double* %7, i64 %51
%53 = load double, double* %52
%54 = tail call double @llvm.fmuladd.f64(double %53, double %53, double %50)
%55 = add nsw i64 %38, 4
%56 = trunc i64 %55 to i32
%57 = icmp eq i32 %56, %0
br i1 %57, label %58, label %37
58: ; preds = %32, %37, %4
%59 = phi double [ %11, %4 ], [ %33, %32 ], [ %54, %37 ]
%60 = tail call double @sqrt(double %59)
ret double %60
}