#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 */
float fabs(float const);
float pow(float, int);
float sqrt(float);
float c_snrm2(const int N, const float *X, const int stride) {
  float scale;
  float ssq;
  float ax;
  int i;
  if (N <= 0 || stride <= 0) {
    return 0.0f;
  }
  if (N == 1) {
    return fabs(X[0]);
  }
  scale = 0.0f;
  ssq = 1.0f;
  for (i = 0; i < N * stride; i += stride) {
    if (X[i] != 0.0f) {
      ax = fabs(X[i]);
      if (scale < ax) {
        ssq = 1.0f + (ssq * pow(scale / ax, 2));
        scale = ax;
      } else {
        ssq += pow(ax / scale, 2);
      }
    }
  }
  return scale * sqrt(ssq);
}


x86 assembly (clang, -O0):
<c_snrm2>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
cmpl   $0x0,-0x8(%rbp)
jle    1156 <c_snrm2+0x26>
cmpl   $0x0,-0x14(%rbp)
jg     1163 <c_snrm2+0x33>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x4(%rbp)
jmp    12a5 <c_snrm2+0x175>
cmpl   $0x1,-0x8(%rbp)
jne    1184 <c_snrm2+0x54>
mov    -0x10(%rbp),%rax
movss  (%rax),%xmm0
call   1030 <fabs@plt>
movss  %xmm0,-0x4(%rbp)
jmp    12a5 <c_snrm2+0x175>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x18(%rbp)
movss  0xe6c(%rip),%xmm0
movss  %xmm0,-0x1c(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x8(%rbp),%ecx
imul   -0x14(%rbp),%ecx
cmp    %ecx,%eax
jge    1280 <c_snrm2+0x150>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jne    11d6 <c_snrm2+0xa6>
jp     11d6 <c_snrm2+0xa6>
jmp    126d <c_snrm2+0x13d>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
call   1030 <fabs@plt>
movss  %xmm0,-0x20(%rbp)
movss  -0x18(%rbp),%xmm1
movss  -0x20(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jbe    124a <c_snrm2+0x11a>
movss  -0x1c(%rbp),%xmm0
movss  %xmm0,-0x28(%rbp)
movss  -0x18(%rbp),%xmm0
divss  -0x20(%rbp),%xmm0
mov    $0x2,%edi
call   1040 <pow@plt>
movaps %xmm0,%xmm1
movss  -0x28(%rbp),%xmm0
mulss  %xmm1,%xmm0
movss  0xdce(%rip),%xmm1
addss  %xmm1,%xmm0
movss  %xmm0,-0x1c(%rbp)
movss  -0x20(%rbp),%xmm0
movss  %xmm0,-0x18(%rbp)
jmp    1268 <c_snrm2+0x138>
movss  -0x20(%rbp),%xmm0
divss  -0x18(%rbp),%xmm0
mov    $0x2,%edi
call   1040 <pow@plt>
addss  -0x1c(%rbp),%xmm0
movss  %xmm0,-0x1c(%rbp)
jmp    126d <c_snrm2+0x13d>
jmp    1272 <c_snrm2+0x142>
mov    -0x14(%rbp),%eax
add    -0x24(%rbp),%eax
mov    %eax,-0x24(%rbp)
jmp    11a0 <c_snrm2+0x70>
movss  -0x18(%rbp),%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  -0x1c(%rbp),%xmm0
call   1050 <sqrt@plt>
movaps %xmm0,%xmm1
movss  -0x2c(%rbp),%xmm0
mulss  %xmm1,%xmm0
movss  %xmm0,-0x4(%rbp)
movss  -0x4(%rbp),%xmm0
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<c_snrm2>:
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x28,%rsp
xorps  %xmm1,%xmm1
test   %edi,%edi
jle    1236 <c_snrm2+0x116>
test   %edx,%edx
jle    1236 <c_snrm2+0x116>
mov    %rsi,%r15
cmp    $0x1,%edi
jne    1157 <c_snrm2+0x37>
movss  (%r15),%xmm0
andps  0xebe(%rip),%xmm0
jmp    1239 <c_snrm2+0x119>
imul   %edx,%edi
test   %edi,%edi
jle    1207 <c_snrm2+0xe7>
mov    %edx,%r14d
mov    %edi,%r12d
movss  0xe90(%rip),%xmm0
xor    %ebx,%ebx
xorps  %xmm1,%xmm1
jmp    11b2 <c_snrm2+0x92>
nopw   0x0(%rax,%rax,1)
divss  %xmm1,%xmm2
movaps %xmm2,%xmm0
mov    $0x2,%edi
movss  %xmm1,0x10(%rsp)
call   1030 <pow@plt>
movss  0x10(%rsp),%xmm1
movss  0xc(%rsp),%xmm2
addss  %xmm0,%xmm2
movaps %xmm2,%xmm0
add    %r14,%rbx
cmp    %r12,%rbx
jge    1212 <c_snrm2+0xf2>
movss  (%r15,%rbx,4),%xmm2
ucomiss 0xe45(%rip),%xmm2
jne    11c3 <c_snrm2+0xa3>
jnp    11aa <c_snrm2+0x8a>
movss  %xmm0,0xc(%rsp)
andps  0xe40(%rip),%xmm2
ucomiss %xmm1,%xmm2
jbe    1180 <c_snrm2+0x60>
divss  %xmm2,%xmm1
movaps %xmm1,%xmm0
mov    $0x2,%edi
movaps %xmm2,0x10(%rsp)
call   1030 <pow@plt>
movss  0xc(%rsp),%xmm1
mulss  %xmm0,%xmm1
movaps %xmm1,%xmm0
addss  0xe00(%rip),%xmm0
movaps 0x10(%rsp),%xmm1
jmp    11aa <c_snrm2+0x8a>
movss  0xdf1(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomiss 0xdeb(%rip),%xmm0
jb     1221 <c_snrm2+0x101>
sqrtss %xmm0,%xmm0
jmp    1232 <c_snrm2+0x112>
movss  %xmm1,0x10(%rsp)
call   1040 <sqrt@plt>
movss  0x10(%rsp),%xmm1
mulss  %xmm0,%xmm1
movaps %xmm1,%xmm0
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
ret

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

LLVM IR (-O2):
define float @c_snrm2(i32 %0, float* nocapture %1, i32 %2) {
%4 = icmp slt i32 %0, 1
%5 = icmp slt i32 %2, 1
%6 = or i1 %4, %5
br i1 %6, label %46, label %7
7: ; preds = %3
%8 = icmp eq i32 %0, 1
br i1 %8, label %15, label %9
9: ; preds = %7
%10 = mul nsw i32 %2, %0
%11 = icmp sgt i32 %10, 0
br i1 %11, label %12, label %41
12: ; preds = %9
%13 = zext i32 %2 to i64
%14 = zext i32 %10 to i64
br label %18
15: ; preds = %7
%16 = load float, float* %1
%17 = tail call float @llvm.fabs.f32(float %16)
br label %46
18: ; preds = %12, %36
%19 = phi i64 [ 0, %12 ], [ %39, %36 ]
%20 = phi float [ 1.000000e+00, %12 ], [ %38, %36 ]
%21 = phi float [ 0.000000e+00, %12 ], [ %37, %36 ]
%22 = getelementptr inbounds float, float* %1, i64 %19
%23 = load float, float* %22
%24 = fcmp une float %23, 0.000000e+00
br i1 %24, label %25, label %36
25: ; preds = %18
%26 = tail call float @llvm.fabs.f32(float %23)
%27 = fcmp olt float %21, %26
br i1 %27, label %28, label %32
28: ; preds = %25
%29 = fdiv float %21, %26
%30 = tail call float @pow(float %29, i32 2)
%31 = tail call float @llvm.fmuladd.f32(float %20, float %30, float 1.000000e+00)
br label %36
32: ; preds = %25
%33 = fdiv float %26, %21
%34 = tail call float @pow(float %33, i32 2)
%35 = fadd float %20, %34
br label %36
36: ; preds = %18, %32, %28
%37 = phi float [ %26, %28 ], [ %21, %32 ], [ %21, %18 ]
%38 = phi float [ %31, %28 ], [ %35, %32 ], [ %20, %18 ]
%39 = add i64 %19, %13
%40 = icmp slt i64 %39, %14
br i1 %40, label %18, label %41
41: ; preds = %36, %9
%42 = phi float [ 0.000000e+00, %9 ], [ %37, %36 ]
%43 = phi float [ 1.000000e+00, %9 ], [ %38, %36 ]
%44 = tail call float @sqrt(float %43)
%45 = fmul float %42, %44
br label %46
46: ; preds = %3, %41, %15
%47 = phi float [ %17, %15 ], [ %45, %41 ], [ 0.000000e+00, %3 ]
ret float %47
}