#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 */
float fabs(float);
void sprstm(float sa[], unsigned long ija[], float sb[], unsigned long ijb[],
            float thresh, unsigned long nmax, float sc[], unsigned long ijc[]) {
  void nrerror(char error_text[]);
  unsigned long i, ijma, ijmb, j, k, ma, mb, mbb;
  float sum;
  if (ija[1] != ijb[1])
    nrerror("sprstm: sizes do not match");
  ijc[1] = k = ija[1];
  for (i = 1; i <= ija[1] - 2; i++) {
    for (j = 1; j <= ijb[1] - 2; j++) {
      if (i == j)
        sum = sa[i] * sb[j];
      else
        sum = 0.0e0;
      mb = ijb[j];
      for (ma = ija[i]; ma <= ija[i + 1] - 1; ma++) {
        ijma = ija[ma];
        if (ijma == j)
          sum += sa[ma] * sb[j];
        else {
          while (mb < ijb[j + 1]) {
            ijmb = ijb[mb];
            if (ijmb == i) {
              sum += sa[i] * sb[mb++];
              continue;
            } else if (ijmb < ijma) {
              mb++;
              continue;
            } else if (ijmb == ijma) {
              sum += sa[ma] * sb[mb++];
              continue;
            }
            break;
          }
        }
      }
      for (mbb = mb; mbb <= ijb[j + 1] - 1; mbb++) {
        if (ijb[mbb] == i)
          sum += sa[i] * sb[mbb];
      }
      if (i == j)
        sc[i] = sum;
      else if (fabs(sum) > thresh) {
        if (k > nmax)
          nrerror("sprstm: nmax too small");
        sc[k] = sum;
        ijc[k++] = j;
      }
    }
    ijc[i + 1] = k;
  }
}


