#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 */
double *dvector(int);
int /*<<< orphan*/ error(char *);
int /*<<< orphan*/ free(double *);
double ldexp(double, int);
int /*<<< orphan*/ matby(double *, double *, double *, int, int, int);
int /*<<< orphan*/ memcpy(double *, double *, int);
int matexp(double **Q, double *P, double t, int n, int TimeSquare) {
  int it, i, j;
  double *T[2];
  if (TimeSquare < 2 || TimeSquare > 31)
    error("TimeSquare not good");
  T[0] = dvector(n * n);
  T[1] = P;
  for (i = 0; i < n; i++) {
    for (j = 0; j < n; j++) {
      T[0][i * n + j] = ldexp(Q[i][j] * t, -TimeSquare);
    }
  }
  matby(T[0], T[0], T[1], n, n, n);
  for (i = 0; i < n * n; i++) {
    T[0][i] += T[1][i] / 2;
  }
  for (i = 0; i < n; i++) {
    T[0][i * n + i]++;
  }
  for (i = 0, it = 0; i < TimeSquare; i++) {
    it = !it;
    matby(T[1 - it], T[1 - it], T[it], n, n, n);
  }
  if (it == 0) {
    memcpy(P, T[0], n * n * sizeof(double));
  }
  free(T[0]);
  return (0);
}


