#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*/ fprintf(int /*<<< orphan*/, char *);
int /*<<< orphan*/ free(char *);
scalar_t__ malloc(int);
int /*<<< orphan*/ mmove(double *, double *, int, int, int, int);
int /*<<< orphan*/ stderr;
void mmul1(double a[], double b[], int la, int lb, int m) {
  int i, j, ka, kc, l;
  double *p, *q, *r, w, *work;
  if (m <= 0 || la < m || lb < m) {
    fprintf(stderr, "Error : Illegal parameter  in mmul1()\n");
    return;
  }
  work = (double *)malloc(m * m * sizeof(double));
  if (work == NULL) {
    fprintf(stderr, "Error : Out of memory  in mmul1()\n");
    return;
  }
  for (i = 0, ka = 0, r = work; i < m; i++, ka += la) {
    for (l = 0; l < m; l++) {
      w = 0.;
      for (j = 0, p = a + ka, q = b + l; j < m; j++) {
        w += *p++ * *q;
        q += lb;
      }
      *r++ = w;
    }
  }
  mmove(work, a, m, la, m, m);
  free((char *)work);
  return;
}


x86 assembly (clang, -O0):
<mmul1>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    %r8d,-0x1c(%rbp)
cmpl   $0x0,-0x1c(%rbp)
jle    117c <mmul1+0x3c>
mov    -0x14(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jl     117c <mmul1+0x3c>
mov    -0x18(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1196 <mmul1+0x56>
mov    0x2e5d(%rip),%rax
mov    (%rax),%edi
lea    0xe74(%rip),%rsi
call   1040 <fprintf@plt>
jmp    12ff <mmul1+0x1bf>
mov    -0x1c(%rbp),%eax
imul   -0x1c(%rbp),%eax
cltq
shl    $0x3,%rax
mov    %eax,%edi
call   1060 <malloc@plt>
mov    %rax,-0x58(%rbp)
cmpq   $0x0,-0x58(%rbp)
jne    11d3 <mmul1+0x93>
mov    0x2e20(%rip),%rax
mov    (%rax),%edi
lea    0xe5e(%rip),%rsi
call   1040 <fprintf@plt>
jmp    12ff <mmul1+0x1bf>
movl   $0x0,-0x20(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x58(%rbp),%rax
mov    %rax,-0x48(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    12db <mmul1+0x19b>
movl   $0x0,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    12bf <mmul1+0x17f>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x50(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x38(%rbp)
mov    -0x10(%rbp),%rax
movslq -0x30(%rbp),%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1299 <mmul1+0x159>
mov    -0x38(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x38(%rbp)
movsd  (%rax),%xmm0
mov    -0x40(%rbp),%rax
movsd  (%rax),%xmm2
movsd  -0x50(%rbp),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x50(%rbp)
mov    -0x18(%rbp),%ecx
mov    -0x40(%rbp),%rax
movslq %ecx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    123d <mmul1+0xfd>
movsd  -0x50(%rbp),%xmm0
mov    -0x48(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x48(%rbp)
movsd  %xmm0,(%rax)
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
jmp    11fc <mmul1+0xbc>
jmp    12c4 <mmul1+0x184>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
mov    -0x14(%rbp),%eax
add    -0x28(%rbp),%eax
mov    %eax,-0x28(%rbp)
jmp    11e9 <mmul1+0xa9>
mov    -0x58(%rbp),%rdi
mov    -0x8(%rbp),%rsi
mov    -0x1c(%rbp),%edx
mov    -0x14(%rbp),%ecx
mov    -0x1c(%rbp),%r8d
mov    -0x1c(%rbp),%r9d
call   1050 <mmove@plt>
mov    -0x58(%rbp),%rdi
call   1030 <free@plt>
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<mmul1>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %rsi,0x18(%rsp)
mov    %rdi,0x10(%rsp)
cmp    %r8d,%ecx
jl     12fe <mmul1+0x1be>
mov    %r8d,%r12d
test   %r8d,%r8d
jle    12fe <mmul1+0x1be>
mov    %edx,%ebx
cmp    %r12d,%edx
jl     12fe <mmul1+0x1be>
mov    %ecx,%r13d
mov    %r12d,%edi
imul   %r12d,%edi
shl    $0x3,%edi
call   1060 <malloc@plt>
test   %rax,%rax
je     1345 <mmul1+0x205>
mov    %rax,%rbp
movslq %r13d,%r13
mov    %ebx,0x4(%rsp)
movslq %ebx,%rax
mov    %rax,0x28(%rsp)
mov    %r12d,%r10d
lea    -0x1(%r12),%esi
mov    %r12d,%eax
and    $0xfffffffc,%eax
mov    %eax,0xc(%rsp)
mov    %r13,%rax
shl    $0x5,%rax
shl    $0x3,%r13
mov    %r12d,%ebx
and    $0x3,%ebx
xor    %edx,%edx
xor    %ecx,%ecx
mov    %rbp,0x20(%rsp)
jmp    11fa <mmul1+0xba>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    0x8(%rsp),%ecx
add    $0x1,%ecx
mov    0x30(%rsp),%rdx
add    0x28(%rsp),%rdx
cmp    %r12d,%ecx
je     1310 <mmul1+0x1d0>
mov    %ecx,0x8(%rsp)
mov    0x10(%rsp),%rcx
mov    %rdx,0x30(%rsp)
lea    (%rcx,%rdx,8),%r9
mov    0x18(%rsp),%rcx
xor    %r15d,%r15d
jmp    1236 <mmul1+0xf6>
cs nopw 0x0(%rax,%rax,1)
movsd  %xmm0,0x0(%rbp)
add    $0x8,%rbp
add    $0x1,%r15
add    $0x8,%rcx
cmp    %r10,%r15
je     11e0 <mmul1+0xa0>
cmp    $0x3,%esi
jae    1260 <mmul1+0x120>
mov    0x18(%rsp),%rdx
lea    (%rdx,%r15,8),%r14
xorpd  %xmm0,%xmm0
mov    %r9,%rdi
test   $0x3,%r12b
jne    12d2 <mmul1+0x192>
jmp    1220 <mmul1+0xe0>
nopw   0x0(%rax,%rax,1)
xorpd  %xmm0,%xmm0
mov    0xc(%rsp),%r11d
mov    %rcx,%r8
mov    %r9,%rdi
nop
mov    %r8,%r14
movsd  (%rdi),%xmm1
movsd  0x8(%rdi),%xmm2
mulsd  (%r8),%xmm1
addsd  %xmm0,%xmm1
add    %r13,%r8
mulsd  (%r14,%r13,1),%xmm2
addsd  %xmm1,%xmm2
movsd  0x10(%rdi),%xmm1
mulsd  0x0(%r13,%r8,1),%xmm1
add    %r13,%r8
addsd  %xmm2,%xmm1
movsd  0x18(%rdi),%xmm0
add    $0x20,%rdi
mulsd  0x0(%r13,%r8,1),%xmm0
add    %r13,%r8
addsd  %xmm1,%xmm0
add    %r13,%r8
add    $0xfffffffc,%r11d
jne    1270 <mmul1+0x130>
add    %rax,%r14
test   $0x3,%r12b
je     1220 <mmul1+0xe0>
xor    %edx,%edx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  (%rdi,%rdx,8),%xmm1
mulsd  (%r14),%xmm1
addsd  %xmm1,%xmm0
add    %r13,%r14
add    $0x1,%rdx
cmp    %edx,%ebx
jne    12e0 <mmul1+0x1a0>
jmp    1220 <mmul1+0xe0>
mov    0x2cdb(%rip),%rax
mov    (%rax),%edi
lea    0xcf2(%rip),%rsi
jmp    1355 <mmul1+0x215>
mov    0x20(%rsp),%rbx
mov    %rbx,%rdi
mov    0x10(%rsp),%rsi
mov    %r12d,%edx
mov    0x4(%rsp),%ecx
mov    %r12d,%r8d
mov    %r12d,%r9d
call   1050 <mmove@plt>
mov    %rbx,%rdi
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <free@plt>
mov    0x2c94(%rip),%rax
mov    (%rax),%edi
lea    0xcd2(%rip),%rsi
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1040 <fprintf@plt>

LLVM IR (-O0):
@stderr = global i32 0
@.str = [39 x i8] c"Error : Illegal parameter in mmul1()\0A\00"
@.str.1 = [35 x i8] c"Error : Out of memory in mmul1()\0A\00"
define void @mmul1(double* %0, double* %1, i32 %2, i32 %3, i32 %4) {
%6 = alloca double*
%7 = alloca double*
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca double*
%17 = alloca double*
%18 = alloca double*
%19 = alloca double
%20 = alloca double*
store double* %0, double** %6
store double* %1, double** %7
store i32 %2, i32* %8
store i32 %3, i32* %9
store i32 %4, i32* %10
%21 = load i32, i32* %10
%22 = icmp sle i32 %21, 0
br i1 %22, label %31, label %23
23: ; preds = %5
%24 = load i32, i32* %8
%25 = load i32, i32* %10
%26 = icmp slt i32 %24, %25
br i1 %26, label %31, label %27
27: ; preds = %23
%28 = load i32, i32* %9
%29 = load i32, i32* %10
%30 = icmp slt i32 %28, %29
br i1 %30, label %31, label %34
31: ; preds = %27, %23, %5
%32 = load i32, i32* @stderr
%33 = call i32 @fprintf(i32 %32, i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0))
br label %112
34: ; preds = %27
%35 = load i32, i32* %10
%36 = load i32, i32* %10
%37 = mul nsw i32 %35, %36
%38 = sext i32 %37 to i64
%39 = mul i64 %38, 8
%40 = trunc i64 %39 to i32
%41 = call i64 @malloc(i32 %40)
%42 = inttoptr i64 %41 to double*
store double* %42, double** %20
%43 = load double*, double** %20
%44 = icmp eq double* %43, null
br i1 %44, label %45, label %48
45: ; preds = %34
%46 = load i32, i32* @stderr
%47 = call i32 @fprintf(i32 %46, i8* getelementptr inbounds ([35 x i8], [35 x i8]* @.str.1, i64 0, i64 0))
br label %112
48: ; preds = %34
store i32 0, i32* %11
store i32 0, i32* %13
%49 = load double*, double** %20
store double* %49, double** %18
br label %50
50: ; preds = %95, %48
%51 = load i32, i32* %11
%52 = load i32, i32* %10
%53 = icmp slt i32 %51, %52
br i1 %53, label %54, label %101
54: ; preds = %50
store i32 0, i32* %15
br label %55
55: ; preds = %91, %54
%56 = load i32, i32* %15
%57 = load i32, i32* %10
%58 = icmp slt i32 %56, %57
br i1 %58, label %59, label %94
59: ; preds = %55
store double 0.000000e+00, double* %19
store i32 0, i32* %12
%60 = load double*, double** %6
%61 = load i32, i32* %13
%62 = sext i32 %61 to i64
%63 = getelementptr inbounds double, double* %60, i64 %62
store double* %63, double** %16
%64 = load double*, double** %7
%65 = load i32, i32* %15
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds double, double* %64, i64 %66
store double* %67, double** %17
br label %68
68: ; preds = %84, %59
%69 = load i32, i32* %12
%70 = load i32, i32* %10
%71 = icmp slt i32 %69, %70
br i1 %71, label %72, label %87
72: ; preds = %68
%73 = load double*, double** %16
%74 = getelementptr inbounds double, double* %73, i32 1
store double* %74, double** %16
%75 = load double, double* %73
%76 = load double*, double** %17
%77 = load double, double* %76
%78 = load double, double* %19
%79 = call double @llvm.fmuladd.f64(double %75, double %77, double %78)
store double %79, double* %19
%80 = load i32, i32* %9
%81 = load double*, double** %17
%82 = sext i32 %80 to i64
%83 = getelementptr inbounds double, double* %81, i64 %82
store double* %83, double** %17
br label %84
84: ; preds = %72
%85 = load i32, i32* %12
%86 = add nsw i32 %85, 1
store i32 %86, i32* %12
br label %68
87: ; preds = %68
%88 = load double, double* %19
%89 = load double*, double** %18
%90 = getelementptr inbounds double, double* %89, i32 1
store double* %90, double** %18
store double %88, double* %89
br label %91
91: ; preds = %87
%92 = load i32, i32* %15
%93 = add nsw i32 %92, 1
store i32 %93, i32* %15
br label %55
94: ; preds = %55
br label %95
95: ; preds = %94
%96 = load i32, i32* %11
%97 = add nsw i32 %96, 1
store i32 %97, i32* %11
%98 = load i32, i32* %8
%99 = load i32, i32* %13
%100 = add nsw i32 %99, %98
store i32 %100, i32* %13
br label %50
101: ; preds = %50
%102 = load double*, double** %20
%103 = load double*, double** %6
%104 = load i32, i32* %10
%105 = load i32, i32* %8
%106 = load i32, i32* %10
%107 = load i32, i32* %10
%108 = call i32 @mmove(double* %102, double* %103, i32 %104, i32 %105, i32 %106, i32 %107)
%109 = load double*, double** %20
%110 = bitcast double* %109 to i8*
%111 = call i32 @free(i8* %110)
br label %112
112: ; preds = %101, %45, %31
ret void
}

LLVM IR (-O2):
@stderr = global i32 0
@.str = [39 x i8] c"Error : Illegal parameter in mmul1()\0A\00"
@.str.1 = [35 x i8] c"Error : Out of memory in mmul1()\0A\00"
define void @mmul1(double* %0, double* nocapture %1, i32 %2, i32 %3, i32 %4) {
%6 = icmp slt i32 %4, 1
%7 = icmp slt i32 %2, %4
%8 = or i1 %6, %7
%9 = icmp slt i32 %3, %4
%10 = or i1 %9, %8
br i1 %10, label %11, label %14
11: ; preds = %5
%12 = load i32, i32* @stderr
%13 = tail call i32 @fprintf(i32 %12, i8* getelementptr inbounds ([39 x i8], [39 x i8]* @.str, i64 0, i64 0))
br label %98
14: ; preds = %5
%15 = shl i32 %4, 3
%16 = mul i32 %15, %4
%17 = tail call i64 @malloc(i32 %16)
%18 = inttoptr i64 %17 to double*
%19 = icmp eq i64 %17, 0
br i1 %19, label %29, label %20
20: ; preds = %14
%21 = sext i32 %3 to i64
%22 = sext i32 %2 to i64
%23 = zext i32 %4 to i64
%24 = add i32 %4, -1
%25 = and i32 %4, 3
%26 = icmp ult i32 %24, 3
%27 = and i32 %4, -4
%28 = icmp eq i32 %25, 0
br label %32
29: ; preds = %14
%30 = load i32, i32* @stderr
%31 = tail call i32 @fprintf(i32 %30, i8* getelementptr inbounds ([35 x i8], [35 x i8]* @.str.1, i64 0, i64 0))
br label %98
32: ; preds = %90, %20
%33 = phi i64 [ 0, %20 ], [ %92, %90 ]
%34 = phi i32 [ 0, %20 ], [ %91, %90 ]
%35 = phi double* [ %18, %20 ], [ %87, %90 ]
%36 = getelementptr inbounds double, double* %0, i64 %33
br label %37
37: ; preds = %85, %32
%38 = phi i64 [ 0, %32 ], [ %88, %85 ]
%39 = phi double* [ %35, %32 ], [ %87, %85 ]
%40 = getelementptr inbounds double, double* %1, i64 %38
br i1 %26, label %68, label %41
41: ; preds = %37, %41
%42 = phi double [ %64, %41 ], [ 0.000000e+00, %37 ]
%43 = phi double* [ %65, %41 ], [ %40, %37 ]
%44 = phi double* [ %61, %41 ], [ %36, %37 ]
%45 = phi i32 [ %66, %41 ], [ 0, %37 ]
%46 = getelementptr inbounds double, double* %44, i64 1
%47 = load double, double* %44
%48 = load double, double* %43
%49 = tail call double @llvm.fmuladd.f64(double %47, double %48, double %42)
%50 = getelementptr inbounds double, double* %43, i64 %21
%51 = getelementptr inbounds double, double* %44, i64 2
%52 = load double, double* %46
%53 = load double, double* %50
%54 = tail call double @llvm.fmuladd.f64(double %52, double %53, double %49)
%55 = getelementptr inbounds double, double* %50, i64 %21
%56 = getelementptr inbounds double, double* %44, i64 3
%57 = load double, double* %51
%58 = load double, double* %55
%59 = tail call double @llvm.fmuladd.f64(double %57, double %58, double %54)
%60 = getelementptr inbounds double, double* %55, i64 %21
%61 = getelementptr inbounds double, double* %44, i64 4
%62 = load double, double* %56
%63 = load double, double* %60
%64 = tail call double @llvm.fmuladd.f64(double %62, double %63, double %59)
%65 = getelementptr inbounds double, double* %60, i64 %21
%66 = add i32 %45, 4
%67 = icmp eq i32 %66, %27
br i1 %67, label %68, label %41
68: ; preds = %41, %37
%69 = phi double [ undef, %37 ], [ %64, %41 ]
%70 = phi double [ 0.000000e+00, %37 ], [ %64, %41 ]
%71 = phi double* [ %40, %37 ], [ %65, %41 ]
%72 = phi double* [ %36, %37 ], [ %61, %41 ]
br i1 %28, label %85, label %73
73: ; preds = %68, %73
%74 = phi double [ %81, %73 ], [ %70, %68 ]
%75 = phi double* [ %82, %73 ], [ %71, %68 ]
%76 = phi double* [ %78, %73 ], [ %72, %68 ]
%77 = phi i32 [ %83, %73 ], [ 0, %68 ]
%78 = getelementptr inbounds double, double* %76, i64 1
%79 = load double, double* %76
%80 = load double, double* %75
%81 = tail call double @llvm.fmuladd.f64(double %79, double %80, double %74)
%82 = getelementptr inbounds double, double* %75, i64 %21
%83 = add i32 %77, 1
%84 = icmp eq i32 %83, %25
br i1 %84, label %85, label %73
85: ; preds = %73, %68
%86 = phi double [ %69, %68 ], [ %81, %73 ]
%87 = getelementptr inbounds double, double* %39, i64 1
store double %86, double* %39
%88 = add nuw nsw i64 %38, 1
%89 = icmp eq i64 %88, %23
br i1 %89, label %90, label %37
90: ; preds = %85
%91 = add nuw nsw i32 %34, 1
%92 = add nsw i64 %33, %22
%93 = icmp eq i32 %91, %4
br i1 %93, label %94, label %32
94: ; preds = %90
%95 = tail call i32 @mmove(double* %18, double* %0, i32 %4, i32 %2, i32 %4, i32 %4)
%96 = inttoptr i64 %17 to i8*
%97 = tail call i32 @free(i8* %96)
br label %98
98: ; preds = %94, %29, %11
ret void
}