#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__ malloc(unsigned int);
int /*<<< orphan*/ printf(char *);
double **dmatrix(int nrl, int nrh, int ncl, int nch) {
  int i, nrow = nrh - nrl + 1, ncol = nch - ncl + 1;
  double **m;
  m = (double **)malloc((unsigned)(nrow + 1) * sizeof(double *));
  if (!m) {
    printf("ERROR: allocation failure 1 in dmatrix\n");
  }
  m += 1;
  m -= nrl;
  m[nrl] = (double *)malloc((unsigned)((nrow * ncol + 1) * sizeof(double)));
  if (!m[nrl]) {
    printf("ERROR: allocation failure 2 in dmatrix\n");
  }
  m[nrl] += 1;
  m[nrl] -= ncl;
  for (i = nrl + 1; i <= nrh; i++)
    m[i] = m[i - 1] + ncol;
  return (m);
}


x86 assembly (clang, -O0):
<dmatrix>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
mov    -0x8(%rbp),%eax
sub    -0x4(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%eax
sub    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,%eax
shl    $0x3,%rax
mov    %eax,%edi
call   1040 <malloc@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    117a <dmatrix+0x5a>
lea    0xe8b(%rip),%rdi
call   1030 <printf@plt>
mov    -0x28(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x28(%rbp)
mov    -0x4(%rbp),%ecx
mov    -0x28(%rbp),%rax
movslq %ecx,%rdx
xor    %ecx,%ecx
sub    %rdx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x18(%rbp),%eax
imul   -0x1c(%rbp),%eax
add    $0x1,%eax
cltq
shl    $0x3,%rax
mov    %eax,%edi
call   1040 <malloc@plt>
mov    %rax,%rdx
mov    -0x28(%rbp),%rax
movslq -0x4(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x28(%rbp),%rax
movslq -0x4(%rbp),%rcx
cmpq   $0x0,(%rax,%rcx,8)
jne    11e5 <dmatrix+0xc5>
lea    0xe48(%rip),%rdi
call   1030 <printf@plt>
mov    -0x28(%rbp),%rax
movslq -0x4(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
add    $0x8,%rdx
mov    %rdx,(%rax,%rcx,8)
mov    -0xc(%rbp),%esi
mov    -0x28(%rbp),%rax
movslq -0x4(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
movslq %esi,%rdi
xor    %esi,%esi
sub    %rdi,%rsi
shl    $0x3,%rsi
add    %rsi,%rdx
mov    %rdx,(%rax,%rcx,8)
mov    -0x4(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x8(%rbp),%eax
jg     1266 <dmatrix+0x146>
mov    -0x28(%rbp),%rax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdx
movslq -0x1c(%rbp),%rax
shl    $0x3,%rax
add    %rax,%rdx
mov    -0x28(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1224 <dmatrix+0x104>
mov    -0x28(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<dmatrix>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %ecx,%ebp
mov    %edi,%r12d
mov    %esi,0x4(%rsp)
mov    %esi,%eax
sub    %edi,%eax
mov    %edx,(%rsp)
sub    %edx,%ebp
add    $0x1,%ebp
lea    0x10(,%rax,8),%edi
mov    %eax,%r14d
shl    $0x3,%r14d
call   1040 <malloc@plt>
mov    %rax,%r15
test   %rax,%rax
jne    1167 <dmatrix+0x47>
lea    0xe9e(%rip),%rdi
call   1030 <puts@plt>
movslq %r12d,%r13
lea    0x0(,%r13,8),%rax
mov    %r15,%rbx
sub    %rax,%rbx
lea    0x8(%rbx),%rax
add    $0x8,%r14d
imul   %ebp,%r14d
add    $0x8,%r14d
mov    %r14d,%edi
mov    %rax,%r14
call   1040 <malloc@plt>
mov    %rax,0x8(%rbx,%r13,8)
test   %rax,%rax
jne    11ad <dmatrix+0x8d>
lea    0xe83(%rip),%rdi
call   1030 <puts@plt>
mov    (%r14,%r13,8),%rax
movslq (%rsp),%rcx
shl    $0x3,%rcx
sub    %rcx,%rax
add    $0x8,%rax
mov    %rax,(%r14,%r13,8)
mov    0x4(%rsp),%edx
mov    %edx,%edi
sub    %r12d,%edi
jle    127a <dmatrix+0x15a>
movslq %ebp,%rcx
movslq %edx,%rdx
mov    %r13,%r8
not    %r8
add    %rdx,%r8
and    $0x7,%rdi
je     120c <dmatrix+0xec>
lea    0x0(,%rcx,8),%rbp
xor    %esi,%esi
xchg   %ax,%ax
add    %rbp,%rax
mov    %rax,0x10(%r15,%rsi,8)
add    $0x1,%rsi
cmp    %rsi,%rdi
jne    11f0 <dmatrix+0xd0>
add    %r13,%rsi
cmp    $0x7,%r8
jae    1215 <dmatrix+0xf5>
jmp    127a <dmatrix+0x15a>
mov    %r13,%rsi
cmp    $0x7,%r8
jb     127a <dmatrix+0x15a>
lea    (%rax,%rcx,8),%rax
mov    %rcx,%rdi
shl    $0x6,%rdi
mov    $0x9,%ebp
sub    %r13,%rbp
lea    (%r15,%rbp,8),%rbp
shl    $0x3,%rcx
mov    %rax,-0x38(%rbp,%rsi,8)
lea    (%rax,%rcx,1),%rbx
mov    %rbx,-0x30(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,-0x28(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,-0x20(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,-0x18(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,-0x10(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,-0x8(%rbp,%rsi,8)
add    %rcx,%rbx
mov    %rbx,0x0(%rbp,%rsi,8)
add    $0x8,%rsi
add    %rdi,%rax
cmp    %rsi,%rdx
jne    1230 <dmatrix+0x110>
mov    %r14,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [40 x i8] c"ERROR: allocation failure 1 in dmatrix\0A\00"
@.str.1 = [40 x i8] c"ERROR: allocation failure 2 in dmatrix\0A\00"
define double** @dmatrix(i32 %0, i32 %1, i32 %2, i32 %3) {
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca double**
store i32 %0, i32* %5
store i32 %1, i32* %6
store i32 %2, i32* %7
store i32 %3, i32* %8
%13 = load i32, i32* %6
%14 = load i32, i32* %5
%15 = sub nsw i32 %13, %14
%16 = add nsw i32 %15, 1
store i32 %16, i32* %10
%17 = load i32, i32* %8
%18 = load i32, i32* %7
%19 = sub nsw i32 %17, %18
%20 = add nsw i32 %19, 1
store i32 %20, i32* %11
%21 = load i32, i32* %10
%22 = add nsw i32 %21, 1
%23 = zext i32 %22 to i64
%24 = mul i64 %23, 8
%25 = trunc i64 %24 to i32
%26 = call i64 @malloc(i32 %25)
%27 = inttoptr i64 %26 to double**
store double** %27, double*** %12
%28 = load double**, double*** %12
%29 = icmp ne double** %28, null
br i1 %29, label %32, label %30
30: ; preds = %4
%31 = call i32 @printf(i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str, i64 0, i64 0))
br label %32
32: ; preds = %30, %4
%33 = load double**, double*** %12
%34 = getelementptr inbounds double*, double** %33, i64 1
store double** %34, double*** %12
%35 = load i32, i32* %5
%36 = load double**, double*** %12
%37 = sext i32 %35 to i64
%38 = sub i64 0, %37
%39 = getelementptr inbounds double*, double** %36, i64 %38
store double** %39, double*** %12
%40 = load i32, i32* %10
%41 = load i32, i32* %11
%42 = mul nsw i32 %40, %41
%43 = add nsw i32 %42, 1
%44 = sext i32 %43 to i64
%45 = mul i64 %44, 8
%46 = trunc i64 %45 to i32
%47 = call i64 @malloc(i32 %46)
%48 = inttoptr i64 %47 to double*
%49 = load double**, double*** %12
%50 = load i32, i32* %5
%51 = sext i32 %50 to i64
%52 = getelementptr inbounds double*, double** %49, i64 %51
store double* %48, double** %52
%53 = load double**, double*** %12
%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 = icmp ne double* %57, null
br i1 %58, label %61, label %59
59: ; preds = %32
%60 = call i32 @printf(i8* getelementptr inbounds ([40 x i8], [40 x i8]* @.str.1, i64 0, i64 0))
br label %61
61: ; preds = %59, %32
%62 = load double**, double*** %12
%63 = load i32, i32* %5
%64 = sext i32 %63 to i64
%65 = getelementptr inbounds double*, double** %62, i64 %64
%66 = load double*, double** %65
%67 = getelementptr inbounds double, double* %66, i64 1
store double* %67, double** %65
%68 = load i32, i32* %7
%69 = load double**, double*** %12
%70 = load i32, i32* %5
%71 = sext i32 %70 to i64
%72 = getelementptr inbounds double*, double** %69, i64 %71
%73 = load double*, double** %72
%74 = sext i32 %68 to i64
%75 = sub i64 0, %74
%76 = getelementptr inbounds double, double* %73, i64 %75
store double* %76, double** %72
%77 = load i32, i32* %5
%78 = add nsw i32 %77, 1
store i32 %78, i32* %9
br label %79
79: ; preds = %97, %61
%80 = load i32, i32* %9
%81 = load i32, i32* %6
%82 = icmp sle i32 %80, %81
br i1 %82, label %83, label %100
83: ; preds = %79
%84 = load double**, double*** %12
%85 = load i32, i32* %9
%86 = sub nsw i32 %85, 1
%87 = sext i32 %86 to i64
%88 = getelementptr inbounds double*, double** %84, i64 %87
%89 = load double*, double** %88
%90 = load i32, i32* %11
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds double, double* %89, i64 %91
%93 = load double**, double*** %12
%94 = load i32, i32* %9
%95 = sext i32 %94 to i64
%96 = getelementptr inbounds double*, double** %93, i64 %95
store double* %92, double** %96
br label %97
97: ; preds = %83
%98 = load i32, i32* %9
%99 = add nsw i32 %98, 1
store i32 %99, i32* %9
br label %79
100: ; preds = %79
%101 = load double**, double*** %12
ret double** %101
}

LLVM IR (-O2):
@str = [39 x i8] c"ERROR: allocation failure 1 in dmatrix\00"
@str.2 = [39 x i8] c"ERROR: allocation failure 2 in dmatrix\00"
define double** @dmatrix(i32 %0, i32 %1, i32 %2, i32 %3) {
%5 = sub nsw i32 %1, %0
%6 = sub nsw i32 %3, %2
%7 = add nsw i32 %6, 1
%8 = shl i32 %5, 3
%9 = add i32 %8, 16
%10 = tail call i64 @malloc(i32 %9)
%11 = inttoptr i64 %10 to double**
%12 = icmp eq i64 %10, 0
br i1 %12, label %13, label %15
13: ; preds = %4
%14 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([39 x i8], [39 x i8]* @str, i64 0, i64 0))
br label %15
15: ; preds = %13, %4
%16 = getelementptr inbounds double*, double** %11, i64 1
%17 = sext i32 %0 to i64
%18 = sub nsw i64 0, %17
%19 = getelementptr inbounds double*, double** %16, i64 %18
%20 = add i32 %8, 8
%21 = mul i32 %20, %7
%22 = add i32 %21, 8
%23 = tail call i64 @malloc(i32 %22)
%24 = inttoptr i64 %23 to double*
%25 = getelementptr inbounds double*, double** %19, i64 %17
store double* %24, double** %25
%26 = icmp eq i64 %23, 0
br i1 %26, label %27, label %30
27: ; preds = %15
%28 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([39 x i8], [39 x i8]* @str.2, i64 0, i64 0))
%29 = load double*, double** %25
br label %30
30: ; preds = %27, %15
%31 = phi double* [ %29, %27 ], [ %24, %15 ]
%32 = getelementptr inbounds double, double* %31, i64 1
%33 = sext i32 %2 to i64
%34 = sub nsw i64 0, %33
%35 = getelementptr inbounds double, double* %32, i64 %34
store double* %35, double** %25
%36 = icmp sgt i32 %1, %0
br i1 %36, label %37, label %86
37: ; preds = %30
%38 = sext i32 %7 to i64
%39 = sext i32 %1 to i64
%40 = sub nsw i64 %39, %17
%41 = xor i64 %17, -1
%42 = add nsw i64 %41, %39
%43 = and i64 %40, 7
%44 = icmp eq i64 %43, 0
br i1 %44, label %54, label %45
45: ; preds = %37, %45
%46 = phi double* [ %50, %45 ], [ %35, %37 ]
%47 = phi i64 [ %49, %45 ], [ %17, %37 ]
%48 = phi i64 [ %52, %45 ], [ 0, %37 ]
%49 = add nsw i64 %47, 1
%50 = getelementptr inbounds double, double* %46, i64 %38
%51 = getelementptr inbounds double*, double** %19, i64 %49
store double* %50, double** %51
%52 = add i64 %48, 1
%53 = icmp eq i64 %52, %43
br i1 %53, label %54, label %45
54: ; preds = %45, %37
%55 = phi double* [ %35, %37 ], [ %50, %45 ]
%56 = phi i64 [ %17, %37 ], [ %49, %45 ]
%57 = icmp ult i64 %42, 7
br i1 %57, label %86, label %58
58: ; preds = %54, %58
%59 = phi double* [ %83, %58 ], [ %55, %54 ]
%60 = phi i64 [ %82, %58 ], [ %56, %54 ]
%61 = add nsw i64 %60, 1
%62 = getelementptr inbounds double, double* %59, i64 %38
%63 = getelementptr inbounds double*, double** %19, i64 %61
store double* %62, double** %63
%64 = add nsw i64 %60, 2
%65 = getelementptr inbounds double, double* %62, i64 %38
%66 = getelementptr inbounds double*, double** %19, i64 %64
store double* %65, double** %66
%67 = add nsw i64 %60, 3
%68 = getelementptr inbounds double, double* %65, i64 %38
%69 = getelementptr inbounds double*, double** %19, i64 %67
store double* %68, double** %69
%70 = add nsw i64 %60, 4
%71 = getelementptr inbounds double, double* %68, i64 %38
%72 = getelementptr inbounds double*, double** %19, i64 %70
store double* %71, double** %72
%73 = add nsw i64 %60, 5
%74 = getelementptr inbounds double, double* %71, i64 %38
%75 = getelementptr inbounds double*, double** %19, i64 %73
store double* %74, double** %75
%76 = add nsw i64 %60, 6
%77 = getelementptr inbounds double, double* %74, i64 %38
%78 = getelementptr inbounds double*, double** %19, i64 %76
store double* %77, double** %78
%79 = add nsw i64 %60, 7
%80 = getelementptr inbounds double, double* %77, i64 %38
%81 = getelementptr inbounds double*, double** %19, i64 %79
store double* %80, double** %81
%82 = add nsw i64 %60, 8
%83 = getelementptr inbounds double, double* %80, i64 %38
%84 = getelementptr inbounds double*, double** %19, i64 %82
store double* %83, double** %84
%85 = icmp eq i64 %82, %39
br i1 %85, label %86, label %58
86: ; preds = %54, %58, %30
ret double** %19
}