#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 fabs(double);
int idamax(int n, double *dx, int dx_off, int incx) {
  double dmax, dtemp;
  int i, ix, itemp = 0;
  if (n < 1)
    itemp = -1;
  else {
    if (n == 1)
      itemp = 0;
    else {
      if (incx != 1) {
        dmax = fabs(dx[dx_off]);
        ix = 1 + incx;
        for (i = 1; i < n; i++) {
          dtemp = fabs(dx[ix + dx_off]);
          if (dtemp > dmax) {
            itemp = i;
            dmax = dtemp;
          }
          ix += incx;
        }
      } else {
        itemp = 0;
        dmax = fabs(dx[dx_off]);
        for (i = 1; i < n; i++) {
          dtemp = fabs(dx[i + dx_off]);
          if (dtemp > dmax) {
            itemp = i;
            dmax = dtemp;
          }
        }
      }
    }
  }
  return itemp;
}


x86 assembly (clang, -O0):
<idamax>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
movl   $0x0,-0x34(%rbp)
cmpl   $0x1,-0x4(%rbp)
jge    112e <idamax+0x2e>
movl   $0xffffffff,-0x34(%rbp)
jmp    1280 <idamax+0x180>
cmpl   $0x1,-0x4(%rbp)
jne    1144 <idamax+0x44>
movl   $0x0,-0x34(%rbp)
jmp    127b <idamax+0x17b>
cmpl   $0x1,-0x18(%rbp)
je     11e5 <idamax+0xe5>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xe9e(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    11e0 <idamax+0xe0>
mov    -0x10(%rbp),%rax
mov    -0x30(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xe60(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
ucomisd -0x20(%rbp),%xmm0
jbe    11c9 <idamax+0xc9>
mov    -0x2c(%rbp),%eax
mov    %eax,-0x34(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
mov    -0x18(%rbp),%eax
add    -0x30(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    117b <idamax+0x7b>
jmp    1276 <idamax+0x176>
movl   $0x0,-0x34(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xe00(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  %xmm0,-0x20(%rbp)
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1271 <idamax+0x171>
mov    -0x10(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    -0x14(%rbp),%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movaps 0xdcb(%rip),%xmm1
pand   %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
ucomisd -0x20(%rbp),%xmm0
jbe    125e <idamax+0x15e>
mov    -0x2c(%rbp),%eax
mov    %eax,-0x34(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  %xmm0,-0x20(%rbp)
jmp    1263 <idamax+0x163>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1210 <idamax+0x110>
jmp    1276 <idamax+0x176>
jmp    127b <idamax+0x17b>
jmp    1280 <idamax+0x180>
mov    -0x34(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<idamax>:
push   %rbp
push   %r14
push   %rbx
test   %edi,%edi
jle    113d <idamax+0x3d>
xor    %eax,%eax
cmp    $0x1,%edi
je     1142 <idamax+0x42>
movslq %edx,%r8
cmp    $0x1,%ecx
jne    1147 <idamax+0x47>
movsd  (%rsi,%r8,8),%xmm0
andpd  0xedb(%rip),%xmm0
mov    %edi,%r9d
add    $0xffffffffffffffff,%r9
cmp    $0x2,%edi
jne    117a <idamax+0x7a>
xor    %eax,%eax
mov    $0x1,%edx
jmp    11da <idamax+0xda>
mov    $0xffffffff,%eax
pop    %rbx
pop    %r14
pop    %rbp
ret
movsd  (%rsi,%r8,8),%xmm0
andpd  0xeab(%rip),%xmm0
lea    0x1(%rcx),%eax
movslq %eax,%r10
lea    -0x1(%rdi),%r9d
cmp    $0x2,%edi
jne    1201 <idamax+0x101>
mov    $0x1,%ecx
xor    %eax,%eax
test   $0x1,%r9b
je     1142 <idamax+0x42>
jmp    1283 <idamax+0x183>
mov    %r9,%rdi
and    $0xfffffffffffffffe,%rdi
lea    (%rsi,%r8,8),%rbx
add    $0x8,%rbx
xor    %eax,%eax
mov    $0x1,%edx
movapd 0xe68(%rip),%xmm1
nopl   0x0(%rax,%rax,1)
movsd  -0x8(%rbx,%rdx,8),%xmm2
andpd  %xmm1,%xmm2
ucomisd %xmm0,%xmm2
maxsd  %xmm0,%xmm2
mov    %edx,%ebp
cmovbe %eax,%ebp
movsd  (%rbx,%rdx,8),%xmm0
andpd  %xmm1,%xmm0
ucomisd %xmm2,%xmm0
lea    0x1(%rdx),%rcx
mov    %ecx,%eax
cmovbe %ebp,%eax
maxsd  %xmm2,%xmm0
add    $0x2,%rdx
cmp    %rdi,%rcx
jne    11a0 <idamax+0xa0>
test   $0x1,%r9b
je     1142 <idamax+0x42>
add    %rdx,%r8
movsd  (%rsi,%r8,8),%xmm1
andpd  0xe0b(%rip),%xmm1
ucomisd %xmm0,%xmm1
cmova  %edx,%eax
jmp    1142 <idamax+0x42>
movslq %ecx,%rax
mov    %r9d,%edi
and    $0xfffffffe,%edi
lea    (%r8,%r10,1),%rcx
lea    (%rsi,%rcx,8),%r11
lea    (%rax,%rax,1),%r14
add    %r8,%rax
add    %r10,%rax
lea    (%rsi,%rax,8),%rdx
mov    $0x1,%ecx
xor    %ebx,%ebx
movapd 0xdd1(%rip),%xmm1
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  (%r11,%rbx,8),%xmm2
andpd  %xmm1,%xmm2
ucomisd %xmm0,%xmm2
maxsd  %xmm0,%xmm2
cmova  %ecx,%eax
movsd  (%rdx,%rbx,8),%xmm0
andpd  %xmm1,%xmm0
ucomisd %xmm2,%xmm0
lea    0x1(%rcx),%ebp
cmova  %ebp,%eax
maxsd  %xmm2,%xmm0
add    $0x2,%ecx
add    %r14,%rbx
cmp    %edi,%ebp
jne    1240 <idamax+0x140>
add    %rbx,%r10
test   $0x1,%r9b
je     1142 <idamax+0x42>
add    %r8,%r10
movsd  (%rsi,%r10,8),%xmm1
andpd  0xd6c(%rip),%xmm1
ucomisd %xmm0,%xmm1
cmova  %ecx,%eax
jmp    1142 <idamax+0x42>

LLVM IR (-O0):
define i32 @idamax(i32 %0, double* %1, i32 %2, i32 %3) {
%5 = alloca i32
%6 = alloca double*
%7 = alloca i32
%8 = alloca i32
%9 = alloca double
%10 = alloca double
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
store i32 %0, i32* %5
store double* %1, double** %6
store i32 %2, i32* %7
store i32 %3, i32* %8
store i32 0, i32* %13
%14 = load i32, i32* %5
%15 = icmp slt i32 %14, 1
br i1 %15, label %16, label %17
16: ; preds = %4
store i32 -1, i32* %13
br label %93
17: ; preds = %4
%18 = load i32, i32* %5
%19 = icmp eq i32 %18, 1
br i1 %19, label %20, label %21
20: ; preds = %17
store i32 0, i32* %13
br label %92
21: ; preds = %17
%22 = load i32, i32* %8
%23 = icmp ne i32 %22, 1
br i1 %23, label %24, label %60
24: ; preds = %21
%25 = load double*, double** %6
%26 = load i32, i32* %7
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds double, double* %25, i64 %27
%29 = load double, double* %28
%30 = call double @llvm.fabs.f64(double %29)
store double %30, double* %9
%31 = load i32, i32* %8
%32 = add nsw i32 1, %31
store i32 %32, i32* %12
store i32 1, i32* %11
br label %33
33: ; preds = %56, %24
%34 = load i32, i32* %11
%35 = load i32, i32* %5
%36 = icmp slt i32 %34, %35
br i1 %36, label %37, label %59
37: ; preds = %33
%38 = load double*, double** %6
%39 = load i32, i32* %12
%40 = load i32, i32* %7
%41 = add nsw i32 %39, %40
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds double, double* %38, i64 %42
%44 = load double, double* %43
%45 = call double @llvm.fabs.f64(double %44)
store double %45, double* %10
%46 = load double, double* %10
%47 = load double, double* %9
%48 = fcmp ogt double %46, %47
br i1 %48, label %49, label %52
49: ; preds = %37
%50 = load i32, i32* %11
store i32 %50, i32* %13
%51 = load double, double* %10
store double %51, double* %9
br label %52
52: ; preds = %49, %37
%53 = load i32, i32* %8
%54 = load i32, i32* %12
%55 = add nsw i32 %54, %53
store i32 %55, i32* %12
br label %56
56: ; preds = %52
%57 = load i32, i32* %11
%58 = add nsw i32 %57, 1
store i32 %58, i32* %11
br label %33
59: ; preds = %33
br label %91
60: ; preds = %21
store i32 0, i32* %13
%61 = load double*, double** %6
%62 = load i32, i32* %7
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds double, double* %61, i64 %63
%65 = load double, double* %64
%66 = call double @llvm.fabs.f64(double %65)
store double %66, double* %9
store i32 1, i32* %11
br label %67
67: ; preds = %87, %60
%68 = load i32, i32* %11
%69 = load i32, i32* %5
%70 = icmp slt i32 %68, %69
br i1 %70, label %71, label %90
71: ; preds = %67
%72 = load double*, double** %6
%73 = load i32, i32* %11
%74 = load i32, i32* %7
%75 = add nsw i32 %73, %74
%76 = sext i32 %75 to i64
%77 = getelementptr inbounds double, double* %72, i64 %76
%78 = load double, double* %77
%79 = call double @llvm.fabs.f64(double %78)
store double %79, double* %10
%80 = load double, double* %10
%81 = load double, double* %9
%82 = fcmp ogt double %80, %81
br i1 %82, label %83, label %86
83: ; preds = %71
%84 = load i32, i32* %11
store i32 %84, i32* %13
%85 = load double, double* %10
store double %85, double* %9
br label %86
86: ; preds = %83, %71
br label %87
87: ; preds = %86
%88 = load i32, i32* %11
%89 = add nsw i32 %88, 1
store i32 %89, i32* %11
br label %67
90: ; preds = %67
br label %91
91: ; preds = %90, %59
br label %92
92: ; preds = %91, %20
br label %93
93: ; preds = %92, %16
%94 = load i32, i32* %13
ret i32 %94
}

LLVM IR (-O2):
define i32 @idamax(i32 %0, double* nocapture %1, i32 %2, i32 %3) {
%5 = icmp slt i32 %0, 1
br i1 %5, label %112, label %6
6: ; preds = %4
%7 = icmp eq i32 %0, 1
br i1 %7, label %112, label %8
8: ; preds = %6
%9 = icmp eq i32 %3, 1
%10 = sext i32 %2 to i64
br i1 %9, label %49, label %11
11: ; preds = %8
%12 = add i32 %3, 1
%13 = getelementptr inbounds double, double* %1, i64 %10
%14 = load double, double* %13
%15 = tail call double @llvm.fabs.f64(double %14)
%16 = sext i32 %12 to i64
%17 = sext i32 %3 to i64
%18 = add i32 %0, -1
%19 = and i32 %18, 1
%20 = icmp eq i32 %0, 2
br i1 %20, label %98, label %21
21: ; preds = %11
%22 = and i32 %18, -2
br label %23
23: ; preds = %23, %21
%24 = phi i64 [ %16, %21 ], [ %45, %23 ]
%25 = phi i32 [ 0, %21 ], [ %44, %23 ]
%26 = phi i32 [ 1, %21 ], [ %46, %23 ]
%27 = phi double [ %15, %21 ], [ %43, %23 ]
%28 = phi i32 [ 0, %21 ], [ %47, %23 ]
%29 = add nsw i64 %24, %10
%30 = getelementptr inbounds double, double* %1, i64 %29
%31 = load double, double* %30
%32 = tail call double @llvm.fabs.f64(double %31)
%33 = fcmp ogt double %32, %27
%34 = select i1 %33, double %32, double %27
%35 = select i1 %33, i32 %26, i32 %25
%36 = add i64 %24, %17
%37 = add nuw nsw i32 %26, 1
%38 = add nsw i64 %36, %10
%39 = getelementptr inbounds double, double* %1, i64 %38
%40 = load double, double* %39
%41 = tail call double @llvm.fabs.f64(double %40)
%42 = fcmp ogt double %41, %34
%43 = select i1 %42, double %41, double %34
%44 = select i1 %42, i32 %37, i32 %35
%45 = add i64 %36, %17
%46 = add nuw nsw i32 %26, 2
%47 = add i32 %28, 2
%48 = icmp eq i32 %47, %22
br i1 %48, label %98, label %23
49: ; preds = %8
%50 = getelementptr inbounds double, double* %1, i64 %10
%51 = load double, double* %50
%52 = tail call double @llvm.fabs.f64(double %51)
%53 = zext i32 %0 to i64
%54 = add nsw i64 %53, -1
%55 = and i64 %54, 1
%56 = icmp eq i32 %0, 2
br i1 %56, label %84, label %57
57: ; preds = %49
%58 = and i64 %54, -2
br label %59
59: ; preds = %59, %57
%60 = phi i64 [ 1, %57 ], [ %81, %59 ]
%61 = phi i32 [ 0, %57 ], [ %80, %59 ]
%62 = phi double [ %52, %57 ], [ %78, %59 ]
%63 = phi i64 [ 0, %57 ], [ %82, %59 ]
%64 = add nsw i64 %60, %10
%65 = getelementptr inbounds double, double* %1, i64 %64
%66 = load double, double* %65
%67 = tail call double @llvm.fabs.f64(double %66)
%68 = fcmp ogt double %67, %62
%69 = select i1 %68, double %67, double %62
%70 = trunc i64 %60 to i32
%71 = select i1 %68, i32 %70, i32 %61
%72 = add nuw nsw i64 %60, 1
%73 = add nsw i64 %72, %10
%74 = getelementptr inbounds double, double* %1, i64 %73
%75 = load double, double* %74
%76 = tail call double @llvm.fabs.f64(double %75)
%77 = fcmp ogt double %76, %69
%78 = select i1 %77, double %76, double %69
%79 = trunc i64 %72 to i32
%80 = select i1 %77, i32 %79, i32 %71
%81 = add nuw nsw i64 %60, 2
%82 = add i64 %63, 2
%83 = icmp eq i64 %82, %58
br i1 %83, label %84, label %59
84: ; preds = %59, %49
%85 = phi i32 [ undef, %49 ], [ %80, %59 ]
%86 = phi i64 [ 1, %49 ], [ %81, %59 ]
%87 = phi i32 [ 0, %49 ], [ %80, %59 ]
%88 = phi double [ %52, %49 ], [ %78, %59 ]
%89 = icmp eq i64 %55, 0
br i1 %89, label %112, label %90
90: ; preds = %84
%91 = add nsw i64 %86, %10
%92 = getelementptr inbounds double, double* %1, i64 %91
%93 = load double, double* %92
%94 = tail call double @llvm.fabs.f64(double %93)
%95 = fcmp ogt double %94, %88
%96 = trunc i64 %86 to i32
%97 = select i1 %95, i32 %96, i32 %87
br label %112
98: ; preds = %23, %11
%99 = phi i32 [ undef, %11 ], [ %44, %23 ]
%100 = phi i64 [ %16, %11 ], [ %45, %23 ]
%101 = phi i32 [ 0, %11 ], [ %44, %23 ]
%102 = phi i32 [ 1, %11 ], [ %46, %23 ]
%103 = phi double [ %15, %11 ], [ %43, %23 ]
%104 = icmp eq i32 %19, 0
br i1 %104, label %112, label %105
105: ; preds = %98
%106 = add nsw i64 %100, %10
%107 = getelementptr inbounds double, double* %1, i64 %106
%108 = load double, double* %107
%109 = tail call double @llvm.fabs.f64(double %108)
%110 = fcmp ogt double %109, %103
%111 = select i1 %110, i32 %102, i32 %101
br label %112
112: ; preds = %105, %98, %90, %84, %6, %4
%113 = phi i32 [ -1, %4 ], [ 0, %6 ], [ %85, %84 ], [ %97, %90 ], [ %99, %98 ], [ %111, %105 ]
ret i32 %113
}