#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 */
typedef int /*<<< orphan*/ vec2;

/* Variables and functions */
int /*<<< orphan*/ bzero(double **, int);
int /*<<< orphan*/ memcpy(double *, double *, int);
void migstep(double *vec, const double *mig, const int nislands,
             const int nhap) {
  int i, j, k;
  double vec2[nislands][nhap];
  bzero(vec2, sizeof(vec2));
  for (i = 0; i < nislands; ++i)
    for (j = 0; j < nhap; ++j) {
      for (k = 0; k < nislands; ++k)
        vec2[i][j] +=
            ((double(*)[nislands])mig)[i][k] * ((double(*)[nhap])vec)[k][j];
    }
  memcpy(vec, (double *)vec2, sizeof(double) * nislands * nhap);
  return;
}


x86 assembly (clang, -O0):
<migstep>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    -0x14(%rbp),%eax
mov    -0x18(%rbp),%ecx
mov    %rcx,-0x50(%rbp)
mov    %rsp,%rdx
mov    %rdx,-0x30(%rbp)
mov    %rax,%rdx
imul   %rcx,%rdx
lea    0xf(,%rdx,8),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rdi
sub    %rdx,%rdi
mov    %rdi,-0x48(%rbp)
mov    %rdi,%rsp
mov    %rax,-0x38(%rbp)
mov    %rcx,-0x40(%rbp)
imul   %rcx,%rax
shl    $0x3,%rax
mov    %eax,%esi
call   1040 <bzero@plt>
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    125a <migstep+0x13a>
movl   $0x0,-0x20(%rbp)
mov    -0x20(%rbp),%eax
cmp    -0x18(%rbp),%eax
jge    1247 <migstep+0x127>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    1234 <migstep+0x114>
mov    -0x48(%rbp),%rax
mov    -0x50(%rbp),%rdx
mov    -0x14(%rbp),%ecx
mov    %ecx,%edi
mov    -0x10(%rbp),%rcx
movslq -0x1c(%rbp),%rsi
imul   %rdi,%rsi
shl    $0x3,%rsi
add    %rsi,%rcx
movslq -0x24(%rbp),%rsi
movsd  (%rcx,%rsi,8),%xmm0
mov    -0x18(%rbp),%ecx
mov    %ecx,%edi
mov    -0x8(%rbp),%rcx
movslq -0x24(%rbp),%rsi
imul   %rdi,%rsi
shl    $0x3,%rsi
add    %rsi,%rcx
movslq -0x20(%rbp),%rsi
movsd  (%rcx,%rsi,8),%xmm2
movslq -0x1c(%rbp),%rcx
imul   %rdx,%rcx
shl    $0x3,%rcx
add    %rcx,%rax
movslq -0x20(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    11ab <migstep+0x8b>
jmp    1239 <migstep+0x119>
mov    -0x20(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x20(%rbp)
jmp    1198 <migstep+0x78>
jmp    124c <migstep+0x12c>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1185 <migstep+0x65>
mov    -0x48(%rbp),%rsi
mov    -0x8(%rbp),%rdi
movslq -0x14(%rbp),%rax
shl    $0x3,%rax
movslq -0x18(%rbp),%rcx
imul   %rcx,%rax
mov    %eax,%edx
call   1030 <memcpy@plt>
mov    -0x30(%rbp),%rax
mov    %rax,%rsp
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<migstep>:
push   %rbp
mov    %rsp,%rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %edx,%ebx
mov    %rsi,-0x40(%rbp)
mov    %rdi,-0x58(%rbp)
mov    %edx,%eax
mov    %ecx,-0x2c(%rbp)
mov    %ecx,%r13d
mov    %r13,%rsi
mov    %rax,-0x60(%rbp)
imul   %rax,%rsi
lea    0xf(,%rsi,8),%rax
and    $0xfffffffffffffff0,%rax
mov    %rsp,%rdi
sub    %rax,%rdi
mov    %rdi,%rsp
shl    $0x3,%esi
mov    %rdi,-0x50(%rbp)
call   1040 <bzero@plt>
mov    %ebx,-0x44(%rbp)
test   %ebx,%ebx
jle    12ee <migstep+0x1ce>
mov    -0x60(%rbp),%rdx
lea    -0x1(%rdx),%rax
mov    %rax,-0x70(%rbp)
mov    %edx,%ecx
and    $0x3,%ecx
mov    %edx,%r10d
and    $0xfffffffc,%r10d
mov    -0x40(%rbp),%rax
lea    0x18(%rax),%rsi
lea    0x0(,%rdx,8),%rax
mov    %rax,-0x68(%rbp)
mov    %r13,%r15
shl    $0x4,%r15
mov    %r13,%r12
shl    $0x5,%r12
lea    0x0(,%r13,8),%rax
lea    (%rax,%rax,2),%r9
xor    %edx,%edx
mov    %rdx,-0x38(%rbp)
jmp    11f4 <migstep+0xd4>
nopl   0x0(%rax,%rax,1)
mov    -0x38(%rbp),%rdi
add    $0x1,%rdi
mov    -0x68(%rbp),%rdx
add    %rdx,%rsi
add    %rdx,-0x40(%rbp)
mov    %rdi,%rdx
mov    %rdi,-0x38(%rbp)
cmp    -0x60(%rbp),%rdi
je     12ee <migstep+0x1ce>
cmpl   $0x0,-0x2c(%rbp)
jle    11d0 <migstep+0xb0>
mov    -0x38(%rbp),%rdx
imul   %r13,%rdx
mov    -0x50(%rbp),%rdi
lea    (%rdi,%rdx,8),%rdx
mov    -0x58(%rbp),%r14
xor    %r8d,%r8d
mov    %rdx,-0x78(%rbp)
jmp    1237 <migstep+0x117>
nopw   0x0(%rax,%rax,1)
mov    -0x78(%rbp),%rdx
movsd  %xmm0,(%rdx,%r8,8)
add    $0x1,%r8
add    $0x8,%r14
cmp    %r13,%r8
je     11d0 <migstep+0xb0>
movsd  (%rdx,%r8,8),%xmm0
cmpq   $0x3,-0x70(%rbp)
jae    1250 <migstep+0x130>
mov    %r14,%rdx
xor    %r11d,%r11d
jmp    12ae <migstep+0x18e>
nopl   0x0(%rax)
mov    %r14,%rdx
xor    %r11d,%r11d
cs nopw 0x0(%rax,%rax,1)
movsd  -0x18(%rsi,%r11,8),%xmm1
mulsd  (%r14),%xmm1
movsd  -0x10(%rsi,%r11,8),%xmm2
addsd  %xmm0,%xmm1
mulsd  (%r14,%r13,8),%xmm2
addsd  %xmm1,%xmm2
movsd  -0x8(%rsi,%r11,8),%xmm1
mulsd  (%r14,%r15,1),%xmm1
addsd  %xmm2,%xmm1
movsd  (%rsi,%r11,8),%xmm0
mulsd  (%r14,%r9,1),%xmm0
addsd  %xmm1,%xmm0
add    $0x4,%r11
add    %r12,%r14
cmp    %r11,%r10
jne    1260 <migstep+0x140>
test   %rcx,%rcx
mov    %rdx,%r14
je     1220 <migstep+0x100>
mov    %r13,%rdx
imul   %r11,%rdx
lea    (%r14,%rdx,8),%rdi
mov    -0x40(%rbp),%rdx
lea    (%rdx,%r11,8),%rbx
xor    %edx,%edx
nop
movsd  (%rbx,%rdx,8),%xmm1
mulsd  (%rdi),%xmm1
addsd  %xmm1,%xmm0
add    $0x1,%rdx
add    %rax,%rdi
cmp    %rdx,%rcx
jne    12d0 <migstep+0x1b0>
jmp    1220 <migstep+0x100>
mov    -0x44(%rbp),%edx
imul   -0x2c(%rbp),%edx
shl    $0x3,%edx
mov    -0x58(%rbp),%rdi
mov    -0x50(%rbp),%rsi
call   1030 <memcpy@plt>
lea    -0x28(%rbp),%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

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