#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 */
int /*<<< orphan*/ daxpy(double *, double *, long, double);
void bmodd(double *a, double *c, long dimi, long dimj, long stride_a,
           long stride_c) {
  long j, k, length;
  double alpha;
  for (k = 0; k < dimi; k++)
    for (j = 0; j < dimj; j++) {
      c[k + j * stride_c] /= a[k + k * stride_a];
      alpha = -c[k + j * stride_c];
      length = dimi - k - 1;
      daxpy(&c[k + 1 + j * stride_c], &a[k + 1 + k * stride_a], dimi - k - 1,
            alpha);
    }
}


x86 assembly (clang, -O0):
<bmodd>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
movq   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%rax
cmp    -0x18(%rbp),%rax
jge    1257 <bmodd+0x147>
movq   $0x0,-0x38(%rbp)
mov    -0x38(%rbp),%rax
cmp    -0x20(%rbp),%rax
jge    1241 <bmodd+0x131>
mov    -0x8(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    -0x40(%rbp),%rdx
imul   -0x28(%rbp),%rdx
add    %rdx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    -0x38(%rbp),%rdx
imul   -0x30(%rbp),%rdx
add    %rdx,%rcx
movsd  (%rax,%rcx,8),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    -0x38(%rbp),%rdx
imul   -0x30(%rbp),%rdx
add    %rdx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x18(%rbp),%rax
sub    -0x40(%rbp),%rax
sub    $0x1,%rax
mov    %rax,-0x48(%rbp)
mov    -0x10(%rbp),%rdi
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    -0x38(%rbp),%rcx
imul   -0x30(%rbp),%rcx
add    %rcx,%rax
shl    $0x3,%rax
add    %rax,%rdi
mov    -0x8(%rbp),%rsi
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    -0x40(%rbp),%rcx
imul   -0x28(%rbp),%rcx
add    %rcx,%rax
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x18(%rbp),%rdx
sub    -0x40(%rbp),%rdx
sub    $0x1,%rdx
movsd  -0x50(%rbp),%xmm0
call   1030 <daxpy@plt>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    114e <bmodd+0x3e>
jmp    1246 <bmodd+0x136>
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    1138 <bmodd+0x28>
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<bmodd>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %r8,0x20(%rsp)
mov    %rsi,0x8(%rsp)
test   %rdx,%rdx
jle    1202 <bmodd+0xf2>
mov    %r9,%rbp
mov    %rcx,%rbx
mov    %rdi,%r12
addq   $0x8,0x8(%rsp)
shl    $0x3,%rbp
xor    %r13d,%r13d
movapd 0xeb1(%rip),%xmm1
mov    %rcx,0x18(%rsp)
mov    %rdx,0x10(%rsp)
jmp    1170 <bmodd+0x60>
nopl   0x0(%rax,%rax,1)
add    $0x1,%r13
mov    %r13,%rax
cmp    %rdx,%rax
je     1202 <bmodd+0xf2>
test   %rbx,%rbx
jle    1160 <bmodd+0x50>
mov    %r13,%r14
imul   0x20(%rsp),%r14
lea    0x1(%r13),%rax
mov    %rax,0x28(%rsp)
lea    (%r14,%r13,1),%rax
add    $0x1,%rax
add    %r13,%r14
lea    (%r12,%rax,8),%rax
mov    %rax,0x30(%rsp)
mov    0x8(%rsp),%rax
lea    (%rax,%r13,8),%r15
not    %r13
add    %rdx,%r13
nopw   0x0(%rax,%rax,1)
movsd  -0x8(%r15),%xmm0
divsd  (%r12,%r14,8),%xmm0
movsd  %xmm0,-0x8(%r15)
xorpd  %xmm1,%xmm0
mov    %r15,%rdi
mov    0x30(%rsp),%rsi
mov    %r13,%rdx
call   1030 <daxpy@plt>
movapd 0xe22(%rip),%xmm1
add    %rbp,%r15
add    $0xffffffffffffffff,%rbx
jne    11b0 <bmodd+0xa0>
mov    0x28(%rsp),%rax
mov    %rax,%r13
mov    0x18(%rsp),%rbx
mov    0x10(%rsp),%rdx
cmp    %rdx,%rax
jne    1170 <bmodd+0x60>
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define void @bmodd(double* %0, double* %1, i64 %2, i64 %3, i64 %4, i64 %5) {
%7 = icmp sgt i64 %2, 0
br i1 %7, label %8, label %40
8: ; preds = %6
%9 = icmp sgt i64 %3, 0
br label %10
10: ; preds = %8, %37
%11 = phi i64 [ 0, %8 ], [ %38, %37 ]
br i1 %9, label %14, label %12
12: ; preds = %10
%13 = add nuw nsw i64 %11, 1
br label %37
14: ; preds = %10
%15 = mul nsw i64 %11, %4
%16 = add nsw i64 %15, %11
%17 = getelementptr inbounds double, double* %0, i64 %16
%18 = add nuw nsw i64 %11, 1
%19 = add nsw i64 %18, %15
%20 = getelementptr inbounds double, double* %0, i64 %19
%21 = xor i64 %11, -1
%22 = add i64 %21, %2
br label %23
23: ; preds = %14, %23
%24 = phi i64 [ 0, %14 ], [ %35, %23 ]
%25 = load double, double* %17
%26 = mul nsw i64 %24, %5
%27 = add nsw i64 %26, %11
%28 = getelementptr inbounds double, double* %1, i64 %27
%29 = load double, double* %28
%30 = fdiv double %29, %25
store double %30, double* %28
%31 = fneg double %30
%32 = add nsw i64 %26, %18
%33 = getelementptr inbounds double, double* %1, i64 %32
%34 = tail call i32 @daxpy(double* %33, double* %20, i64 %22, double %31)
%35 = add nuw nsw i64 %24, 1
%36 = icmp eq i64 %35, %3
br i1 %36, label %37, label %23
37: ; preds = %23, %12
%38 = phi i64 [ %13, %12 ], [ %18, %23 ]
%39 = icmp eq i64 %38, %2
br i1 %39, label %40, label %10
40: ; preds = %37, %6
ret void
}