#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(size_t);
int /*<<< orphan*/ nrerror(char *);
float **dmatrix(int nrl, int nrh, int ncl, int nch) {
  int i, nrow = nrh - nrl + 1, ncol = nch - ncl + 1;
  float **m;
  m = (float **)malloc((size_t)((nrow + 1) * sizeof(float *)));
  if (!m)
    nrerror("allocation failure 1 in matrix()");
  m += 1;
  m -= nrl;
  m[nrl] = (float *)malloc((size_t)((nrow * ncol + 1) * sizeof(float)));
  if (!m[nrl])
    nrerror("allocation failure 2 in matrix()");
  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
movslq %eax,%rdi
shl    $0x3,%rdi
call   1040 <malloc@plt>
mov    %rax,-0x28(%rbp)
cmpq   $0x0,-0x28(%rbp)
jne    1179 <dmatrix+0x59>
lea    0xe8c(%rip),%rdi
call   1030 <nrerror@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
movslq %eax,%rdi
shl    $0x2,%rdi
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    11e3 <dmatrix+0xc3>
lea    0xe43(%rip),%rdi
call   1030 <nrerror@plt>
mov    -0x28(%rbp),%rax
movslq -0x4(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
add    $0x4,%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    $0x2,%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     1264 <dmatrix+0x144>
mov    -0x28(%rbp),%rax
mov    -0x14(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rdx
movslq -0x1c(%rbp),%rax
shl    $0x2,%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    1222 <dmatrix+0x102>
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    %esi,%r15d
mov    %edi,%r12d
mov    %esi,0x4(%rsp)
sub    %edi,%r15d
mov    %edx,(%rsp)
sub    %edx,%ebp
add    $0x1,%ebp
movslq %r15d,%rax
add    $0x1,%r15d
lea    0x10(,%rax,8),%rdi
call   1040 <malloc@plt>
mov    %rax,%r13
test   %rax,%rax
jne    116a <dmatrix+0x4a>
lea    0xe9b(%rip),%rdi
call   1030 <nrerror@plt>
movslq %r12d,%r14
lea    0x0(,%r14,8),%rax
mov    %r13,%rbx
sub    %rax,%rbx
lea    0x8(%rbx),%rcx
imul   %ebp,%r15d
movslq %r15d,%rax
mov    %rcx,%r15
lea    0x4(,%rax,4),%rdi
call   1040 <malloc@plt>
mov    %rax,0x8(%rbx,%r14,8)
test   %rax,%rax
jne    11b0 <dmatrix+0x90>
lea    0xe7a(%rip),%rdi
call   1030 <nrerror@plt>
mov    (%r15,%r14,8),%rax
movslq (%rsp),%rcx
shl    $0x2,%rcx
sub    %rcx,%rax
add    $0x4,%rax
mov    %rax,(%r15,%r14,8)
mov    0x4(%rsp),%edx
mov    %edx,%edi
sub    %r12d,%edi
jle    129a <dmatrix+0x17a>
movslq %ebp,%rcx
movslq %edx,%rdx
mov    %r14,%r8
not    %r8
add    %rdx,%r8
and    $0x7,%rdi
je     121c <dmatrix+0xfc>
lea    0x0(,%rcx,4),%rbp
xor    %esi,%esi
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
add    %rbp,%rax
mov    %rax,0x10(%r13,%rsi,8)
add    $0x1,%rsi
cmp    %rsi,%rdi
jne    1200 <dmatrix+0xe0>
add    %r14,%rsi
cmp    $0x7,%r8
jae    1225 <dmatrix+0x105>
jmp    129a <dmatrix+0x17a>
mov    %r14,%rsi
cmp    $0x7,%r8
jb     129a <dmatrix+0x17a>
lea    (%rax,%rcx,4),%rax
mov    %rcx,%rdi
shl    $0x5,%rdi
mov    $0x9,%ebp
sub    %r14,%rbp
lea    0x0(,%rbp,8),%rbp
add    %r13,%rbp
shl    $0x2,%rcx
nopw   0x0(%rax,%rax,1)
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    1250 <dmatrix+0x130>
mov    %r15,%rax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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