#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*/ c_saxpy(int, double, double *, double *);
double c_sdot(int, double *, double *);
void c_sgesl(double *a, int lda, int n, int *ipvt, double *b, int job) {
  register int k, kb, l, nm1;
  double t;
  nm1 = n - 1;
  if (job == 0) {
    for (k = 1; k <= nm1; k++) {
      l = ipvt[k - 1];
      t = b[l - 1];
      if (l != k) {
        b[l - 1] = b[k - 1];
        b[k - 1] = t;
      }
      c_saxpy(n - k, t, &a[k + 1 - 1 + (k - 1) * lda], &b[k + 1 - 1]);
    }
    for (kb = 1; kb <= n; kb++) {
      k = n + 1 - kb;
      b[k - 1] /= a[k - 1 + (k - 1) * lda];
      t = -b[k - 1];
      c_saxpy(k - 1, t, &a[1 - 1 + (k - 1) * lda], &b[1 - 1]);
    }
  } else {
    for (k = 1; k <= n; k++) {
      t = c_sdot(k - 1, &a[1 - 1 + (k - 1) * lda], &b[1 - 1]);
      b[k - 1] = (b[k - 1] - t) / a[k - 1 + (k - 1) * lda];
    }
    for (kb = 1; kb <= nm1; kb++) {
      k = n - kb;
      b[k - 1] += c_sdot(n - k, &a[k + 1 - 1 + (k - 1) * lda], &b[k + 1 - 1]);
      l = ipvt[k - 1];
      if (l != k) {
        t = b[l - 1];
        b[l - 1] = b[k - 1];
        b[k - 1] = t;
      }
    }
  }
  return;
}


