#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__ ckalloc(int);
float ****Float4Dim(int M, int N, int K, int L) {
  int m, n, k, l;
  float ****FourDim;
  FourDim = (float ****)ckalloc(M * sizeof(float ***));
  for (m = 0; m < M; m++) {
    FourDim[m] = (float ***)ckalloc(N * sizeof(float **));
    for (n = 0; n < N; n++) {
      FourDim[m][n] = (float **)ckalloc(K * sizeof(float *));
      for (k = 0; k < K; k++)
        FourDim[m][n][k] = (float *)ckalloc(L * sizeof(float));
    }
  }
  for (m = 0; m < M; m++)
    for (n = 0; n < N; n++)
      for (k = 0; k < K; k++)
        for (l = 0; l < L; l++)
          FourDim[m][n][k][l] = 0.0;
  return (FourDim);
}


x86 assembly (clang, -O0):
<Float4Dim>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
movslq -0x4(%rbp),%rax
shl    $0x3,%rax
mov    %eax,%edi
call   1030 <ckalloc@plt>
mov    %rax,-0x28(%rbp)
movl   $0x0,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    1216 <Float4Dim+0x106>
movslq -0x8(%rbp),%rax
shl    $0x3,%rax
mov    %eax,%edi
call   1030 <ckalloc@plt>
mov    %rax,%rdx
mov    -0x28(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    1203 <Float4Dim+0xf3>
movslq -0xc(%rbp),%rax
shl    $0x3,%rax
mov    %eax,%edi
call   1030 <ckalloc@plt>
mov    %rax,%rdx
mov    -0x28(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    11f0 <Float4Dim+0xe0>
movslq -0x10(%rbp),%rax
shl    $0x2,%rax
mov    %eax,%edi
call   1030 <ckalloc@plt>
mov    %rax,%rdx
mov    -0x28(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    11a8 <Float4Dim+0x98>
jmp    11f5 <Float4Dim+0xe5>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    116f <Float4Dim+0x5f>
jmp    1208 <Float4Dim+0xf8>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    113e <Float4Dim+0x2e>
movl   $0x0,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    12d1 <Float4Dim+0x1c1>
movl   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%eax
cmp    -0x8(%rbp),%eax
jge    12be <Float4Dim+0x1ae>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    12ab <Float4Dim+0x19b>
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x10(%rbp),%eax
jge    1298 <Float4Dim+0x188>
mov    -0x28(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x20(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1256 <Float4Dim+0x146>
jmp    129d <Float4Dim+0x18d>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1243 <Float4Dim+0x133>
jmp    12b0 <Float4Dim+0x1a0>
mov    -0x18(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x18(%rbp)
jmp    1230 <Float4Dim+0x120>
jmp    12c3 <Float4Dim+0x1b3>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    121d <Float4Dim+0x10d>
mov    -0x28(%rbp),%rax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<Float4Dim>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x48,%rsp
mov    %rcx,0x10(%rsp)
mov    %rdx,0x8(%rsp)
mov    %rsi,0x18(%rsp)
mov    %edi,%ebx
lea    0x0(,%rbx,8),%edi
call   1030 <ckalloc@plt>
mov    %rax,%r14
test   %ebx,%ebx
jle    1311 <Float4Dim+0x1f1>
mov    0x18(%rsp),%rdx
lea    0x0(,%rdx,8),%eax
mov    %eax,0x2c(%rsp)
mov    0x8(%rsp),%rcx
lea    0x0(,%rcx,8),%eax
mov    %eax,0x20(%rsp)
mov    0x10(%rsp),%rax
lea    0x0(,%rax,4),%r15d
mov    %rbx,0x40(%rsp)
mov    %ebx,%eax
mov    %rax,0x30(%rsp)
mov    %edx,%eax
mov    %rax,0x38(%rsp)
mov    %ecx,%r13d
xor    %ebp,%ebp
jmp    11ab <Float4Dim+0x8b>
nopl   (%rax)
add    $0x1,%rbp
cmp    0x30(%rsp),%rbp
je     121f <Float4Dim+0xff>
mov    0x2c(%rsp),%edi
call   1030 <ckalloc@plt>
mov    %rax,(%r14,%rbp,8)
cmpl   $0x0,0x18(%rsp)
jle    11a0 <Float4Dim+0x80>
xor    %ebx,%ebx
jmp    11db <Float4Dim+0xbb>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
add    $0x1,%rbx
cmp    0x38(%rsp),%rbx
je     11a0 <Float4Dim+0x80>
mov    0x20(%rsp),%edi
call   1030 <ckalloc@plt>
mov    (%r14,%rbp,8),%rcx
mov    %rax,(%rcx,%rbx,8)
cmpl   $0x0,0x8(%rsp)
jle    11d0 <Float4Dim+0xb0>
xor    %r12d,%r12d
cs nopw 0x0(%rax,%rax,1)
mov    %r15d,%edi
call   1030 <ckalloc@plt>
mov    (%r14,%rbp,8),%rcx
mov    (%rcx,%rbx,8),%rcx
mov    %rax,(%rcx,%r12,8)
add    $0x1,%r12
cmp    %r12,%r13
jne    1200 <Float4Dim+0xe0>
jmp    11d0 <Float4Dim+0xb0>
cmpl   $0x0,0x40(%rsp)
jle    1311 <Float4Dim+0x1f1>
mov    0x10(%rsp),%ebp
shl    $0x2,%rbp
mov    %r13d,%eax
and    $0xfffffffe,%eax
mov    %rax,0x20(%rsp)
xor    %ebx,%ebx
jmp    125f <Float4Dim+0x13f>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
add    $0x1,%rbx
cmp    0x30(%rsp),%rbx
je     1311 <Float4Dim+0x1f1>
cmpl   $0x0,0x18(%rsp)
jle    1250 <Float4Dim+0x130>
xor    %r12d,%r12d
jmp    127b <Float4Dim+0x15b>
nopl   0x0(%rax,%rax,1)
add    $0x1,%r12
cmp    0x38(%rsp),%r12
je     1250 <Float4Dim+0x130>
cmpl   $0x0,0x8(%rsp)
jle    1270 <Float4Dim+0x150>
cmpl   $0x1,0x8(%rsp)
jne    12c0 <Float4Dim+0x1a0>
xor    %r15d,%r15d
test   $0x1,%r13b
je     1270 <Float4Dim+0x150>
cmpl   $0x0,0x10(%rsp)
jle    1270 <Float4Dim+0x150>
mov    (%r14,%rbx,8),%rax
mov    (%rax,%r12,8),%rax
mov    (%rax,%r15,8),%rdi
xor    %esi,%esi
mov    %rbp,%rdx
call   1040 <memset@plt>
jmp    1270 <Float4Dim+0x150>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
xor    %r15d,%r15d
jmp    12db <Float4Dim+0x1bb>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x2,%r15
cmp    %r15,0x20(%rsp)
je     128c <Float4Dim+0x16c>
cmpl   $0x0,0x10(%rsp)
jle    12d0 <Float4Dim+0x1b0>
mov    (%r14,%rbx,8),%rax
mov    (%rax,%r12,8),%rax
mov    (%rax,%r15,8),%rdi
xor    %esi,%esi
mov    %rbp,%rdx
call   1040 <memset@plt>
mov    (%r14,%rbx,8),%rax
mov    (%rax,%r12,8),%rax
mov    0x8(%rax,%r15,8),%rdi
xor    %esi,%esi
mov    %rbp,%rdx
call   1040 <memset@plt>
jmp    12d0 <Float4Dim+0x1b0>
mov    %r14,%rax
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define float**** @Float4Dim(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 i32
%13 = alloca float****
store i32 %0, i32* %5
store i32 %1, i32* %6
store i32 %2, i32* %7
store i32 %3, i32* %8
%14 = load i32, i32* %5
%15 = sext i32 %14 to i64
%16 = mul i64 %15, 8
%17 = trunc i64 %16 to i32
%18 = call i64 @ckalloc(i32 %17)
%19 = inttoptr i64 %18 to float****
store float**** %19, float***** %13
store i32 0, i32* %9
br label %20
20: ; preds = %85, %4
%21 = load i32, i32* %9
%22 = load i32, i32* %5
%23 = icmp slt i32 %21, %22
br i1 %23, label %24, label %88
24: ; preds = %20
%25 = load i32, i32* %6
%26 = sext i32 %25 to i64
%27 = mul i64 %26, 8
%28 = trunc i64 %27 to i32
%29 = call i64 @ckalloc(i32 %28)
%30 = inttoptr i64 %29 to float***
%31 = load float****, float***** %13
%32 = load i32, i32* %9
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds float***, float**** %31, i64 %33
store float*** %30, float**** %34
store i32 0, i32* %10
br label %35
35: ; preds = %81, %24
%36 = load i32, i32* %10
%37 = load i32, i32* %6
%38 = icmp slt i32 %36, %37
br i1 %38, label %39, label %84
39: ; preds = %35
%40 = load i32, i32* %7
%41 = sext i32 %40 to i64
%42 = mul i64 %41, 8
%43 = trunc i64 %42 to i32
%44 = call i64 @ckalloc(i32 %43)
%45 = inttoptr i64 %44 to float**
%46 = load float****, float***** %13
%47 = load i32, i32* %9
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds float***, float**** %46, i64 %48
%50 = load float***, float**** %49
%51 = load i32, i32* %10
%52 = sext i32 %51 to i64
%53 = getelementptr inbounds float**, float*** %50, i64 %52
store float** %45, float*** %53
store i32 0, i32* %11
br label %54
54: ; preds = %77, %39
%55 = load i32, i32* %11
%56 = load i32, i32* %7
%57 = icmp slt i32 %55, %56
br i1 %57, label %58, label %80
58: ; preds = %54
%59 = load i32, i32* %8
%60 = sext i32 %59 to i64
%61 = mul i64 %60, 4
%62 = trunc i64 %61 to i32
%63 = call i64 @ckalloc(i32 %62)
%64 = inttoptr i64 %63 to float*
%65 = load float****, float***** %13
%66 = load i32, i32* %9
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds float***, float**** %65, i64 %67
%69 = load float***, float**** %68
%70 = load i32, i32* %10
%71 = sext i32 %70 to i64
%72 = getelementptr inbounds float**, float*** %69, i64 %71
%73 = load float**, float*** %72
%74 = load i32, i32* %11
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds float*, float** %73, i64 %75
store float* %64, float** %76
br label %77
77: ; preds = %58
%78 = load i32, i32* %11
%79 = add nsw i32 %78, 1
store i32 %79, i32* %11
br label %54
80: ; preds = %54
br label %81
81: ; preds = %80
%82 = load i32, i32* %10
%83 = add nsw i32 %82, 1
store i32 %83, i32* %10
br label %35
84: ; preds = %35
br label %85
85: ; preds = %84
%86 = load i32, i32* %9
%87 = add nsw i32 %86, 1
store i32 %87, i32* %9
br label %20
88: ; preds = %20
store i32 0, i32* %9
br label %89
89: ; preds = %137, %88
%90 = load i32, i32* %9
%91 = load i32, i32* %5
%92 = icmp slt i32 %90, %91
br i1 %92, label %93, label %140
93: ; preds = %89
store i32 0, i32* %10
br label %94
94: ; preds = %133, %93
%95 = load i32, i32* %10
%96 = load i32, i32* %6
%97 = icmp slt i32 %95, %96
br i1 %97, label %98, label %136
98: ; preds = %94
store i32 0, i32* %11
br label %99
99: ; preds = %129, %98
%100 = load i32, i32* %11
%101 = load i32, i32* %7
%102 = icmp slt i32 %100, %101
br i1 %102, label %103, label %132
103: ; preds = %99
store i32 0, i32* %12
br label %104
104: ; preds = %125, %103
%105 = load i32, i32* %12
%106 = load i32, i32* %8
%107 = icmp slt i32 %105, %106
br i1 %107, label %108, label %128
108: ; preds = %104
%109 = load float****, float***** %13
%110 = load i32, i32* %9
%111 = sext i32 %110 to i64
%112 = getelementptr inbounds float***, float**** %109, i64 %111
%113 = load float***, float**** %112
%114 = load i32, i32* %10
%115 = sext i32 %114 to i64
%116 = getelementptr inbounds float**, float*** %113, i64 %115
%117 = load float**, float*** %116
%118 = load i32, i32* %11
%119 = sext i32 %118 to i64
%120 = getelementptr inbounds float*, float** %117, i64 %119
%121 = load float*, float** %120
%122 = load i32, i32* %12
%123 = sext i32 %122 to i64
%124 = getelementptr inbounds float, float* %121, i64 %123
store float 0.000000e+00, float* %124
br label %125
125: ; preds = %108
%126 = load i32, i32* %12
%127 = add nsw i32 %126, 1
store i32 %127, i32* %12
br label %104
128: ; preds = %104
br label %129
129: ; preds = %128
%130 = load i32, i32* %11
%131 = add nsw i32 %130, 1
store i32 %131, i32* %11
br label %99
132: ; preds = %99
br label %133
133: ; preds = %132
%134 = load i32, i32* %10
%135 = add nsw i32 %134, 1
store i32 %135, i32* %10
br label %94
136: ; preds = %94
br label %137
137: ; preds = %136
%138 = load i32, i32* %9
%139 = add nsw i32 %138, 1
store i32 %139, i32* %9
br label %89
140: ; preds = %89
%141 = load float****, float***** %13
ret float**** %141
}

LLVM IR (-O2):
define float**** @Float4Dim(i32 %0, i32 %1, i32 %2, i32 %3) {
%5 = shl i32 %0, 3
%6 = tail call i64 @ckalloc(i32 %5)
%7 = inttoptr i64 %6 to float****
%8 = icmp sgt i32 %0, 0
br i1 %8, label %9, label %103
9: ; preds = %4
%10 = shl i32 %1, 3
%11 = icmp sgt i32 %1, 0
%12 = shl i32 %2, 3
%13 = icmp sgt i32 %2, 0
%14 = shl i32 %3, 2
%15 = zext i32 %0 to i64
%16 = zext i32 %1 to i64
%17 = zext i32 %2 to i64
br label %31
18: ; preds = %55
br i1 %8, label %19, label %103
19: ; preds = %18
%20 = icmp sgt i32 %1, 0
%21 = icmp sgt i32 %2, 0
%22 = icmp sgt i32 %3, 0
%23 = zext i32 %3 to i64
%24 = shl nuw nsw i64 %23, 2
%25 = zext i32 %0 to i64
%26 = zext i32 %1 to i64
%27 = and i64 %17, 1
%28 = icmp eq i32 %2, 1
%29 = and i64 %17, 4294967294
%30 = icmp eq i64 %27, 0
br label %58
31: ; preds = %9, %55
%32 = phi i64 [ 0, %9 ], [ %56, %55 ]
%33 = tail call i64 @ckalloc(i32 %10)
%34 = inttoptr i64 %33 to float***
%35 = getelementptr inbounds float***, float**** %7, i64 %32
store float*** %34, float**** %35
br i1 %11, label %36, label %55
36: ; preds = %31, %52
%37 = phi i64 [ %53, %52 ], [ 0, %31 ]
%38 = tail call i64 @ckalloc(i32 %12)
%39 = inttoptr i64 %38 to float**
%40 = load float***, float**** %35
%41 = getelementptr inbounds float**, float*** %40, i64 %37
store float** %39, float*** %41
br i1 %13, label %42, label %52
42: ; preds = %36, %42
%43 = phi i64 [ %50, %42 ], [ 0, %36 ]
%44 = tail call i64 @ckalloc(i32 %14)
%45 = inttoptr i64 %44 to float*
%46 = load float***, float**** %35
%47 = getelementptr inbounds float**, float*** %46, i64 %37
%48 = load float**, float*** %47
%49 = getelementptr inbounds float*, float** %48, i64 %43
store float* %45, float** %49
%50 = add nuw nsw i64 %43, 1
%51 = icmp eq i64 %50, %17
br i1 %51, label %52, label %42
52: ; preds = %42, %36
%53 = add nuw nsw i64 %37, 1
%54 = icmp eq i64 %53, %16
br i1 %54, label %55, label %36
55: ; preds = %52, %31
%56 = add nuw nsw i64 %32, 1
%57 = icmp eq i64 %56, %15
br i1 %57, label %18, label %31
58: ; preds = %19, %100
%59 = phi i64 [ 0, %19 ], [ %101, %100 ]
br i1 %20, label %60, label %100
60: ; preds = %58
%61 = getelementptr inbounds float***, float**** %7, i64 %59
br label %62
62: ; preds = %60, %97
%63 = phi i64 [ 0, %60 ], [ %98, %97 ]
br i1 %21, label %64, label %97
64: ; preds = %62
br i1 %28, label %86, label %65
65: ; preds = %64, %82
%66 = phi i64 [ %83, %82 ], [ 0, %64 ]
%67 = phi i64 [ %84, %82 ], [ 0, %64 ]
br i1 %22, label %68, label %82
68: ; preds = %65
%69 = load float***, float**** %61
%70 = getelementptr inbounds float**, float*** %69, i64 %63
%71 = load float**, float*** %70
%72 = getelementptr inbounds float*, float** %71, i64 %66
%73 = bitcast float** %72 to i8**
%74 = load i8*, i8** %73
%75 = or i64 %66, 1
%76 = load float***, float**** %61
%77 = getelementptr inbounds float**, float*** %76, i64 %63
%78 = load float**, float*** %77
%79 = getelementptr inbounds float*, float** %78, i64 %75
%80 = bitcast float** %79 to i8**
%81 = load i8*, i8** %80
br label %82
82: ; preds = %65, %68
%83 = add nuw nsw i64 %66, 2
%84 = add i64 %67, 2
%85 = icmp eq i64 %84, %29
br i1 %85, label %86, label %65
86: ; preds = %82, %64
%87 = phi i64 [ 0, %64 ], [ %83, %82 ]
%88 = xor i1 %22, true
%89 = or i1 %30, %88
br i1 %89, label %97, label %90
90: ; preds = %86
%91 = load float***, float**** %61
%92 = getelementptr inbounds float**, float*** %91, i64 %63
%93 = load float**, float*** %92
%94 = getelementptr inbounds float*, float** %93, i64 %87
%95 = bitcast float** %94 to i8**
%96 = load i8*, i8** %95
br label %97
97: ; preds = %86, %90, %62
%98 = add nuw nsw i64 %63, 1
%99 = icmp eq i64 %98, %26
br i1 %99, label %100, label %62
100: ; preds = %97, %58
%101 = add nuw nsw i64 %59, 1
%102 = icmp eq i64 %101, %25
br i1 %102, label %103, label %58
103: ; preds = %100, %4, %18
ret float**** %7
}