x86 assembly (clang, -O0):
<matexp>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movsd  %xmm0,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %ecx,-0x20(%rbp)
cmpl   $0x2,-0x20(%rbp)
jl     118f <matexp+0x2f>
cmpl   $0x1f,-0x20(%rbp)
jle    119b <matexp+0x3b>
lea    0xe7a(%rip),%rdi
call   1080 <error@plt>
mov    -0x1c(%rbp),%edi
imul   -0x1c(%rbp),%edi
call   1070 <dvector@plt>
mov    %rax,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,-0x38(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1234 <matexp+0xd4>
movl   $0x0,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1221 <matexp+0xc1>
mov    -0x8(%rbp),%rax
movslq -0x28(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x2c(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
mulsd  -0x18(%rbp),%xmm0
xor    %edi,%edi
sub    -0x20(%rbp),%edi
call   1040 <ldexp@plt>
mov    -0x40(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
add    -0x2c(%rbp),%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    11cd <matexp+0x6d>
jmp    1226 <matexp+0xc6>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    11ba <matexp+0x5a>
mov    -0x40(%rbp),%rdi
mov    -0x40(%rbp),%rsi
mov    -0x38(%rbp),%rdx
mov    -0x1c(%rbp),%ecx
mov    -0x1c(%rbp),%r8d
mov    -0x1c(%rbp),%r9d
call   1050 <matby@plt>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x1c(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
cmp    %ecx,%eax
jge    12a2 <matexp+0x142>
mov    -0x38(%rbp),%rax
movslq -0x28(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  0xd8a(%rip),%xmm1
divsd  %xmm1,%xmm0
mov    -0x40(%rbp),%rax
movslq -0x28(%rbp),%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1257 <matexp+0xf7>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    12e6 <matexp+0x186>
mov    -0x40(%rbp),%rax
mov    -0x28(%rbp),%ecx
imul   -0x1c(%rbp),%ecx
add    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movsd  0xd32(%rip),%xmm0
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12a9 <matexp+0x149>
movl   $0x0,-0x28(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    1356 <matexp+0x1f6>
cmpl   $0x0,-0x24(%rbp)
setne  %al
xor    $0xff,%al
and    $0x1,%al
movzbl %al,%eax
mov    %eax,-0x24(%rbp)
mov    $0x1,%eax
sub    -0x24(%rbp),%eax
cltq
mov    -0x40(%rbp,%rax,8),%rdi
mov    $0x1,%eax
sub    -0x24(%rbp),%eax
cltq
mov    -0x40(%rbp,%rax,8),%rsi
movslq -0x24(%rbp),%rax
mov    -0x40(%rbp,%rax,8),%rdx
mov    -0x1c(%rbp),%ecx
mov    -0x1c(%rbp),%r8d
mov    -0x1c(%rbp),%r9d
call   1050 <matby@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12f4 <matexp+0x194>
cmpl   $0x0,-0x24(%rbp)
jne    137c <matexp+0x21c>
mov    -0x10(%rbp),%rdi
mov    -0x40(%rbp),%rsi
mov    -0x1c(%rbp),%eax
imul   -0x1c(%rbp),%eax
cltq
shl    $0x3,%rax
mov    %eax,%edx
call   1060 <memcpy@plt>
mov    -0x40(%rbp),%rdi
call   1030 <free@plt>
xor    %eax,%eax
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<matexp>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %edx,%ebx
movsd  %xmm0,0x50(%rsp)
mov    %rsi,%r14
mov    %rdi,%rbp
mov    %rcx,0x18(%rsp)
lea    -0x20(%rcx),%eax
cmp    $0xffffffe1,%eax
ja     1195 <matexp+0x35>
lea    0xe90(%rip),%rdi
call   1080 <error@plt>
mov    %ebx,%edi
imul   %ebx,%edi
mov    %edi,0x14(%rsp)
call   1070 <dvector@plt>
mov    %rax,0x8(%rsp)
mov    %rax,0x20(%rsp)
mov    %r14,0x40(%rsp)
mov    %r14,0x28(%rsp)
mov    %ebx,%r14d
mov    %rbx,0x38(%rsp)
test   %ebx,%ebx
jle    1236 <matexp+0xd6>
mov    0x18(%rsp),%rax
mov    %eax,%r12d
neg    %r12d
lea    0x0(,%r14,8),%rax
mov    %rax,0x48(%rsp)
xor    %r13d,%r13d
mov    0x8(%rsp),%rbx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
xor    %r15d,%r15d
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    0x0(%rbp,%r13,8),%rax
movsd  (%rax,%r15,8),%xmm0
mulsd  0x50(%rsp),%xmm0
mov    %r12d,%edi
call   1040 <ldexp@plt>
movsd  %xmm0,(%rbx,%r15,8)
add    $0x1,%r15
cmp    %r15,%r14
jne    1200 <matexp+0xa0>
add    $0x1,%r13
add    0x48(%rsp),%rbx
cmp    %r14,%r13
jne    11f0 <matexp+0x90>
mov    0x8(%rsp),%rbx
mov    %rbx,%rdi
mov    %rbx,%rsi
mov    0x40(%rsp),%r15
mov    %r15,%rdx
mov    0x38(%rsp),%r12
mov    %r12d,%ecx
mov    %r12d,%r8d
mov    %r12d,%r9d
call   1050 <matby@plt>
mov    %rbx,%r10
mov    0x14(%rsp),%r13d
test   %r13d,%r13d
je     1409 <matexp+0x2a9>
mov    %r13d,%eax
cmp    $0x4,%r13d
jb     1290 <matexp+0x130>
lea    (%r15,%rax,8),%rcx
cmp    %rcx,%r10
jae    130d <matexp+0x1ad>
lea    (%r10,%rax,8),%rcx
cmp    %r15,%rcx
jbe    130d <matexp+0x1ad>
xor    %ecx,%ecx
mov    %rcx,%rdx
not    %rdx
test   $0x1,%al
je     12ba <matexp+0x15a>
movsd  (%r15,%rcx,8),%xmm0
mulsd  0xd66(%rip),%xmm0
addsd  (%r10,%rcx,8),%xmm0
movsd  %xmm0,(%r10,%rcx,8)
or     $0x1,%rcx
add    %rax,%rdx
je     1409 <matexp+0x2a9>
movsd  0xd45(%rip),%xmm0
nopl   0x0(%rax,%rax,1)
movsd  (%r15,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
addsd  (%r10,%rcx,8),%xmm1
movsd  %xmm1,(%r10,%rcx,8)
movsd  0x8(%r15,%rcx,8),%xmm1
mulsd  %xmm0,%xmm1
addsd  0x8(%r10,%rcx,8),%xmm1
movsd  %xmm1,0x8(%r10,%rcx,8)
add    $0x2,%rcx
cmp    %rcx,%rax
jne    12d0 <matexp+0x170>
jmp    1409 <matexp+0x2a9>
mov    %eax,%ecx
and    $0x7ffffffc,%ecx
lea    -0x4(%rcx),%rdx
mov    %rdx,%rsi
shr    $0x2,%rsi
add    $0x1,%rsi
test   %rdx,%rdx
je     1523 <matexp+0x3c3>
mov    %rsi,%rdi
and    $0xfffffffffffffffe,%rdi
xor    %edx,%edx
movapd 0xcc2(%rip),%xmm0
xchg   %ax,%ax
movupd (%r15,%rdx,8),%xmm1
movupd 0x10(%r15,%rdx,8),%xmm2
mulpd  %xmm0,%xmm1
mulpd  %xmm0,%xmm2
movupd (%r10,%rdx,8),%xmm3
addpd  %xmm1,%xmm3
movupd 0x10(%r10,%rdx,8),%xmm1
addpd  %xmm2,%xmm1
movupd 0x20(%r10,%rdx,8),%xmm2
movupd 0x30(%r10,%rdx,8),%xmm4
movupd %xmm3,(%r10,%rdx,8)
movupd %xmm1,0x10(%r10,%rdx,8)
movupd 0x20(%r15,%rdx,8),%xmm1
movupd 0x30(%r15,%rdx,8),%xmm3
mulpd  %xmm0,%xmm1
addpd  %xmm2,%xmm1
mulpd  %xmm0,%xmm3
addpd  %xmm4,%xmm3
movupd %xmm1,0x20(%r10,%rdx,8)
movupd %xmm3,0x30(%r10,%rdx,8)
add    $0x8,%rdx
add    $0xfffffffffffffffe,%rdi
jne    1340 <matexp+0x1e0>
test   $0x1,%sil
je     1400 <matexp+0x2a0>
movupd (%r15,%rdx,8),%xmm0
movupd 0x10(%r15,%rdx,8),%xmm1
movapd 0xc2a(%rip),%xmm2
mulpd  %xmm2,%xmm0
mulpd  %xmm2,%xmm1
movupd (%r10,%rdx,8),%xmm2
addpd  %xmm0,%xmm2
movupd 0x10(%r10,%rdx,8),%xmm0
addpd  %xmm1,%xmm0
movupd %xmm2,(%r10,%rdx,8)
movupd %xmm0,0x10(%r10,%rdx,8)
cmp    %rax,%rcx
jne    1292 <matexp+0x132>
test   %r12d,%r12d
jle    14b0 <matexp+0x350>
xor    %eax,%eax
cmp    $0x1,%r12d
je     148a <matexp+0x32a>
lea    (%r12,%r12,1),%r9d
mov    %r14d,%r8d
and    $0xfffffffe,%r8d
neg    %r8
mov    $0x1,%edi
movsd  0xbe3(%rip),%xmm0
xor    %esi,%esi
mov    %r12d,%ebp
xor    %edx,%edx
nopl   0x0(%rax)
movslq %ebp,%rbp
lea    (%rdi,%rbp,1),%rbx
cltq
lea    (%rdx,%rax,1),%rcx
movsd  (%r10,%rcx,8),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%r10,%rcx,8)
movsd  (%r10,%rbx,8),%xmm1
addsd  %xmm0,%xmm1
movsd  %xmm1,(%r10,%rbx,8)
add    $0x2,%rdx
add    %r9d,%eax
add    $0x2,%rdi
add    %r9d,%ebp
add    $0xfffffffffffffffe,%rsi
cmp    %rsi,%r8
jne    1440 <matexp+0x2e0>
neg    %rsi
mov    %rsi,%rax
test   $0x1,%r14b
je     14b0 <matexp+0x350>
mov    %eax,%ecx
imul   %r12d,%ecx
movslq %ecx,%rcx
add    %rax,%rcx
movsd  (%r10,%rcx,8),%xmm0
addsd  0xb6e(%rip),%xmm0
movsd  %xmm0,(%r10,%rcx,8)
mov    0x18(%rsp),%rbp
test   %ebp,%ebp
jle    14f3 <matexp+0x393>
xor    %ebx,%ebx
nopl   0x0(%rax,%rax,1)
xor    $0x1,%ebx
mov    $0x1,%eax
sub    %ebx,%eax
mov    0x20(%rsp,%rax,8),%rdi
mov    0x20(%rsp,%rbx,8),%rdx
mov    %rdi,%rsi
mov    %r12d,%ecx
mov    %r12d,%r8d
mov    %r12d,%r9d
call   1050 <matby@plt>
add    $0xffffffff,%ebp
jne    14c0 <matexp+0x360>
test   %ebx,%ebx
mov    0x8(%rsp),%r10
jne    150a <matexp+0x3aa>
shl    $0x3,%r13d
mov    %r15,%rdi
mov    %r10,%rsi
mov    %r13d,%edx
call   1060 <memcpy@plt>
mov    0x8(%rsp),%r10
mov    %r10,%rdi
call   1030 <free@plt>
xor    %eax,%eax
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
xor    %edx,%edx
test   $0x1,%sil
jne    13c1 <matexp+0x261>
jmp    1400 <matexp+0x2a0>

LLVM IR (-O0):
@.str = [20 x i8] c"TimeSquare not good\00"
define i32 @matexp(double** %0, double* %1, double %2, i32 %3, i32 %4) {
%6 = alloca double**
%7 = alloca double*
%8 = alloca double
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca i32
%14 = alloca [2 x double*]
store double** %0, double*** %6
store double* %1, double** %7
store double %2, double* %8
store i32 %3, i32* %9
store i32 %4, i32* %10
%15 = load i32, i32* %10
%16 = icmp slt i32 %15, 2
br i1 %16, label %20, label %17
17: ; preds = %5
%18 = load i32, i32* %10
%19 = icmp sgt i32 %18, 31
br i1 %19, label %20, label %22
20: ; preds = %17, %5
%21 = call i32 @error(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str, i64 0, i64 0))
br label %22
22: ; preds = %20, %17
%23 = load i32, i32* %9
%24 = load i32, i32* %9
%25 = mul nsw i32 %23, %24
%26 = call double* @dvector(i32 %25)
%27 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
store double* %26, double** %27
%28 = load double*, double** %7
%29 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 1
store double* %28, double** %29
store i32 0, i32* %12
br label %30
30: ; preds = %67, %22
%31 = load i32, i32* %12
%32 = load i32, i32* %9
%33 = icmp slt i32 %31, %32
br i1 %33, label %34, label %70
34: ; preds = %30
store i32 0, i32* %13
br label %35
35: ; preds = %63, %34
%36 = load i32, i32* %13
%37 = load i32, i32* %9
%38 = icmp slt i32 %36, %37
br i1 %38, label %39, label %66
39: ; preds = %35
%40 = load double**, double*** %6
%41 = load i32, i32* %12
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds double*, double** %40, i64 %42
%44 = load double*, double** %43
%45 = load i32, i32* %13
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds double, double* %44, i64 %46
%48 = load double, double* %47
%49 = load double, double* %8
%50 = fmul double %48, %49
%51 = load i32, i32* %10
%52 = sub nsw i32 0, %51
%53 = call double @ldexp(double %50, i32 %52)
%54 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%55 = load double*, double** %54
%56 = load i32, i32* %12
%57 = load i32, i32* %9
%58 = mul nsw i32 %56, %57
%59 = load i32, i32* %13
%60 = add nsw i32 %58, %59
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds double, double* %55, i64 %61
store double %53, double* %62
br label %63
63: ; preds = %39
%64 = load i32, i32* %13
%65 = add nsw i32 %64, 1
store i32 %65, i32* %13
br label %35
66: ; preds = %35
br label %67
67: ; preds = %66
%68 = load i32, i32* %12
%69 = add nsw i32 %68, 1
store i32 %69, i32* %12
br label %30
70: ; preds = %30
%71 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%72 = load double*, double** %71
%73 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%74 = load double*, double** %73
%75 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 1
%76 = load double*, double** %75
%77 = load i32, i32* %9
%78 = load i32, i32* %9
%79 = load i32, i32* %9
%80 = call i32 @matby(double* %72, double* %74, double* %76, i32 %77, i32 %78, i32 %79)
store i32 0, i32* %12
br label %81
81: ; preds = %102, %70
%82 = load i32, i32* %12
%83 = load i32, i32* %9
%84 = load i32, i32* %9
%85 = mul nsw i32 %83, %84
%86 = icmp slt i32 %82, %85
br i1 %86, label %87, label %105
87: ; preds = %81
%88 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 1
%89 = load double*, double** %88
%90 = load i32, i32* %12
%91 = sext i32 %90 to i64
%92 = getelementptr inbounds double, double* %89, i64 %91
%93 = load double, double* %92
%94 = fdiv double %93, 2.000000e+00
%95 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%96 = load double*, double** %95
%97 = load i32, i32* %12
%98 = sext i32 %97 to i64
%99 = getelementptr inbounds double, double* %96, i64 %98
%100 = load double, double* %99
%101 = fadd double %100, %94
store double %101, double* %99
br label %102
102: ; preds = %87
%103 = load i32, i32* %12
%104 = add nsw i32 %103, 1
store i32 %104, i32* %12
br label %81
105: ; preds = %81
store i32 0, i32* %12
br label %106
106: ; preds = %122, %105
%107 = load i32, i32* %12
%108 = load i32, i32* %9
%109 = icmp slt i32 %107, %108
br i1 %109, label %110, label %125
110: ; preds = %106
%111 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%112 = load double*, double** %111
%113 = load i32, i32* %12
%114 = load i32, i32* %9
%115 = mul nsw i32 %113, %114
%116 = load i32, i32* %12
%117 = add nsw i32 %115, %116
%118 = sext i32 %117 to i64
%119 = getelementptr inbounds double, double* %112, i64 %118
%120 = load double, double* %119
%121 = fadd double %120, 1.000000e+00
store double %121, double* %119
br label %122
122: ; preds = %110
%123 = load i32, i32* %12
%124 = add nsw i32 %123, 1
store i32 %124, i32* %12
br label %106
125: ; preds = %106
store i32 0, i32* %12
store i32 0, i32* %11
br label %126
126: ; preds = %153, %125
%127 = load i32, i32* %12
%128 = load i32, i32* %10
%129 = icmp slt i32 %127, %128
br i1 %129, label %130, label %156
130: ; preds = %126
%131 = load i32, i32* %11
%132 = icmp ne i32 %131, 0
%133 = xor i1 %132, true
%134 = zext i1 %133 to i32
store i32 %134, i32* %11
%135 = load i32, i32* %11
%136 = sub nsw i32 1, %135
%137 = sext i32 %136 to i64
%138 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 %137
%139 = load double*, double** %138
%140 = load i32, i32* %11
%141 = sub nsw i32 1, %140
%142 = sext i32 %141 to i64
%143 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 %142
%144 = load double*, double** %143
%145 = load i32, i32* %11
%146 = sext i32 %145 to i64
%147 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 %146
%148 = load double*, double** %147
%149 = load i32, i32* %9
%150 = load i32, i32* %9
%151 = load i32, i32* %9
%152 = call i32 @matby(double* %139, double* %144, double* %148, i32 %149, i32 %150, i32 %151)
br label %153
153: ; preds = %130
%154 = load i32, i32* %12
%155 = add nsw i32 %154, 1
store i32 %155, i32* %12
br label %126
156: ; preds = %126
%157 = load i32, i32* %11
%158 = icmp eq i32 %157, 0
br i1 %158, label %159, label %170
159: ; preds = %156
%160 = load double*, double** %7
%161 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%162 = load double*, double** %161
%163 = load i32, i32* %9
%164 = load i32, i32* %9
%165 = mul nsw i32 %163, %164
%166 = sext i32 %165 to i64
%167 = mul i64 %166, 8
%168 = trunc i64 %167 to i32
%169 = call i32 @memcpy(double* %160, double* %162, i32 %168)
br label %170
170: ; preds = %159, %156
%171 = getelementptr inbounds [2 x double*], [2 x double*]* %14, i64 0, i64 0
%172 = load double*, double** %171
%173 = call i32 @free(double* %172)
ret i32 0
}

LLVM IR (-O2):
@.str = [20 x i8] c"TimeSquare not good\00"
define i32 @matexp(double** nocapture %0, double* %1, double %2, i32 %3, i32 %4) {
%6 = alloca [2 x double*]
%7 = bitcast [2 x double*]* %6 to i8*
%8 = add i32 %4, -32
%9 = icmp ult i32 %8, -30
br i1 %9, label %10, label %12
10: ; preds = %5
%11 = tail call i32 @error(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str, i64 0, i64 0))
br label %12
12: ; preds = %5, %10
%13 = mul nsw i32 %3, %3
%14 = tail call double* @dvector(i32 %13)
%15 = getelementptr inbounds [2 x double*], [2 x double*]* %6, i64 0, i64 0
store double* %14, double** %15
%16 = getelementptr inbounds [2 x double*], [2 x double*]* %6, i64 0, i64 1
store double* %1, double** %16
%17 = icmp sgt i32 %3, 0
br i1 %17, label %18, label %40
18: ; preds = %12
%19 = sub nsw i32 0, %4
%20 = zext i32 %3 to i64
%21 = zext i32 %3 to i64
br label %22
22: ; preds = %37, %18
%23 = phi i64 [ 0, %18 ], [ %38, %37 ]
%24 = getelementptr inbounds double*, double** %0, i64 %23
%25 = mul nsw i64 %23, %20
br label %26
26: ; preds = %22, %26
%27 = phi i64 [ 0, %22 ], [ %35, %26 ]
%28 = load double*, double** %24
%29 = getelementptr inbounds double, double* %28, i64 %27
%30 = load double, double* %29
%31 = fmul double %30, %2
%32 = tail call double @ldexp(double %31, i32 %19)
%33 = add nuw nsw i64 %27, %25
%34 = getelementptr inbounds double, double* %14, i64 %33
store double %32, double* %34
%35 = add nuw nsw i64 %27, 1
%36 = icmp eq i64 %35, %21
br i1 %36, label %37, label %26
37: ; preds = %26
%38 = add nuw nsw i64 %23, 1
%39 = icmp eq i64 %38, %21
br i1 %39, label %40, label %22
40: ; preds = %37, %12
%41 = tail call i32 @matby(double* %14, double* %14, double* %1, i32 %3, i32 %3, i32 %3)
%42 = icmp eq i32 %13, 0
br i1 %42, label %145, label %43
43: ; preds = %40
%44 = zext i32 %13 to i64
%45 = icmp ult i32 %13, 4
br i1 %45, label %128, label %46
46: ; preds = %43
%47 = getelementptr double, double* %14, i64 %44
%48 = getelementptr double, double* %1, i64 %44
%49 = icmp ult double* %14, %48
%50 = icmp ugt double* %47, %1
%51 = and i1 %49, %50
br i1 %51, label %128, label %52
52: ; preds = %46
%53 = and i64 %44, 2147483644
%54 = add nsw i64 %53, -4
%55 = lshr exact i64 %54, 2
%56 = add nuw nsw i64 %55, 1
%57 = and i64 %56, 1
%58 = icmp eq i64 %54, 0
br i1 %58, label %104, label %59
59: ; preds = %52
%60 = and i64 %56, 9223372036854775806
br label %61
61: ; preds = %61, %59
%62 = phi i64 [ 0, %59 ], [ %101, %61 ]
%63 = phi i64 [ 0, %59 ], [ %102, %61 ]
%64 = getelementptr inbounds double, double* %1, i64 %62
%65 = bitcast double* %64 to <2 x double>*
%66 = load <2 x double>, <2 x double>* %65
%67 = getelementptr inbounds double, double* %64, i64 2
%68 = bitcast double* %67 to <2 x double>*
%69 = load <2 x double>, <2 x double>* %68
%70 = fmul <2 x double> %66, <double 5.000000e-01, double 5.000000e-01>
%71 = fmul <2 x double> %69, <double 5.000000e-01, double 5.000000e-01>
%72 = getelementptr inbounds double, double* %14, i64 %62
%73 = bitcast double* %72 to <2 x double>*
%74 = load <2 x double>, <2 x double>* %73
%75 = getelementptr inbounds double, double* %72, i64 2
%76 = bitcast double* %75 to <2 x double>*
%77 = load <2 x double>, <2 x double>* %76
%78 = fadd <2 x double> %74, %70
%79 = fadd <2 x double> %77, %71
%80 = bitcast double* %72 to <2 x double>*
store <2 x double> %78, <2 x double>* %80
%81 = bitcast double* %75 to <2 x double>*
store <2 x double> %79, <2 x double>* %81
%82 = or i64 %62, 4
%83 = getelementptr inbounds double, double* %1, i64 %82
%84 = bitcast double* %83 to <2 x double>*
%85 = load <2 x double>, <2 x double>* %84
%86 = getelementptr inbounds double, double* %83, i64 2
%87 = bitcast double* %86 to <2 x double>*
%88 = load <2 x double>, <2 x double>* %87
%89 = fmul <2 x double> %85, <double 5.000000e-01, double 5.000000e-01>
%90 = fmul <2 x double> %88, <double 5.000000e-01, double 5.000000e-01>
%91 = getelementptr inbounds double, double* %14, i64 %82
%92 = bitcast double* %91 to <2 x double>*
%93 = load <2 x double>, <2 x double>* %92
%94 = getelementptr inbounds double, double* %91, i64 2
%95 = bitcast double* %94 to <2 x double>*
%96 = load <2 x double>, <2 x double>* %95
%97 = fadd <2 x double> %93, %89
%98 = fadd <2 x double> %96, %90
%99 = bitcast double* %91 to <2 x double>*
store <2 x double> %97, <2 x double>* %99
%100 = bitcast double* %94 to <2 x double>*
store <2 x double> %98, <2 x double>* %100
%101 = add nuw i64 %62, 8
%102 = add i64 %63, 2
%103 = icmp eq i64 %102, %60
br i1 %103, label %104, label %61
104: ; preds = %61, %52
%105 = phi i64 [ 0, %52 ], [ %101, %61 ]
%106 = icmp eq i64 %57, 0
br i1 %106, label %126, label %107
107: ; preds = %104
%108 = getelementptr inbounds double, double* %1, i64 %105
%109 = bitcast double* %108 to <2 x double>*
%110 = load <2 x double>, <2 x double>* %109
%111 = getelementptr inbounds double, double* %108, i64 2
%112 = bitcast double* %111 to <2 x double>*
%113 = load <2 x double>, <2 x double>* %112
%114 = fmul <2 x double> %110, <double 5.000000e-01, double 5.000000e-01>
%115 = fmul <2 x double> %113, <double 5.000000e-01, double 5.000000e-01>
%116 = getelementptr inbounds double, double* %14, i64 %105
%117 = bitcast double* %116 to <2 x double>*
%118 = load <2 x double>, <2 x double>* %117
%119 = getelementptr inbounds double, double* %116, i64 2
%120 = bitcast double* %119 to <2 x double>*
%121 = load <2 x double>, <2 x double>* %120
%122 = fadd <2 x double> %118, %114
%123 = fadd <2 x double> %121, %115
%124 = bitcast double* %116 to <2 x double>*
store <2 x double> %122, <2 x double>* %124
%125 = bitcast double* %119 to <2 x double>*
store <2 x double> %123, <2 x double>* %125
br label %126
126: ; preds = %104, %107
%127 = icmp eq i64 %53, %44
br i1 %127, label %145, label %128
128: ; preds = %46, %43, %126
%129 = phi i64 [ 0, %46 ], [ 0, %43 ], [ %53, %126 ]
%130 = xor i64 %129, -1
%131 = and i64 %44, 1
%132 = icmp eq i64 %131, 0
br i1 %132, label %141, label %133
133: ; preds = %128
%134 = getelementptr inbounds double, double* %1, i64 %129
%135 = load double, double* %134
%136 = fmul double %135, 5.000000e-01
%137 = getelementptr inbounds double, double* %14, i64 %129
%138 = load double, double* %137
%139 = fadd double %138, %136
store double %139, double* %137
%140 = or i64 %129, 1
br label %141
141: ; preds = %133, %128
%142 = phi i64 [ %129, %128 ], [ %140, %133 ]
%143 = sub nsw i64 0, %44
%144 = icmp eq i64 %130, %143
br i1 %144, label %145, label %152
145: ; preds = %141, %152, %126, %40
br i1 %17, label %146, label %180
146: ; preds = %145
%147 = zext i32 %3 to i64
%148 = and i64 %147, 1
%149 = icmp eq i32 %3, 1
br i1 %149, label %169, label %150
150: ; preds = %146
%151 = and i64 %147, 4294967294
br label %182
152: ; preds = %141, %152
%153 = phi i64 [ %167, %152 ], [ %142, %141 ]
%154 = getelementptr inbounds double, double* %1, i64 %153
%155 = load double, double* %154
%156 = fmul double %155, 5.000000e-01
%157 = getelementptr inbounds double, double* %14, i64 %153
%158 = load double, double* %157
%159 = fadd double %158, %156
store double %159, double* %157
%160 = add nuw nsw i64 %153, 1
%161 = getelementptr inbounds double, double* %1, i64 %160
%162 = load double, double* %161
%163 = fmul double %162, 5.000000e-01
%164 = getelementptr inbounds double, double* %14, i64 %160
%165 = load double, double* %164
%166 = fadd double %165, %163
store double %166, double* %164
%167 = add nuw nsw i64 %153, 2
%168 = icmp eq i64 %167, %44
br i1 %168, label %145, label %152
169: ; preds = %182, %146
%170 = phi i64 [ 0, %146 ], [ %200, %182 ]
%171 = icmp eq i64 %148, 0
br i1 %171, label %180, label %172
172: ; preds = %169
%173 = trunc i64 %170 to i32
%174 = mul nsw i32 %173, %3
%175 = sext i32 %174 to i64
%176 = add nsw i64 %170, %175
%177 = getelementptr inbounds double, double* %14, i64 %176
%178 = load double, double* %177
%179 = fadd double %178, 1.000000e+00
store double %179, double* %177
br label %180
180: ; preds = %172, %169, %145
%181 = icmp sgt i32 %4, 0
br i1 %181, label %203, label %219
182: ; preds = %182, %150
%183 = phi i64 [ 0, %150 ], [ %200, %182 ]
%184 = phi i64 [ 0, %150 ], [ %201, %182 ]
%185 = trunc i64 %183 to i32
%186 = mul nsw i32 %185, %3
%187 = sext i32 %186 to i64
%188 = add nsw i64 %183, %187
%189 = getelementptr inbounds double, double* %14, i64 %188
%190 = load double, double* %189
%191 = fadd double %190, 1.000000e+00
store double %191, double* %189
%192 = or i64 %183, 1
%193 = trunc i64 %192 to i32
%194 = mul nsw i32 %193, %3
%195 = sext i32 %194 to i64
%196 = add nsw i64 %192, %195
%197 = getelementptr inbounds double, double* %14, i64 %196
%198 = load double, double* %197
%199 = fadd double %198, 1.000000e+00
store double %199, double* %197
%200 = add nuw nsw i64 %183, 2
%201 = add i64 %184, 2
%202 = icmp eq i64 %201, %151
br i1 %202, label %169, label %182
203: ; preds = %180, %203
%204 = phi i32 [ %215, %203 ], [ 0, %180 ]
%205 = phi i32 [ %206, %203 ], [ 0, %180 ]
%206 = xor i32 %205, 1
%207 = sub nsw i32 1, %206
%208 = zext i32 %207 to i64
%209 = getelementptr inbounds [2 x double*], [2 x double*]* %6, i64 0, i64 %208
%210 = load double*, double** %209
%211 = zext i32 %206 to i64
%212 = getelementptr inbounds [2 x double*], [2 x double*]* %6, i64 0, i64 %211
%213 = load double*, double** %212
%214 = tail call i32 @matby(double* %210, double* %210, double* %213, i32 %3, i32 %3, i32 %3)
%215 = add nuw nsw i32 %204, 1
%216 = icmp eq i32 %215, %4
br i1 %216, label %217, label %203
217: ; preds = %203
%218 = icmp eq i32 %206, 0
br i1 %218, label %219, label %222
219: ; preds = %180, %217
%220 = shl i32 %13, 3
%221 = tail call i32 @memcpy(double* %1, double* %14, i32 %220)
br label %222
222: ; preds = %219, %217
%223 = tail call i32 @free(double* %14)
ret i32 0
}