x86 assembly (clang, -O0):
<c_sgesl>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %rcx,-0x18(%rbp)
mov    %r8,-0x20(%rbp)
mov    %r9d,-0x24(%rbp)
mov    -0x10(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0x34(%rbp)
cmpl   $0x0,-0x24(%rbp)
jne    12f2 <c_sgesl+0x1d2>
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x34(%rbp),%eax
jg     122b <c_sgesl+0x10b>
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x28(%rbp),%eax
je     11d5 <c_sgesl+0xb5>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x10(%rbp),%edi
sub    -0x28(%rbp),%edi
movsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rsi
mov    -0x28(%rbp),%eax
add    $0x1,%eax
sub    $0x1,%eax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
imul   -0xc(%rbp),%ecx
add    %ecx,%eax
cltq
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x20(%rbp),%rdx
mov    -0x28(%rbp),%eax
add    $0x1,%eax
sub    $0x1,%eax
cltq
shl    $0x3,%rax
add    %rax,%rdx
call   1040 <c_saxpy@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    1158 <c_sgesl+0x38>
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     12ed <c_sgesl+0x1cd>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
sub    -0x2c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
sub    $0x1,%edx
imul   -0xc(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm1
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
divsd  %xmm1,%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x28(%rbp),%edi
sub    $0x1,%edi
movsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rsi
mov    -0x28(%rbp),%eax
sub    $0x1,%eax
imul   -0xc(%rbp),%eax
add    $0x0,%eax
cltq
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x20(%rbp),%rdx
call   1040 <c_saxpy@plt>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    1232 <c_sgesl+0x112>
jmp    1487 <c_sgesl+0x367>
movl   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x10(%rbp),%eax
jg     1388 <c_sgesl+0x268>
mov    -0x28(%rbp),%edi
sub    $0x1,%edi
mov    -0x8(%rbp),%rsi
mov    -0x28(%rbp),%eax
sub    $0x1,%eax
imul   -0xc(%rbp),%eax
add    $0x0,%eax
cltq
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x20(%rbp),%rdx
call   1030 <c_sdot@plt>
movsd  %xmm0,-0x40(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
subsd  -0x40(%rbp),%xmm0
mov    -0x8(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
mov    -0x28(%rbp),%edx
sub    $0x1,%edx
imul   -0xc(%rbp),%edx
add    %edx,%ecx
movslq %ecx,%rcx
divsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12f9 <c_sgesl+0x1d9>
movl   $0x1,-0x2c(%rbp)
mov    -0x2c(%rbp),%eax
cmp    -0x34(%rbp),%eax
jg     1482 <c_sgesl+0x362>
mov    -0x10(%rbp),%eax
sub    -0x2c(%rbp),%eax
mov    %eax,-0x28(%rbp)
mov    -0x10(%rbp),%edi
sub    -0x28(%rbp),%edi
mov    -0x8(%rbp),%rsi
mov    -0x28(%rbp),%eax
add    $0x1,%eax
sub    $0x1,%eax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
imul   -0xc(%rbp),%ecx
add    %ecx,%eax
cltq
shl    $0x3,%rax
add    %rax,%rsi
mov    -0x20(%rbp),%rdx
mov    -0x28(%rbp),%eax
add    $0x1,%eax
sub    $0x1,%eax
cltq
shl    $0x3,%rax
add    %rax,%rdx
call   1030 <c_sdot@plt>
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
addsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x30(%rbp)
mov    -0x30(%rbp),%eax
cmp    -0x28(%rbp),%eax
je     146f <c_sgesl+0x34f>
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  (%rax,%rcx,8),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x30(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
movsd  -0x40(%rbp),%xmm0
mov    -0x20(%rbp),%rax
mov    -0x28(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
movsd  %xmm0,(%rax,%rcx,8)
jmp    1474 <c_sgesl+0x354>
mov    -0x2c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x2c(%rbp)
jmp    138f <c_sgesl+0x26f>
jmp    1487 <c_sgesl+0x367>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<c_sgesl>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x28,%rsp
mov    %r8,%r12
mov    %rcx,0x10(%rsp)
mov    %rdi,%r13
test   %r9d,%r9d
je     1256 <c_sgesl+0x136>
test   %edx,%edx
jle    1362 <c_sgesl+0x242>
mov    %r13,%r15
movslq %esi,%rax
mov    %rdx,0x8(%rsp)
mov    %edx,%r13d
lea    0x0(,%rax,8),%rcx
mov    %rcx,(%rsp)
mov    %rax,0x20(%rsp)
lea    0x8(,%rax,8),%r14
xor    %ebp,%ebp
mov    %r15,%rbx
mov    %r15,0x18(%rsp)
nopl   0x0(%rax,%rax,1)
mov    %ebp,%edi
mov    %rbx,%rsi
mov    %r12,%rdx
call   1030 <c_sdot@plt>
movsd  (%r12,%rbp,8),%xmm1
subsd  %xmm0,%xmm1
divsd  (%r15),%xmm1
movsd  %xmm1,(%r12,%rbp,8)
add    $0x1,%rbp
add    %r14,%r15
add    (%rsp),%rbx
cmp    %rbp,%r13
jne    1180 <c_sgesl+0x60>
cmpl   $0x2,0x8(%rsp)
mov    0x18(%rsp),%rcx
mov    (%rsp),%r15
jl     1362 <c_sgesl+0x242>
lea    -0x2(%r13),%rax
imul   0x20(%rsp),%rax
add    %r13,%rax
lea    (%rcx,%rax,8),%r14
add    $0xfffffffffffffff8,%r14
xor    $0xfffffffffffffff8,%r15
lea    -0x8(,%r13,8),%rbp
ff
add    $0xffffffffffffffff,%r13
mov    $0x1,%ebx
jmp    1214 <c_sgesl+0xf4>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
add    $0x1,%ebx
add    %r15,%r14
add    $0xfffffffffffffff8,%rbp
add    $0xffffffffffffffff,%r13
je     1362 <c_sgesl+0x242>
lea    (%r12,%rbp,1),%rdx
mov    %ebx,%edi
mov    %r14,%rsi
call   1030 <c_sdot@plt>
addsd  -0x8(%r12,%r13,8),%xmm0
movsd  %xmm0,-0x8(%r12,%r13,8)
mov    0x10(%rsp),%rax
movslq -0x4(%rax,%r13,4),%rax
cmp    %eax,%r13d
je     1200 <c_sgesl+0xe0>
movsd  -0x8(%r12,%rax,8),%xmm1
movsd  %xmm0,-0x8(%r12,%rax,8)
movsd  %xmm1,-0x8(%r12,%r13,8)
jmp    1200 <c_sgesl+0xe0>
mov    %rdx,0x8(%rsp)
cmp    $0x2,%edx
mov    %esi,(%rsp)
jl     12f5 <c_sgesl+0x1d5>
mov    0x8(%rsp),%rax
mov    %eax,%ecx
mov    %rcx,0x18(%rsp)
lea    -0x1(%rax),%ebp
mov    $0x1,%eax
xor    %ebx,%ebx
mov    $0x8,%r15d
jmp    12c6 <c_sgesl+0x1a6>
cs nopw 0x0(%rax,%rax,1)
nop
movslq %ebx,%rbx
lea    0x1(%rax),%r14
add    %rbx,%rax
lea    0x0(,%rax,8),%rsi
add    %r13,%rsi
lea    (%r12,%r15,1),%rdx
mov    %ebp,%edi
call   1040 <c_saxpy@plt>
add    $0xffffffff,%ebp
mov    (%rsp),%esi
add    %esi,%ebx
add    $0x8,%r15
mov    %r14,%rax
cmp    %r14,0x18(%rsp)
je     12f5 <c_sgesl+0x1d5>
mov    0x10(%rsp),%rcx
mov    -0x4(%rcx,%rax,4),%edx
movslq %edx,%rcx
movsd  -0x8(%r12,%rcx,8),%xmm0
cmp    %rdx,%rax
je     1290 <c_sgesl+0x170>
movsd  -0x8(%r12,%rax,8),%xmm1
movsd  %xmm1,-0x8(%r12,%rcx,8)
movsd  %xmm0,-0x8(%r12,%rax,8)
jmp    1290 <c_sgesl+0x170>
mov    0x8(%rsp),%rax
test   %eax,%eax
jle    1362 <c_sgesl+0x242>
mov    %r13,%r14
mov    %eax,%r15d
lea    -0x1(%rax),%ebp
mov    %esi,%ebx
imul   %ebp,%ebx
lea    (%rax,%rbx,1),%r13d
add    $0xffffffff,%r13d
not    %esi
mov    %esi,0x10(%rsp)
nopw   0x0(%rax,%rax,1)
movslq %r13d,%r13
movslq %ebp,%rbp
movsd  (%r12,%rbp,8),%xmm0
divsd  (%r14,%r13,8),%xmm0
movsd  %xmm0,(%r12,%rbp,8)
xorpd  0xcc0(%rip),%xmm0
movslq %ebx,%rbx
lea    (%r14,%rbx,8),%rsi
mov    %ebp,%edi
mov    %r12,%rdx
call   1040 <c_saxpy@plt>
add    0x10(%rsp),%r13d
sub    (%rsp),%ebx
add    $0xffffffff,%ebp
add    $0xffffffffffffffff,%r15
jne    1320 <c_sgesl+0x200>
add    $0x28,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @c_sgesl(double* %0, i32 %1, i32 %2, i32* %3, double* %4, i32 %5) {
%7 = alloca double*
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32*
%11 = alloca double*
%12 = alloca i32
%13 = alloca i32
%14 = alloca i32
%15 = alloca i32
%16 = alloca i32
%17 = alloca double
store double* %0, double** %7
store i32 %1, i32* %8
store i32 %2, i32* %9
store i32* %3, i32** %10
store double* %4, double** %11
store i32 %5, i32* %12
%18 = load i32, i32* %9
%19 = sub nsw i32 %18, 1
store i32 %19, i32* %16
%20 = load i32, i32* %12
%21 = icmp eq i32 %20, 0
br i1 %21, label %22, label %140
22: ; preds = %6
store i32 1, i32* %13
br label %23
23: ; preds = %84, %22
%24 = load i32, i32* %13
%25 = load i32, i32* %16
%26 = icmp sle i32 %24, %25
br i1 %26, label %27, label %87
27: ; preds = %23
%28 = load i32*, i32** %10
%29 = load i32, i32* %13
%30 = sub nsw i32 %29, 1
%31 = sext i32 %30 to i64
%32 = getelementptr inbounds i32, i32* %28, i64 %31
%33 = load i32, i32* %32
store i32 %33, i32* %15
%34 = load double*, double** %11
%35 = load i32, i32* %15
%36 = sub nsw i32 %35, 1
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds double, double* %34, i64 %37
%39 = load double, double* %38
store double %39, double* %17
%40 = load i32, i32* %15
%41 = load i32, i32* %13
%42 = icmp ne i32 %40, %41
br i1 %42, label %43, label %61
43: ; preds = %27
%44 = load double*, double** %11
%45 = load i32, i32* %13
%46 = sub nsw i32 %45, 1
%47 = sext i32 %46 to i64
%48 = getelementptr inbounds double, double* %44, i64 %47
%49 = load double, double* %48
%50 = load double*, double** %11
%51 = load i32, i32* %15
%52 = sub nsw i32 %51, 1
%53 = sext i32 %52 to i64
%54 = getelementptr inbounds double, double* %50, i64 %53
store double %49, double* %54
%55 = load double, double* %17
%56 = load double*, double** %11
%57 = load i32, i32* %13
%58 = sub nsw i32 %57, 1
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds double, double* %56, i64 %59
store double %55, double* %60
br label %61
61: ; preds = %43, %27
%62 = load i32, i32* %9
%63 = load i32, i32* %13
%64 = sub nsw i32 %62, %63
%65 = load double, double* %17
%66 = load double*, double** %7
%67 = load i32, i32* %13
%68 = add nsw i32 %67, 1
%69 = sub nsw i32 %68, 1
%70 = load i32, i32* %13
%71 = sub nsw i32 %70, 1
%72 = load i32, i32* %8
%73 = mul nsw i32 %71, %72
%74 = add nsw i32 %69, %73
%75 = sext i32 %74 to i64
%76 = getelementptr inbounds double, double* %66, i64 %75
%77 = load double*, double** %11
%78 = load i32, i32* %13
%79 = add nsw i32 %78, 1
%80 = sub nsw i32 %79, 1
%81 = sext i32 %80 to i64
%82 = getelementptr inbounds double, double* %77, i64 %81
%83 = call i32 @c_saxpy(i32 %64, double %65, double* %76, double* %82)
br label %84
84: ; preds = %61
%85 = load i32, i32* %13
%86 = add nsw i32 %85, 1
store i32 %86, i32* %13
br label %23
87: ; preds = %23
store i32 1, i32* %14
br label %88
88: ; preds = %136, %87
%89 = load i32, i32* %14
%90 = load i32, i32* %9
%91 = icmp sle i32 %89, %90
br i1 %91, label %92, label %139
92: ; preds = %88
%93 = load i32, i32* %9
%94 = add nsw i32 %93, 1
%95 = load i32, i32* %14
%96 = sub nsw i32 %94, %95
store i32 %96, i32* %13
%97 = load double*, double** %7
%98 = load i32, i32* %13
%99 = sub nsw i32 %98, 1
%100 = load i32, i32* %13
%101 = sub nsw i32 %100, 1
%102 = load i32, i32* %8
%103 = mul nsw i32 %101, %102
%104 = add nsw i32 %99, %103
%105 = sext i32 %104 to i64
%106 = getelementptr inbounds double, double* %97, i64 %105
%107 = load double, double* %106
%108 = load double*, double** %11
%109 = load i32, i32* %13
%110 = sub nsw i32 %109, 1
%111 = sext i32 %110 to i64
%112 = getelementptr inbounds double, double* %108, i64 %111
%113 = load double, double* %112
%114 = fdiv double %113, %107
store double %114, double* %112
%115 = load double*, double** %11
%116 = load i32, i32* %13
%117 = sub nsw i32 %116, 1
%118 = sext i32 %117 to i64
%119 = getelementptr inbounds double, double* %115, i64 %118
%120 = load double, double* %119
%121 = fneg double %120
store double %121, double* %17
%122 = load i32, i32* %13
%123 = sub nsw i32 %122, 1
%124 = load double, double* %17
%125 = load double*, double** %7
%126 = load i32, i32* %13
%127 = sub nsw i32 %126, 1
%128 = load i32, i32* %8
%129 = mul nsw i32 %127, %128
%130 = add nsw i32 0, %129
%131 = sext i32 %130 to i64
%132 = getelementptr inbounds double, double* %125, i64 %131
%133 = load double*, double** %11
%134 = getelementptr inbounds double, double* %133, i64 0
%135 = call i32 @c_saxpy(i32 %123, double %124, double* %132, double* %134)
br label %136
136: ; preds = %92
%137 = load i32, i32* %14
%138 = add nsw i32 %137, 1
store i32 %138, i32* %14
br label %88
139: ; preds = %88
br label %262
140: ; preds = %6
store i32 1, i32* %13
br label %141
141: ; preds = %184, %140
%142 = load i32, i32* %13
%143 = load i32, i32* %9
%144 = icmp sle i32 %142, %143
br i1 %144, label %145, label %187
145: ; preds = %141
%146 = load i32, i32* %13
%147 = sub nsw i32 %146, 1
%148 = load double*, double** %7
%149 = load i32, i32* %13
%150 = sub nsw i32 %149, 1
%151 = load i32, i32* %8
%152 = mul nsw i32 %150, %151
%153 = add nsw i32 0, %152
%154 = sext i32 %153 to i64
%155 = getelementptr inbounds double, double* %148, i64 %154
%156 = load double*, double** %11
%157 = getelementptr inbounds double, double* %156, i64 0
%158 = call double @c_sdot(i32 %147, double* %155, double* %157)
store double %158, double* %17
%159 = load double*, double** %11
%160 = load i32, i32* %13
%161 = sub nsw i32 %160, 1
%162 = sext i32 %161 to i64
%163 = getelementptr inbounds double, double* %159, i64 %162
%164 = load double, double* %163
%165 = load double, double* %17
%166 = fsub double %164, %165
%167 = load double*, double** %7
%168 = load i32, i32* %13
%169 = sub nsw i32 %168, 1
%170 = load i32, i32* %13
%171 = sub nsw i32 %170, 1
%172 = load i32, i32* %8
%173 = mul nsw i32 %171, %172
%174 = add nsw i32 %169, %173
%175 = sext i32 %174 to i64
%176 = getelementptr inbounds double, double* %167, i64 %175
%177 = load double, double* %176
%178 = fdiv double %166, %177
%179 = load double*, double** %11
%180 = load i32, i32* %13
%181 = sub nsw i32 %180, 1
%182 = sext i32 %181 to i64
%183 = getelementptr inbounds double, double* %179, i64 %182
store double %178, double* %183
br label %184
184: ; preds = %145
%185 = load i32, i32* %13
%186 = add nsw i32 %185, 1
store i32 %186, i32* %13
br label %141
187: ; preds = %141
store i32 1, i32* %14
br label %188
188: ; preds = %258, %187
%189 = load i32, i32* %14
%190 = load i32, i32* %16
%191 = icmp sle i32 %189, %190
br i1 %191, label %192, label %261
192: ; preds = %188
%193 = load i32, i32* %9
%194 = load i32, i32* %14
%195 = sub nsw i32 %193, %194
store i32 %195, i32* %13
%196 = load i32, i32* %9
%197 = load i32, i32* %13
%198 = sub nsw i32 %196, %197
%199 = load double*, double** %7
%200 = load i32, i32* %13
%201 = add nsw i32 %200, 1
%202 = sub nsw i32 %201, 1
%203 = load i32, i32* %13
%204 = sub nsw i32 %203, 1
%205 = load i32, i32* %8
%206 = mul nsw i32 %204, %205
%207 = add nsw i32 %202, %206
%208 = sext i32 %207 to i64
%209 = getelementptr inbounds double, double* %199, i64 %208
%210 = load double*, double** %11
%211 = load i32, i32* %13
%212 = add nsw i32 %211, 1
%213 = sub nsw i32 %212, 1
%214 = sext i32 %213 to i64
%215 = getelementptr inbounds double, double* %210, i64 %214
%216 = call double @c_sdot(i32 %198, double* %209, double* %215)
%217 = load double*, double** %11
%218 = load i32, i32* %13
%219 = sub nsw i32 %218, 1
%220 = sext i32 %219 to i64
%221 = getelementptr inbounds double, double* %217, i64 %220
%222 = load double, double* %221
%223 = fadd double %222, %216
store double %223, double* %221
%224 = load i32*, i32** %10
%225 = load i32, i32* %13
%226 = sub nsw i32 %225, 1
%227 = sext i32 %226 to i64
%228 = getelementptr inbounds i32, i32* %224, i64 %227
%229 = load i32, i32* %228
store i32 %229, i32* %15
%230 = load i32, i32* %15
%231 = load i32, i32* %13
%232 = icmp ne i32 %230, %231
br i1 %232, label %233, label %257
233: ; preds = %192
%234 = load double*, double** %11
%235 = load i32, i32* %15
%236 = sub nsw i32 %235, 1
%237 = sext i32 %236 to i64
%238 = getelementptr inbounds double, double* %234, i64 %237
%239 = load double, double* %238
store double %239, double* %17
%240 = load double*, double** %11
%241 = load i32, i32* %13
%242 = sub nsw i32 %241, 1
%243 = sext i32 %242 to i64
%244 = getelementptr inbounds double, double* %240, i64 %243
%245 = load double, double* %244
%246 = load double*, double** %11
%247 = load i32, i32* %15
%248 = sub nsw i32 %247, 1
%249 = sext i32 %248 to i64
%250 = getelementptr inbounds double, double* %246, i64 %249
store double %245, double* %250
%251 = load double, double* %17
%252 = load double*, double** %11
%253 = load i32, i32* %13
%254 = sub nsw i32 %253, 1
%255 = sext i32 %254 to i64
%256 = getelementptr inbounds double, double* %252, i64 %255
store double %251, double* %256
br label %257
257: ; preds = %233, %192
br label %258
258: ; preds = %257
%259 = load i32, i32* %14
%260 = add nsw i32 %259, 1
store i32 %260, i32* %14
br label %188
261: ; preds = %188
br label %262
262: ; preds = %261, %139
ret void
}

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