#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 */
scalar_t__ sqrt(double);
double dvecnorm(double *x, int n) {
  register int i;
  double max, sum, tmp;
  for (i = n, max = 0.0; i-- > 0;)
    if (x[i] > max)
      max = x[i];
    else if (x[i] < -max)
      max = -x[i];
  for (i = n, sum = 0.0; i-- > 0;) {
    tmp = x[i] / max;
    sum += tmp * tmp;
  }
  return max * (double)sqrt(sum);
}


x86 assembly (clang, -O0):
<dvecnorm>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x18(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x10(%rbp)
cmp    $0x0,%eax
jle    11d6 <dvecnorm+0xc6>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
ucomisd -0x18(%rbp),%xmm0
jbe    1170 <dvecnorm+0x60>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x18(%rbp)
jmp    11d1 <dvecnorm+0xc1>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movsd  -0x18(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
ucomisd %xmm1,%xmm0
jbe    11cc <dvecnorm+0xbc>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x18(%rbp)
jmp    11d1 <dvecnorm+0xc1>
jmp    112d <dvecnorm+0x1d>
mov    -0xc(%rbp),%eax
mov    %eax,-0x10(%rbp)
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x10(%rbp)
cmp    $0x0,%eax
jle    1230 <dvecnorm+0x120>
mov    -0x8(%rbp),%rax
movslq -0x10(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
divsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  -0x28(%rbp),%xmm2
movsd  -0x20(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
jmp    11e4 <dvecnorm+0xd4>
movsd  -0x18(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x20(%rbp),%xmm0
call   1030 <sqrt@plt>
movsd  -0x30(%rbp),%xmm0
cvtsi2sd %rax,%xmm1
mulsd  %xmm1,%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dvecnorm>:
sub    $0x18,%rsp
test   %esi,%esi
jle    112b <dvecnorm+0x1b>
mov    %esi,%eax
lea    -0x1(%rax),%r8
test   $0x1,%al
jne    113d <dvecnorm+0x2d>
xorpd  %xmm3,%xmm3
mov    %rax,%rdx
jmp    1167 <dvecnorm+0x57>
xorpd  %xmm0,%xmm0
movapd %xmm0,(%rsp)
xorpd  %xmm0,%xmm0
jmp    1254 <dvecnorm+0x144>
mov    %r8d,%edx
movsd  (%rdi,%rdx,8),%xmm0
xorpd  %xmm3,%xmm3
ucomisd %xmm3,%xmm0
ja     1160 <dvecnorm+0x50>
ucomisd %xmm0,%xmm3
mov    %r8,%rdx
jbe    1167 <dvecnorm+0x57>
xorpd  0xea0(%rip),%xmm0
mov    %r8,%rdx
movapd %xmm0,%xmm3
test   %r8,%r8
je     11da <dvecnorm+0xca>
add    $0xfffffffffffffffe,%rdx
movapd 0xe88(%rip),%xmm0
jmp    1195 <dvecnorm+0x85>
nopw   0x0(%rax,%rax,1)
movapd %xmm1,%xmm3
lea    -0x2(%rdx),%rcx
add    $0x1,%rdx
cmp    $0x1,%rdx
mov    %rcx,%rdx
jbe    11da <dvecnorm+0xca>
lea    0x1(%rdx),%ecx
movsd  (%rdi,%rcx,8),%xmm1
ucomisd %xmm3,%xmm1
ja     11b5 <dvecnorm+0xa5>
movapd %xmm3,%xmm2
xorpd  %xmm0,%xmm2
ucomisd %xmm1,%xmm2
jbe    11b9 <dvecnorm+0xa9>
xorpd  %xmm0,%xmm1
movapd %xmm1,%xmm3
mov    %edx,%ecx
movsd  (%rdi,%rcx,8),%xmm1
ucomisd %xmm3,%xmm1
ja     1180 <dvecnorm+0x70>
movapd %xmm3,%xmm2
xorpd  %xmm0,%xmm2
ucomisd %xmm1,%xmm2
jbe    1184 <dvecnorm+0x74>
xorpd  %xmm0,%xmm1
jmp    1180 <dvecnorm+0x70>
test   %esi,%esi
movapd %xmm3,(%rsp)
jle    11f2 <dvecnorm+0xe2>
test   $0x1,%al
jne    11f8 <dvecnorm+0xe8>
xorpd  %xmm0,%xmm0
test   %r8,%r8
jne    1218 <dvecnorm+0x108>
jmp    1254 <dvecnorm+0x144>
xorpd  %xmm0,%xmm0
jmp    1254 <dvecnorm+0x144>
add    $0xffffffffffffffff,%rax
mov    %eax,%edx
movsd  (%rdi,%rdx,8),%xmm1
divsd  %xmm3,%xmm1
mulsd  %xmm1,%xmm1
xorpd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
test   %r8,%r8
je     1254 <dvecnorm+0x144>
add    $0xfffffffffffffffe,%rax
nopl   0x0(%rax)
lea    0x1(%rax),%rcx
mov    %ecx,%edx
movsd  (%rdi,%rdx,8),%xmm1
divsd  %xmm3,%xmm1
mulsd  %xmm1,%xmm1
addsd  %xmm0,%xmm1
mov    %eax,%edx
movsd  (%rdi,%rdx,8),%xmm0
divsd  %xmm3,%xmm0
mulsd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
add    $0xfffffffffffffffe,%rax
cmp    $0x1,%rcx
ja     1220 <dvecnorm+0x110>
call   1030 <sqrt@plt>
xorps  %xmm0,%xmm0
cvtsi2sd %rax,%xmm0
mulsd  (%rsp),%xmm0
add    $0x18,%rsp
ret

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

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