#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*/ free_matrix(float **, int, int, int, int);
float **matrix(int, int, int, int);
int /*<<< orphan*/ nrerror(char *);
void zrhqr(float a[], int m, float rtr[], float rti[]) {
  void balanc(float **a, int n);
  void hqr(float **a, int n, float wr[], float wi[]);
  int j, k;
  float **hess, xr, xi;
  hess = matrix(1, 50, 1, 50);
  if (m > 50 || a[m] == 0.0)
    nrerror("bad args in zrhqr");
  for (k = 1; k <= m; k++) {
    hess[1][k] = -a[m - k] / a[m];
    for (j = 2; j <= m; j++)
      hess[j][k] = 0.0;
    if (k != m)
      hess[k + 1][k] = 1.0;
  }
  balanc(hess, m);
  hqr(hess, m, rtr, rti);
  for (j = 2; j <= m; j++) {
    xr = rtr[j];
    xi = rti[j];
    for (k = j - 1; k >= 1; k--) {
      if (rtr[k] <= xr)
        break;
      rtr[k + 1] = rtr[k];
      rti[k + 1] = rti[k];
    }
    rtr[k + 1] = xr;
    rti[k + 1] = xi;
  }
  free_matrix(hess, 1, 50, 1, 50);
}


x86 assembly (clang, -O0):
<zrhqr>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    $0x1,%edx
mov    $0x32,%ecx
mov    %edx,%edi
mov    %ecx,%esi
call   1060 <matrix@plt>
mov    %rax,-0x30(%rbp)
cmpl   $0x32,-0xc(%rbp)
jg     11ac <zrhqr+0x5c>
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    11b8 <zrhqr+0x68>
jp     11b8 <zrhqr+0x68>
lea    0xe51(%rip),%rdi
call   1040 <nrerror@plt>
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1282 <zrhqr+0x132>
mov    -0x8(%rbp),%rax
mov    -0xc(%rbp),%ecx
sub    -0x28(%rbp),%ecx
movslq %ecx,%rcx
movss  (%rax,%rcx,4),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
divss  (%rax,%rcx,4),%xmm0
mov    -0x30(%rbp),%rax
mov    0x8(%rax),%rax
movslq -0x28(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
movl   $0x2,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1241 <zrhqr+0xf1>
mov    -0x30(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x28(%rbp),%rcx
xorps  %xmm0,%xmm0
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    120f <zrhqr+0xbf>
mov    -0x28(%rbp),%eax
cmp    -0xc(%rbp),%eax
je     126f <zrhqr+0x11f>
mov    -0x30(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,8),%rax
movslq -0x28(%rbp),%rcx
movss  0xd96(%rip),%xmm0
movss  %xmm0,(%rax,%rcx,4)
jmp    1274 <zrhqr+0x124>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    11bf <zrhqr+0x6f>
mov    -0x30(%rbp),%rdi
mov    -0xc(%rbp),%esi
call   1070 <balanc@plt>
mov    -0x30(%rbp),%rdi
mov    -0xc(%rbp),%esi
mov    -0x18(%rbp),%rdx
mov    -0x20(%rbp),%rcx
call   1050 <hqr@plt>
movl   $0x2,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0xc(%rbp),%eax
jg     1394 <zrhqr+0x244>
mov    -0x18(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x34(%rbp)
mov    -0x20(%rbp),%rax
movslq -0x24(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x38(%rbp)
mov    -0x24(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x28(%rbp)
cmpl   $0x1,-0x28(%rbp)
jl     1358 <zrhqr+0x208>
mov    -0x18(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm1
movss  -0x34(%rbp),%xmm0
ucomiss %xmm1,%xmm0
jb     130c <zrhqr+0x1bc>
jmp    1358 <zrhqr+0x208>
mov    -0x18(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x20(%rbp),%rax
movslq -0x28(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x28(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x28(%rbp)
jmp    12e2 <zrhqr+0x192>
movss  -0x34(%rbp),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
movss  -0x38(%rbp),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    12a9 <zrhqr+0x159>
mov    -0x30(%rbp),%rdi
mov    $0x1,%ecx
mov    $0x32,%r8d
mov    %ecx,%esi
mov    %r8d,%edx
call   1030 <free_matrix@plt>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<zrhqr>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rcx,%r14
mov    %rdx,%r12
mov    %esi,%r15d
mov    %rdi,%r13
mov    $0x1,%edi
mov    $0x32,%esi
mov    $0x1,%edx
mov    $0x32,%ecx
call   1060 <matrix@plt>
mov    %rax,%rbx
cmp    $0x32,%r15d
jg     119d <zrhqr+0x4d>
movslq %r15d,%rax
movss  0x0(%r13,%rax,4),%xmm0
xorps  %xmm1,%xmm1
ucomiss %xmm1,%xmm0
jne    11a9 <zrhqr+0x59>
jp     11a9 <zrhqr+0x59>
lea    0xe6c(%rip),%rdi
call   1040 <nrerror@plt>
test   %r15d,%r15d
jle    12a4 <zrhqr+0x154>
mov    %r15d,%r11d
mov    0x8(%rbx),%r9
lea    0x1(%r11),%r10
lea    -0x1(%r11),%rdi
lea    -0x2(%r11),%r8
mov    %edi,%esi
and    $0x3,%esi
and    $0xfffffffffffffffc,%rdi
neg    %rdi
mov    $0x1,%ecx
movaps 0xe23(%rip),%xmm0
jmp    11ec <zrhqr+0x9c>
nop
mov    %rdx,%rcx
cmp    %r10,%rdx
je     12a4 <zrhqr+0x154>
mov    %r11,%rax
sub    %rcx,%rax
movss  0x0(%r13,%rax,4),%xmm1
xorps  %xmm0,%xmm1
divss  0x0(%r13,%r11,4),%xmm1
movss  %xmm1,(%r9,%rcx,4)
cmp    $0x1,%r15d
je     1285 <zrhqr+0x135>
mov    $0x2,%edx
cmp    $0x3,%r8
jb     1261 <zrhqr+0x111>
mov    $0x2,%edx
nop
mov    (%rbx,%rdx,8),%rax
movl   $0x0,(%rax,%rcx,4)
mov    0x8(%rbx,%rdx,8),%rax
movl   $0x0,(%rax,%rcx,4)
mov    0x10(%rbx,%rdx,8),%rax
movl   $0x0,(%rax,%rcx,4)
mov    0x18(%rbx,%rdx,8),%rax
movl   $0x0,(%rax,%rcx,4)
lea    (%rdi,%rdx,1),%rax
add    $0x4,%rax
add    $0x4,%rdx
cmp    $0x2,%rax
jne    1220 <zrhqr+0xd0>
test   %rsi,%rsi
je     1285 <zrhqr+0x135>
lea    (%rbx,%rdx,8),%rdx
xor    %eax,%eax
nopl   0x0(%rax)
mov    (%rdx,%rax,8),%rbp
movl   $0x0,0x0(%rbp,%rcx,4)
add    $0x1,%rax
cmp    %rax,%rsi
jne    1270 <zrhqr+0x120>
lea    0x1(%rcx),%rdx
cmp    %r11,%rcx
je     11e0 <zrhqr+0x90>
mov    %edx,%eax
mov    (%rbx,%rax,8),%rax
movl   $0x3f800000,(%rax,%rcx,4)
jmp    11e0 <zrhqr+0x90>
mov    %rbx,%rdi
mov    %r15d,%esi
call   1070 <balanc@plt>
mov    %rbx,%rdi
mov    %r15d,%esi
mov    %r12,%rdx
mov    %r14,%rcx
call   1050 <hqr@plt>
cmp    $0x2,%r15d
jge    12f1 <zrhqr+0x1a1>
mov    %rbx,%rdi
mov    $0x1,%esi
mov    $0x32,%edx
mov    $0x1,%ecx
mov    $0x32,%r8d
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
jmp    1030 <free_matrix@plt>
add    $0x1,%r15d
mov    $0x2,%eax
mov    $0x3,%ecx
jmp    1330 <zrhqr+0x1e0>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
add    $0xffffffffffffffff,%rdx
movslq %edx,%rdx
movss  %xmm0,(%r12,%rdx,4)
movss  %xmm1,(%r14,%rdx,4)
add    $0x1,%rax
add    $0x1,%rcx
cmp    %r15,%rax
je     12c6 <zrhqr+0x176>
movss  (%r12,%rax,4),%xmm0
movss  (%r14,%rax,4),%xmm1
mov    %rcx,%rdx
nop
lea    -0x2(%rdx),%esi
movss  (%r12,%rsi,4),%xmm2
ucomiss %xmm2,%xmm0
jae    1310 <zrhqr+0x1c0>
movss  %xmm2,-0x4(%r12,%rdx,4)
movss  (%r14,%rsi,4),%xmm2
movss  %xmm2,-0x4(%r14,%rdx,4)
add    $0xffffffffffffffff,%rdx
cmp    $0x2,%rdx
jg     1340 <zrhqr+0x1f0>
mov    $0x1,%edx
jmp    1314 <zrhqr+0x1c4>

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

LLVM IR (-O2):
@.str = [18 x i8] c"bad args in zrhqr\00"
define void @zrhqr(float* nocapture %0, i32 %1, float* %2, float* %3) {
%5 = tail call float** @matrix(i32 1, i32 50, i32 1, i32 50)
%6 = icmp sgt i32 %1, 50
br i1 %6, label %12, label %7
7: ; preds = %4
%8 = sext i32 %1 to i64
%9 = getelementptr inbounds float, float* %0, i64 %8
%10 = load float, float* %9
%11 = fcmp oeq float %10, 0.000000e+00
br i1 %11, label %12, label %14
12: ; preds = %7, %4
%13 = tail call i32 @nrerror(i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str, i64 0, i64 0))
br label %14
14: ; preds = %12, %7
%15 = icmp slt i32 %1, 1
br i1 %15, label %83, label %16
16: ; preds = %14
%17 = zext i32 %1 to i64
%18 = getelementptr inbounds float, float* %0, i64 %17
%19 = getelementptr inbounds float*, float** %5, i64 1
%20 = load float*, float** %19
%21 = icmp eq i32 %1, 1
%22 = add nuw i32 %1, 1
%23 = zext i32 %1 to i64
%24 = zext i32 %22 to i64
%25 = add nsw i64 %24, -2
%26 = add nsw i64 %24, -3
%27 = and i64 %25, 3
%28 = icmp ult i64 %26, 3
%29 = and i64 %25, -4
%30 = icmp eq i64 %27, 0
br label %31
31: ; preds = %16, %81
%32 = phi i64 [ 1, %16 ], [ %75, %81 ]
%33 = sub nsw i64 %17, %32
%34 = getelementptr inbounds float, float* %0, i64 %33
%35 = load float, float* %34
%36 = fneg float %35
%37 = load float, float* %18
%38 = fdiv float %36, %37
%39 = getelementptr inbounds float, float* %20, i64 %32
store float %38, float* %39
br i1 %21, label %73, label %40
40: ; preds = %31
br i1 %28, label %62, label %41
41: ; preds = %40, %41
%42 = phi i64 [ %59, %41 ], [ 2, %40 ]
%43 = phi i64 [ %60, %41 ], [ 0, %40 ]
%44 = getelementptr inbounds float*, float** %5, i64 %42
%45 = load float*, float** %44
%46 = getelementptr inbounds float, float* %45, i64 %32
store float 0.000000e+00, float* %46
%47 = or i64 %42, 1
%48 = getelementptr inbounds float*, float** %5, i64 %47
%49 = load float*, float** %48
%50 = getelementptr inbounds float, float* %49, i64 %32
store float 0.000000e+00, float* %50
%51 = add nuw nsw i64 %42, 2
%52 = getelementptr inbounds float*, float** %5, i64 %51
%53 = load float*, float** %52
%54 = getelementptr inbounds float, float* %53, i64 %32
store float 0.000000e+00, float* %54
%55 = add nuw nsw i64 %42, 3
%56 = getelementptr inbounds float*, float** %5, i64 %55
%57 = load float*, float** %56
%58 = getelementptr inbounds float, float* %57, i64 %32
store float 0.000000e+00, float* %58
%59 = add nuw nsw i64 %42, 4
%60 = add i64 %43, 4
%61 = icmp eq i64 %60, %29
br i1 %61, label %62, label %41
62: ; preds = %41, %40
%63 = phi i64 [ 2, %40 ], [ %59, %41 ]
br i1 %30, label %73, label %64
64: ; preds = %62, %64
%65 = phi i64 [ %70, %64 ], [ %63, %62 ]
%66 = phi i64 [ %71, %64 ], [ 0, %62 ]
%67 = getelementptr inbounds float*, float** %5, i64 %65
%68 = load float*, float** %67
%69 = getelementptr inbounds float, float* %68, i64 %32
store float 0.000000e+00, float* %69
%70 = add nuw nsw i64 %65, 1
%71 = add i64 %66, 1
%72 = icmp eq i64 %71, %27
br i1 %72, label %73, label %64
73: ; preds = %62, %64, %31
%74 = icmp eq i64 %32, %23
%75 = add nuw nsw i64 %32, 1
br i1 %74, label %81, label %76
76: ; preds = %73
%77 = and i64 %75, 4294967295
%78 = getelementptr inbounds float*, float** %5, i64 %77
%79 = load float*, float** %78
%80 = getelementptr inbounds float, float* %79, i64 %32
store float 1.000000e+00, float* %80
br label %81
81: ; preds = %73, %76
%82 = icmp eq i64 %75, %24
br i1 %82, label %83, label %31
83: ; preds = %81, %14
tail call void @balanc(float** %5, i32 %1)
tail call void @hqr(float** %5, i32 %1, float* %2, float* %3)
%84 = icmp slt i32 %1, 2
br i1 %84, label %115, label %85
85: ; preds = %83
%86 = add nuw i32 %1, 1
%87 = zext i32 %86 to i64
br label %88
88: ; preds = %85, %107
%89 = phi i64 [ 2, %85 ], [ %113, %107 ]
%90 = getelementptr inbounds float, float* %2, i64 %89
%91 = load float, float* %90
%92 = getelementptr inbounds float, float* %3, i64 %89
%93 = load float, float* %92
br label %94
94: ; preds = %88, %101
%95 = phi i64 [ %89, %88 ], [ %96, %101 ]
%96 = add nsw i64 %95, -1
%97 = and i64 %96, 4294967295
%98 = getelementptr inbounds float, float* %2, i64 %97
%99 = load float, float* %98
%100 = fcmp ugt float %99, %91
br i1 %100, label %101, label %107
101: ; preds = %94
%102 = getelementptr inbounds float, float* %2, i64 %95
store float %99, float* %102
%103 = getelementptr inbounds float, float* %3, i64 %97
%104 = load float, float* %103
%105 = getelementptr inbounds float, float* %3, i64 %95
store float %104, float* %105
%106 = icmp sgt i64 %95, 2
br i1 %106, label %94, label %107
107: ; preds = %94, %101
%108 = phi i64 [ %95, %94 ], [ 1, %101 ]
%109 = shl i64 %108, 32
%110 = ashr exact i64 %109, 32
%111 = getelementptr inbounds float, float* %2, i64 %110
store float %91, float* %111
%112 = getelementptr inbounds float, float* %3, i64 %110
store float %93, float* %112
%113 = add nuw nsw i64 %89, 1
%114 = icmp eq i64 %113, %87
br i1 %114, label %115, label %88
115: ; preds = %107, %83
%116 = tail call i32 @free_matrix(float** %5, i32 1, i32 50, i32 1, i32 50)
ret void
}