x86 assembly (clang, -O0):
<sprstm>:
push   %rbp
mov    %rsp,%rbp
sub    $0x80,%rsp
mov    0x10(%rbp),%rax
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
movss  %xmm0,-0x24(%rbp)
mov    %r8,-0x30(%rbp)
mov    %r9,-0x38(%rbp)
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rax
mov    -0x20(%rbp),%rcx
cmp    0x8(%rcx),%rax
je     116e <sprstm+0x4e>
lea    0xe97(%rip),%rdi
call   1030 <nrerror@plt>
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rcx
mov    %rcx,-0x60(%rbp)
mov    0x10(%rbp),%rax
mov    %rcx,0x8(%rax)
movq   $0x1,-0x40(%rbp)
mov    -0x40(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    0x8(%rcx),%rcx
sub    $0x2,%rcx
cmp    %rcx,%rax
ja     14cf <sprstm+0x3af>
movq   $0x1,-0x58(%rbp)
mov    -0x58(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    0x8(%rcx),%rcx
sub    $0x2,%rcx
cmp    %rcx,%rax
ja     14ad <sprstm+0x38d>
mov    -0x40(%rbp),%rax
cmp    -0x58(%rbp),%rax
jne    11f6 <sprstm+0xd6>
mov    -0x8(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x58(%rbp),%rcx
mulss  (%rax,%rcx,4),%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    11fe <sprstm+0xde>
xorps  %xmm0,%xmm0
movss  %xmm0,-0x7c(%rbp)
mov    -0x20(%rbp),%rax
mov    -0x58(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x70(%rbp)
mov    -0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x68(%rbp)
mov    -0x68(%rbp),%rax
mov    -0x10(%rbp),%rcx
mov    -0x40(%rbp),%rdx
mov    0x8(%rcx,%rdx,8),%rcx
sub    $0x1,%rcx
cmp    %rcx,%rax
ja     1394 <sprstm+0x274>
mov    -0x10(%rbp),%rax
mov    -0x68(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x48(%rbp)
mov    -0x48(%rbp),%rax
cmp    -0x58(%rbp),%rax
jne    128b <sprstm+0x16b>
mov    -0x8(%rbp),%rax
mov    -0x68(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x58(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm2
movss  -0x7c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    137e <sprstm+0x25e>
jmp    1290 <sprstm+0x170>
mov    -0x70(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    -0x58(%rbp),%rdx
cmp    0x8(%rcx,%rdx,8),%rax
jae    1379 <sprstm+0x259>
mov    -0x20(%rbp),%rax
mov    -0x70(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x50(%rbp)
mov    -0x50(%rbp),%rax
cmp    -0x40(%rbp),%rax
jne    1301 <sprstm+0x1e1>
mov    -0x8(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x70(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x70(%rbp)
movss  (%rax,%rcx,4),%xmm2
movss  -0x7c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    1290 <sprstm+0x170>
mov    -0x50(%rbp),%rax
cmp    -0x48(%rbp),%rax
jae    1320 <sprstm+0x200>
mov    -0x70(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x70(%rbp)
jmp    1290 <sprstm+0x170>
mov    -0x50(%rbp),%rax
cmp    -0x48(%rbp),%rax
jne    136a <sprstm+0x24a>
mov    -0x8(%rbp),%rax
mov    -0x68(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x70(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x70(%rbp)
movss  (%rax,%rcx,4),%xmm2
movss  -0x7c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    1290 <sprstm+0x170>
jmp    136f <sprstm+0x24f>
jmp    1374 <sprstm+0x254>
jmp    1379 <sprstm+0x259>
jmp    137e <sprstm+0x25e>
jmp    1383 <sprstm+0x263>
mov    -0x68(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x68(%rbp)
jmp    121e <sprstm+0xfe>
mov    -0x70(%rbp),%rax
mov    %rax,-0x78(%rbp)
mov    -0x78(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    -0x58(%rbp),%rdx
mov    0x8(%rcx,%rdx,8),%rcx
sub    $0x1,%rcx
cmp    %rcx,%rax
ja     1412 <sprstm+0x2f2>
mov    -0x20(%rbp),%rax
mov    -0x78(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
cmp    -0x40(%rbp),%rax
jne    13fc <sprstm+0x2dc>
mov    -0x8(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm0
mov    -0x18(%rbp),%rax
mov    -0x78(%rbp),%rcx
movss  (%rax,%rcx,4),%xmm2
movss  -0x7c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x7c(%rbp)
jmp    1401 <sprstm+0x2e1>
mov    -0x78(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x78(%rbp)
jmp    139c <sprstm+0x27c>
mov    -0x40(%rbp),%rax
cmp    -0x58(%rbp),%rax
jne    1437 <sprstm+0x317>
movss  -0x7c(%rbp),%xmm0
mov    -0x38(%rbp),%rax
mov    -0x40(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
jmp    1497 <sprstm+0x377>
movss  -0x7c(%rbp),%xmm0
call   1040 <fabs@plt>
ucomiss -0x24(%rbp),%xmm0
jbe    1492 <sprstm+0x372>
mov    -0x60(%rbp),%rax
cmp    -0x30(%rbp),%rax
jbe    1465 <sprstm+0x345>
lea    0xbbb(%rip),%rdi
call   1030 <nrerror@plt>
movss  -0x7c(%rbp),%xmm0
mov    -0x38(%rbp),%rax
mov    -0x60(%rbp),%rcx
movss  %xmm0,(%rax,%rcx,4)
mov    -0x58(%rbp),%rdx
mov    0x10(%rbp),%rax
mov    -0x60(%rbp),%rcx
mov    %rcx,%rsi
add    $0x1,%rsi
mov    %rsi,-0x60(%rbp)
mov    %rdx,(%rax,%rcx,8)
jmp    1497 <sprstm+0x377>
jmp    149c <sprstm+0x37c>
mov    -0x58(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x58(%rbp)
jmp    11ab <sprstm+0x8b>
mov    -0x60(%rbp),%rdx
mov    0x10(%rbp),%rax
mov    -0x40(%rbp),%rcx
mov    %rdx,0x8(%rax,%rcx,8)
mov    -0x40(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x40(%rbp)
jmp    118a <sprstm+0x6a>
add    $0x80,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sprstm>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x58,%rsp
mov    %r9,0x28(%rsp)
mov    %r8,0x50(%rsp)
mov    %rcx,%rbx
mov    %rdx,%r12
mov    %rsi,%r13
mov    0x8(%rsi),%rcx
cmp    0x8(%rbx),%rcx
movss  %xmm0,0x1c(%rsp)
mov    %rdi,0x10(%rsp)
je     1161 <sprstm+0x51>
lea    0xec3(%rip),%rdi
call   1030 <nrerror@plt>
mov    0x10(%rsp),%rdi
movss  0x1c(%rsp),%xmm0
mov    0x8(%r13),%rcx
mov    0x90(%rsp),%rax
mov    %rcx,0x8(%rax)
cmpq   $0x2,0x8(%r13)
jne    1183 <sprstm+0x73>
add    $0x58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    $0x1,%r15d
movaps 0xe70(%rip),%xmm2
jmp    11c6 <sprstm+0xb6>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    0x48(%rsp),%rdx
mov    %rdx,%r15
mov    0x8(%rsp),%rcx
mov    0x90(%rsp),%rax
mov    %rcx,(%rax,%rdx,8)
mov    0x8(%r13),%rax
add    $0xfffffffffffffffe,%rax
cmp    %rax,%rdx
ja     1174 <sprstm+0x64>
mov    %rcx,0x8(%rsp)
mov    0x8(%rbx),%rcx
cmp    $0x2,%rcx
jne    11e0 <sprstm+0xd0>
add    $0x1,%r15
mov    %r15,%rdx
jmp    11a8 <sprstm+0x98>
xchg   %ax,%ax
lea    (%rdi,%r15,4),%rdx
lea    0x1(%r15),%rax
mov    %rax,0x48(%rsp)
mov    $0x1,%r9d
mov    %rdx,0x20(%rsp)
jmp    1219 <sprstm+0x109>
nopw   0x0(%rax,%rax,1)
mov    0x28(%rsp),%rax
movss  %xmm3,(%rax,%r15,4)
mov    0x30(%rsp),%rcx
lea    -0x2(%rcx),%rax
cmp    %rax,%r9
ja     11a0 <sprstm+0x90>
mov    %rcx,0x30(%rsp)
mov    %r9,%r14
xorps  %xmm3,%xmm3
cmp    %r9,%r15
jne    1233 <sprstm+0x123>
movss  (%rdx),%xmm3
mulss  (%r12,%r15,4),%xmm3
mov    (%rbx,%r14,8),%rbp
mov    0x0(%r13,%r15,8),%rdx
mov    0x8(%r13,%r15,8),%r10
add    $0xffffffffffffffff,%r10
lea    0x1(%r14),%r9
jmp    1266 <sprstm+0x156>
nopl   0x0(%rax,%rax,1)
movss  (%rdi,%rdx,4),%xmm1
mulss  (%r12,%r14,4),%xmm1
addss  %xmm3,%xmm1
add    $0x1,%rdx
movaps %xmm1,%xmm3
cmp    %r10,%rdx
ja     1320 <sprstm+0x210>
mov    0x0(%r13,%rdx,8),%rax
cmp    %r14,%rax
je     1250 <sprstm+0x140>
mov    (%rbx,%r9,8),%r8
cmp    %r8,%rbp
jae    12f0 <sprstm+0x1e0>
lea    (%rdi,%rdx,4),%r11
movaps %xmm3,%xmm1
mov    %rbp,%rcx
nopl   0x0(%rax)
mov    (%rbx,%rcx,8),%rsi
cmp    %r15,%rsi
je     12b0 <sprstm+0x1a0>
cmp    %rax,%rsi
jae    12c0 <sprstm+0x1b0>
add    $0x1,%rcx
cmp    %r8,%rcx
jb     1290 <sprstm+0x180>
jmp    1300 <sprstm+0x1f0>
nopl   0x0(%rax)
mov    0x20(%rsp),%rbp
jmp    12c5 <sprstm+0x1b5>
nopw   0x0(%rax,%rax,1)
mov    %r11,%rbp
jne    1315 <sprstm+0x205>
movss  0x0(%rbp),%xmm3
mulss  (%r12,%rcx,4),%xmm3
addss  %xmm1,%xmm3
lea    0x1(%rcx),%rbp
cmp    %r8,%rbp
jb     1286 <sprstm+0x176>
add    $0x1,%rcx
mov    %rcx,%rbp
movaps %xmm3,%xmm1
jmp    130b <sprstm+0x1fb>
nopl   0x0(%rax)
movaps %xmm3,%xmm1
jmp    125f <sprstm+0x14f>
nopl   0x0(%rax,%rax,1)
add    $0x1,%rbp
cmp    %rbp,%r8
cmova  %r8,%rbp
mov    0x10(%rsp),%rdi
jmp    125f <sprstm+0x14f>
mov    %rcx,%rbp
jmp    130b <sprstm+0x1fb>
nopw   0x0(%rax,%rax,1)
mov    (%rbx,%r9,8),%rax
add    $0xffffffffffffffff,%rax
cmp    %rax,%rbp
mov    0x20(%rsp),%rdx
jbe    13cd <sprstm+0x2bd>
cmp    %r14,%r15
je     1200 <sprstm+0xf0>
movaps %xmm3,%xmm1
andps  %xmm2,%xmm1
ucomiss %xmm0,%xmm1
jbe    120b <sprstm+0xfb>
mov    0x8(%rsp),%rcx
cmp    0x50(%rsp),%rcx
jbe    1392 <sprstm+0x282>
lea    0xcca(%rip),%rdi
mov    %r9,%rbp
movaps %xmm3,0x30(%rsp)
call   1030 <nrerror@plt>
movaps 0x30(%rsp),%xmm3
mov    %rbp,%r9
mov    0x20(%rsp),%rdx
movaps 0xc7e(%rip),%xmm2
mov    0x8(%rsp),%rcx
mov    0x10(%rsp),%rdi
movss  0x1c(%rsp),%xmm0
mov    0x28(%rsp),%rax
movss  %xmm3,(%rax,%rcx,4)
mov    0x90(%rsp),%rax
mov    %r14,(%rax,%rcx,8)
add    $0x1,%rcx
mov    %rcx,0x8(%rsp)
mov    0x8(%rbx),%rcx
jmp    1210 <sprstm+0x100>
nopw   0x0(%rax,%rax,1)
add    $0x1,%rbp
cmp    %rax,%rbp
ja     1336 <sprstm+0x226>
cmp    %r15,(%rbx,%rbp,8)
jne    13c0 <sprstm+0x2b0>
movss  (%rdx),%xmm1
mulss  (%r12,%rbp,4),%xmm1
addss  %xmm1,%xmm3
jmp    13c0 <sprstm+0x2b0>

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

LLVM IR (-O2):
@.str = [27 x i8] c"sprstm: sizes do not match\00"
@.str.1 = [23 x i8] c"sprstm: nmax too small\00"
define void @sprstm(float* nocapture %0, i64* nocapture %1, float* nocapture %2, i64* nocapture %3, float %4, i64 %5, float* nocapture writeonly %6, i64* nocapture writeonly %7) {
%9 = getelementptr inbounds i64, i64* %1, i64 1
%10 = load i64, i64* %9
%11 = getelementptr inbounds i64, i64* %3, i64 1
%12 = load i64, i64* %11
%13 = icmp eq i64 %10, %12
br i1 %13, label %16, label %14
14: ; preds = %8
tail call void @nrerror(i8* getelementptr inbounds ([27 x i8], [27 x i8]* @.str, i64 0, i64 0))
%15 = load i64, i64* %9
br label %16
16: ; preds = %14, %8
%17 = phi i64 [ %15, %14 ], [ %10, %8 ]
%18 = getelementptr inbounds i64, i64* %7, i64 1
store i64 %17, i64* %18
%19 = load i64, i64* %9
%20 = icmp eq i64 %19, 2
br i1 %20, label %152, label %21
21: ; preds = %16, %145
%22 = phi i64 [ %147, %145 ], [ %17, %16 ]
%23 = phi i64 [ %146, %145 ], [ 1, %16 ]
%24 = load i64, i64* %11
%25 = icmp eq i64 %24, 2
br i1 %25, label %26, label %28
26: ; preds = %21
%27 = add i64 %23, 1
br label %145
28: ; preds = %21
%29 = getelementptr inbounds float, float* %0, i64 %23
%30 = getelementptr inbounds i64, i64* %1, i64 %23
%31 = add i64 %23, 1
%32 = getelementptr inbounds i64, i64* %1, i64 %31
%33 = getelementptr inbounds float, float* %6, i64 %23
%34 = getelementptr inbounds float, float* %2, i64 %23
br label %35
35: ; preds = %28, %140
%36 = phi i64 [ %24, %28 ], [ %141, %140 ]
%37 = phi i64 [ %22, %28 ], [ %142, %140 ]
%38 = phi i64 [ 1, %28 ], [ %52, %140 ]
%39 = icmp eq i64 %23, %38
br i1 %39, label %40, label %44
40: ; preds = %35
%41 = load float, float* %29
%42 = load float, float* %34
%43 = fmul float %41, %42
br label %44
44: ; preds = %35, %40
%45 = phi float [ %43, %40 ], [ 0.000000e+00, %35 ]
%46 = getelementptr inbounds i64, i64* %3, i64 %38
%47 = load i64, i64* %46
%48 = load i64, i64* %30
%49 = load i64, i64* %32
%50 = add i64 %49, -1
%51 = icmp ugt i64 %48, %50
%52 = add i64 %38, 1
br i1 %51, label %56, label %53
53: ; preds = %44
%54 = getelementptr inbounds i64, i64* %3, i64 %52
%55 = getelementptr inbounds float, float* %2, i64 %38
br label %63
56: ; preds = %106, %44
%57 = phi i64 [ %47, %44 ], [ %107, %106 ]
%58 = phi float [ %45, %44 ], [ %108, %106 ]
%59 = getelementptr inbounds i64, i64* %3, i64 %52
%60 = load i64, i64* %59
%61 = add i64 %60, -1
%62 = icmp ugt i64 %57, %61
br i1 %62, label %126, label %111
63: ; preds = %53, %106
%64 = phi float [ %45, %53 ], [ %108, %106 ]
%65 = phi i64 [ %47, %53 ], [ %107, %106 ]
%66 = phi i64 [ %48, %53 ], [ %109, %106 ]
%67 = getelementptr inbounds i64, i64* %1, i64 %66
%68 = load i64, i64* %67
%69 = icmp eq i64 %68, %38
br i1 %69, label %75, label %70
70: ; preds = %63
%71 = load i64, i64* %54
%72 = icmp ult i64 %65, %71
br i1 %72, label %73, label %106
73: ; preds = %70
%74 = getelementptr inbounds float, float* %0, i64 %66
br label %93
75: ; preds = %63
%76 = getelementptr inbounds float, float* %0, i64 %66
%77 = load float, float* %76
%78 = load float, float* %55
%79 = tail call float @llvm.fmuladd.f32(float %77, float %78, float %64)
br label %106
80: ; preds = %93, %98
%81 = phi i64 [ %95, %93 ], [ %99, %98 ]
%82 = getelementptr inbounds i64, i64* %3, i64 %81
%83 = load i64, i64* %82
%84 = icmp eq i64 %83, %23
br i1 %84, label %85, label %96
85: ; preds = %80, %101
%86 = phi float* [ %74, %101 ], [ %29, %80 ]
%87 = load float, float* %86
%88 = getelementptr inbounds float, float* %2, i64 %81
%89 = load float, float* %88
%90 = tail call float @llvm.fmuladd.f32(float %87, float %89, float %94)
%91 = add nuw i64 %81, 1
%92 = icmp ult i64 %91, %71
br i1 %92, label %93, label %106
93: ; preds = %73, %85
%94 = phi float [ %64, %73 ], [ %90, %85 ]
%95 = phi i64 [ %65, %73 ], [ %91, %85 ]
br label %80
96: ; preds = %80
%97 = icmp ult i64 %83, %68
br i1 %97, label %98, label %101
98: ; preds = %96
%99 = add nuw i64 %81, 1
%100 = icmp ult i64 %99, %71
br i1 %100, label %80, label %103
101: ; preds = %96
%102 = icmp eq i64 %83, %68
br i1 %102, label %85, label %106
103: ; preds = %98
%104 = add nuw i64 %95, 1
%105 = call i64 @llvm.umax.i64(i64 %71, i64 %104)
br label %106
106: ; preds = %85, %101, %103, %70, %75
%107 = phi i64 [ %65, %75 ], [ %65, %70 ], [ %105, %103 ], [ %91, %85 ], [ %81, %101 ]
%108 = phi float [ %79, %75 ], [ %64, %70 ], [ %94, %103 ], [ %90, %85 ], [ %94, %101 ]
%109 = add i64 %66, 1
%110 = icmp ugt i64 %109, %50
br i1 %110, label %56, label %63
111: ; preds = %56, %122
%112 = phi float [ %123, %122 ], [ %58, %56 ]
%113 = phi i64 [ %124, %122 ], [ %57, %56 ]
%114 = getelementptr inbounds i64, i64* %3, i64 %113
%115 = load i64, i64* %114
%116 = icmp eq i64 %115, %23
br i1 %116, label %117, label %122
117: ; preds = %111
%118 = load float, float* %29
%119 = getelementptr inbounds float, float* %2, i64 %113
%120 = load float, float* %119
%121 = tail call float @llvm.fmuladd.f32(float %118, float %120, float %112)
br label %122
122: ; preds = %111, %117
%123 = phi float [ %121, %117 ], [ %112, %111 ]
%124 = add i64 %113, 1
%125 = icmp ugt i64 %124, %61
br i1 %125, label %126, label %111
126: ; preds = %122, %56
%127 = phi float [ %58, %56 ], [ %123, %122 ]
br i1 %39, label %128, label %129
128: ; preds = %126
store float %127, float* %33
br label %140
129: ; preds = %126
%130 = tail call float @llvm.fabs.f32(float %127)
%131 = fcmp ogt float %130, %4
br i1 %131, label %132, label %140
132: ; preds = %129
%133 = icmp ugt i64 %37, %5
br i1 %133, label %134, label %135
134: ; preds = %132
tail call void @nrerror(i8* getelementptr inbounds ([23 x i8], [23 x i8]* @.str.1, i64 0, i64 0))
br label %135
135: ; preds = %134, %132
%136 = getelementptr inbounds float, float* %6, i64 %37
store float %127, float* %136
%137 = add i64 %37, 1
%138 = getelementptr inbounds i64, i64* %7, i64 %37
store i64 %38, i64* %138
%139 = load i64, i64* %11
br label %140
140: ; preds = %128, %135, %129
%141 = phi i64 [ %36, %128 ], [ %139, %135 ], [ %36, %129 ]
%142 = phi i64 [ %37, %128 ], [ %137, %135 ], [ %37, %129 ]
%143 = add i64 %141, -2
%144 = icmp ugt i64 %52, %143
br i1 %144, label %145, label %35
145: ; preds = %140, %26
%146 = phi i64 [ %27, %26 ], [ %31, %140 ]
%147 = phi i64 [ %22, %26 ], [ %142, %140 ]
%148 = getelementptr inbounds i64, i64* %7, i64 %146
store i64 %147, i64* %148
%149 = load i64, i64* %9
%150 = add i64 %149, -2
%151 = icmp ugt i64 %146, %150
br i1 %151, label %152, label %21
152: ; preds = %145, %16
ret void
}