#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*/ dstzr(double *, double *, double *, double *);
int /*<<< orphan*/ dzror(int *, double *, double *, double *, double *,
                         unsigned long *, unsigned long *);
double fabs(double);
double fifdmax1(double, double);
double fifdmin1(double, double);
int /*<<< orphan*/ ftnstop(char *);
void E0000(int IENTRY, int *status, double *x, double *fx, unsigned long *qleft,
           unsigned long *qhi, double *zabsst, double *zabsto, double *zbig,
           double *zrelst, double *zrelto, double *zsmall, double *zstpmu) {
  static double absstp, abstol, big, fbig, fsmall, relstp, reltol, small, step,
      stpmul, xhi, xlb, xlo, xsave, xub, yy;
  static int i99999;
  static unsigned long qbdd, qcond, qdum1, qdum2, qincr, qlim, qok, qup;
  switch (IENTRY) {
  case 0:
    goto DINVR;
  case 1:
    goto DSTINV;
  }
DINVR:
  if (*status > 0)
    goto S310;
  qcond = !(int)((small) <= (*x) && (*x) <= (big));
  if (qcond) {
    ftnstop("SMALL,X,BIG nonmonotone in E0000");
    *status = -1;
    return;
  }
  xsave = *x;
  *x = small;
  i99999 = 1;
  goto S300;
S10:
  fsmall = *fx;
  *x = big;
  i99999 = 2;
  goto S300;
S20:
  fbig = *fx;
  qincr = fbig > fsmall;
  if (!qincr)
    goto S50;
  if (fsmall <= 0.0e0)
    goto S30;
  *status = -1;
  *qleft = *qhi = 1;
  return;
S30:
  if (fbig >= 0.0e0)
    goto S40;
  *status = -1;
  *qleft = *qhi = 0;
  return;
S40:
  goto S80;
S50:
  if (fsmall >= 0.0e0)
    goto S60;
  *status = -1;
  *qleft = 1;
  *qhi = 0;
  return;
S60:
  if (fbig <= 0.0e0)
    goto S70;
  *status = -1;
  *qleft = 0;
  *qhi = 1;
  return;
S80:
S70:
  *x = xsave;
  step = fifdmax1(absstp, relstp * fabs(*x));
  i99999 = 3;
  goto S300;
S90:
  yy = *fx;
  if (!(yy == 0.0e0))
    goto S100;
  *status = 0;
  qok = 1;
  return;
S100:
  qup = (qincr && yy < 0.0e0) || (!qincr && yy > 0.0e0);
  if (!qup)
    goto S170;
  xlb = xsave;
  xub = fifdmin1(xlb + step, big);
  goto S120;
S110:
  if (qcond)
    goto S150;
S120:
  *x = xub;
  i99999 = 4;
  goto S300;
S130:
  yy = *fx;
  qbdd = (qincr && yy >= 0.0e0) || (!qincr && yy <= 0.0e0);
  qlim = xub >= big;
  qcond = qbdd || qlim;
  if (qcond)
    goto S140;
  step = stpmul * step;
  xlb = xub;
  xub = fifdmin1(xlb + step, big);
S140:
  goto S110;
S150:
  if (!(qlim && !qbdd))
    goto S160;
  *status = -1;
  *qleft = 0;
  *qhi = !qincr;
  *x = big;
  return;
S160:
  goto S240;
S170:
  xub = xsave;
  xlb = fifdmax1(xub - step, small);
  goto S190;
S180:
  if (qcond)
    goto S220;
S190:
  *x = xlb;
  i99999 = 5;
  goto S300;
S200:
  yy = *fx;
  qbdd = (qincr && yy <= 0.0e0) || (!qincr && yy >= 0.0e0);
  qlim = xlb <= small;
  qcond = qbdd || qlim;
  if (qcond)
    goto S210;
  step = stpmul * step;
  xub = xlb;
  xlb = fifdmax1(xub - step, small);
S210:
  goto S180;
S220:
  if (!(qlim && !qbdd))
    goto S230;
  *status = -1;
  *qleft = 1;
  *qhi = qincr;
  *x = small;
  return;
S240:
S230:
  dstzr(&xlb, &xub, &abstol, &reltol);
  *status = 0;
  goto S260;
S250:
  if (!(*status == 1))
    goto S290;
S260:
  dzror(status, x, fx, &xlo, &xhi, &qdum1, &qdum2);
  if (!(*status == 1))
    goto S280;
  i99999 = 6;
  goto S300;
S280:
S270:
  goto S250;
S290:
  *x = xlo;
  *status = 0;
  return;
DSTINV:
  small = *zsmall;
  big = *zbig;
  absstp = *zabsst;
  relstp = *zrelst;
  stpmul = *zstpmu;
  abstol = *zabsto;
  reltol = *zrelto;
  return;
S300:
  *status = 1;
  return;
S310:
  switch ((int)i99999) {
  case 1:
    goto S10;
  case 2:
    goto S20;
  case 3:
    goto S90;
  case 4:
    goto S130;
  case 5:
    goto S200;
  case 6:
    goto S270;
  default:
    break;
  }
}


x86 assembly (clang, -O0):
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    0x40(%rbp),%rax
mov    0x38(%rbp),%rax
mov    0x30(%rbp),%rax
mov    0x28(%rbp),%rax
mov    0x20(%rbp),%rax
mov    0x18(%rbp),%rax
mov    0x10(%rbp),%rax
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    %r8,-0x28(%rbp)
mov    %r9,-0x30(%rbp)
mov    -0x4(%rbp),%eax
mov    %eax,-0x34(%rbp)
test   %eax,%eax
je     11af <E0000+0x5f>
jmp    119e <E0000+0x4e>
mov    -0x34(%rbp),%eax
sub    $0x1,%eax
je     11b4 <E0000+0x64>
jmp    11b9 <E0000+0x69>
jmp    11be <E0000+0x6e>
jmp    19c5 <E0000+0x875>
jmp    11be <E0000+0x6e>
mov    -0x10(%rbp),%rax
cmpl   $0x0,(%rax)
jle    11d0 <E0000+0x80>
jmp    1a49 <E0000+0x8f9>
movsd  0x2eb0(%rip),%xmm1
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm0
xor    %eax,%eax
ucomisd %xmm1,%xmm0
mov    %al,-0x35(%rbp)
jb     1209 <E0000+0xb9>
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm1
movsd  0x2e61(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
mov    %al,-0x35(%rbp)
mov    -0x35(%rbp),%al
xor    $0xff,%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2ec4(%rip)
cmpq   $0x0,0x2ebc(%rip)
je     1245 <E0000+0xf5>
lea    0xdf7(%rip),%rdi
call   1070 <ftnstop@plt>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
jmp    1a98 <E0000+0x948>
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2e63(%rip)
movsd  0x2e2b(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x1,0x2e61(%rip)
jmp    1a3a <E0000+0x8ea>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2dec(%rip)
movsd  0x2dd4(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x2,0x2e32(%rip)
jmp    1a3a <E0000+0x8ea>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2db5(%rip)
movsd  0x2dad(%rip),%xmm0
ucomisd 0x2dad(%rip),%xmm0
seta   %al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2e24(%rip)
cmpq   $0x0,0x2e1c(%rip)
jne    12e7 <E0000+0x197>
jmp    1366 <E0000+0x216>
xorps  %xmm0,%xmm0
ucomisd 0x2d7e(%rip),%xmm0
jb     12fd <E0000+0x1ad>
jmp    1322 <E0000+0x1d2>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x30(%rbp),%rax
movq   $0x1,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x1,(%rax)
jmp    1a98 <E0000+0x948>
movsd  0x2d3e(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     133c <E0000+0x1ec>
jmp    1361 <E0000+0x211>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x30(%rbp),%rax
movq   $0x0,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x0,(%rax)
jmp    1a98 <E0000+0x948>
jmp    13e0 <E0000+0x290>
movsd  0x2d02(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jb     1380 <E0000+0x230>
jmp    13a5 <E0000+0x255>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x1,(%rax)
mov    -0x30(%rbp),%rax
movq   $0x0,(%rax)
jmp    1a98 <E0000+0x948>
xorps  %xmm0,%xmm0
ucomisd 0x2cb8(%rip),%xmm0
jb     13bb <E0000+0x26b>
jmp    13e5 <E0000+0x295>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x0,(%rax)
mov    -0x30(%rbp),%rax
movq   $0x1,(%rax)
jmp    1a98 <E0000+0x948>
jmp    13e5 <E0000+0x295>
movsd  0x2ccb(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  0x2c53(%rip),%xmm0
movsd  0x2c73(%rip),%xmm1
mov    -0x18(%rbp),%rax
movsd  (%rax),%xmm2
movaps 0xbec(%rip),%xmm3
pand   %xmm3,%xmm2
mulsd  %xmm2,%xmm1
call   1060 <fifdmax1@plt>
movsd  %xmm0,0x2c67(%rip)
movl   $0x3,0x2c9d(%rip)
jmp    1a3a <E0000+0x8ea>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2c80(%rip)
movsd  0x2c78(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1468 <E0000+0x318>
jp     1468 <E0000+0x318>
jmp    146d <E0000+0x31d>
jmp    1487 <E0000+0x337>
mov    -0x10(%rbp),%rax
movl   $0x0,(%rax)
movq   $0x1,0x2c86(%rip)
jmp    1a98 <E0000+0x948>
cmpq   $0x0,0x2c69(%rip)
je     14ab <E0000+0x35b>
mov    $0x1,%al
xorps  %xmm0,%xmm0
ucomisd 0x2c26(%rip),%xmm0
mov    %al,-0x36(%rbp)
ja     14d9 <E0000+0x389>
xor    %eax,%eax
cmpq   $0x0,0x2c43(%rip)
mov    %al,-0x37(%rbp)
jne    14d3 <E0000+0x383>
movsd  0x2c02(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
seta   %al
mov    %al,-0x37(%rbp)
mov    -0x37(%rbp),%al
mov    %al,-0x36(%rbp)
mov    -0x36(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2c26(%rip)
cmpq   $0x0,0x2c1e(%rip)
jne    14fd <E0000+0x3ad>
jmp    1705 <E0000+0x5b5>
movsd  0x2bb3(%rip),%xmm0
movsd  %xmm0,0x2b9b(%rip)
movsd  0x2b93(%rip),%xmm0
addsd  0x2b73(%rip),%xmm0
movsd  0x2b3b(%rip),%xmm1
call   1050 <fifdmin1@plt>
movsd  %xmm0,0x2b8e(%rip)
jmp    154f <E0000+0x3ff>
cmpq   $0x0,0x2ba1(%rip)
je     154a <E0000+0x3fa>
jmp    1699 <E0000+0x549>
jmp    154f <E0000+0x3ff>
movsd  0x2b69(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x4,0x2b67(%rip)
jmp    1a3a <E0000+0x8ea>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2b4a(%rip)
cmpq   $0x0,0x2b72(%rip)
je     15a6 <E0000+0x456>
movsd  0x2b34(%rip),%xmm0
mov    $0x1,%al
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
mov    %al,-0x38(%rbp)
jae    15d0 <E0000+0x480>
xor    %eax,%eax
cmpq   $0x0,0x2b48(%rip)
mov    %al,-0x39(%rbp)
jne    15ca <E0000+0x47a>
xorps  %xmm0,%xmm0
ucomisd 0x2b04(%rip),%xmm0
setae  %al
mov    %al,-0x39(%rbp)
mov    -0x39(%rbp),%al
mov    %al,-0x38(%rbp)
mov    -0x38(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2af7(%rip)
movsd  0x2ad7(%rip),%xmm0
ucomisd 0x2a6f(%rip),%xmm0
setae  %al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2afe(%rip)
mov    $0x1,%al
cmpq   $0x0,0x2acc(%rip)
mov    %al,-0x3a(%rbp)
jne    1623 <E0000+0x4d3>
cmpq   $0x0,0x2ae3(%rip)
setne  %al
mov    %al,-0x3a(%rbp)
mov    -0x3a(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x2aac(%rip)
cmpq   $0x0,0x2aa4(%rip)
je     1647 <E0000+0x4f7>
jmp    1694 <E0000+0x544>
movsd  0x2a49(%rip),%xmm0
mulsd  0x2a39(%rip),%xmm0
movsd  %xmm0,0x2a31(%rip)
movsd  0x2a59(%rip),%xmm0
movsd  %xmm0,0x2a39(%rip)
movsd  0x2a31(%rip),%xmm0
addsd  0x2a11(%rip),%xmm0
movsd  0x29d9(%rip),%xmm1
call   1050 <fifdmin1@plt>
movsd  %xmm0,0x2a2c(%rip)
jmp    1537 <E0000+0x3e7>
cmpq   $0x0,0x2a5f(%rip)
je     16b5 <E0000+0x565>
cmpq   $0x0,0x2a29(%rip)
je     16ba <E0000+0x56a>
jmp    1700 <E0000+0x5b0>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x0,(%rax)
cmpq   $0x0,0x2a21(%rip)
setne  %al
xor    $0xff,%al
and    $0x1,%al
movzbl %al,%eax
movslq %eax,%rcx
mov    -0x30(%rbp),%rax
mov    %rcx,(%rax)
movsd  0x296d(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
jmp    1a98 <E0000+0x948>
jmp    18fe <E0000+0x7ae>
movsd  0x29ab(%rip),%xmm0
movsd  %xmm0,0x29ab(%rip)
movsd  0x29a3(%rip),%xmm0
subsd  0x296b(%rip),%xmm0
movsd  0x295b(%rip),%xmm1
call   1060 <fifdmax1@plt>
movsd  %xmm0,0x296e(%rip)
jmp    1757 <E0000+0x607>
cmpq   $0x0,0x2999(%rip)
je     1752 <E0000+0x602>
jmp    18a5 <E0000+0x755>
jmp    1757 <E0000+0x607>
movsd  0x2949(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x5,0x295f(%rip)
jmp    1a3a <E0000+0x8ea>
mov    -0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2942(%rip)
cmpq   $0x0,0x296a(%rip)
je     17aa <E0000+0x65a>
mov    $0x1,%al
xorps  %xmm0,%xmm0
ucomisd 0x2927(%rip),%xmm0
mov    %al,-0x3b(%rbp)
jae    17d8 <E0000+0x688>
xor    %eax,%eax
cmpq   $0x0,0x2944(%rip)
mov    %al,-0x3c(%rbp)
jne    17d2 <E0000+0x682>
movsd  0x2903(%rip),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
setae  %al
mov    %al,-0x3c(%rbp)
mov    -0x3c(%rbp),%al
mov    %al,-0x3b(%rbp)
mov    -0x3b(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x28ef(%rip)
movsd  0x28b7(%rip),%xmm1
movsd  0x288f(%rip),%xmm0
ucomisd %xmm1,%xmm0
setae  %al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x28f2(%rip)
mov    $0x1,%al
cmpq   $0x0,0x28c0(%rip)
mov    %al,-0x3d(%rbp)
jne    182f <E0000+0x6df>
cmpq   $0x0,0x28d7(%rip)
setne  %al
mov    %al,-0x3d(%rbp)
mov    -0x3d(%rbp),%al
and    $0x1,%al
movzbl %al,%eax
cltq
mov    %rax,0x28a0(%rip)
cmpq   $0x0,0x2898(%rip)
je     1853 <E0000+0x703>
jmp    18a0 <E0000+0x750>
movsd  0x283d(%rip),%xmm0
mulsd  0x282d(%rip),%xmm0
movsd  %xmm0,0x2825(%rip)
movsd  0x2835(%rip),%xmm0
movsd  %xmm0,0x2845(%rip)
movsd  0x283d(%rip),%xmm0
subsd  0x2805(%rip),%xmm0
movsd  0x27f5(%rip),%xmm1
call   1060 <fifdmax1@plt>
movsd  %xmm0,0x2808(%rip)
jmp    173f <E0000+0x5ef>
cmpq   $0x0,0x2853(%rip)
je     18c1 <E0000+0x771>
cmpq   $0x0,0x281d(%rip)
je     18c6 <E0000+0x776>
jmp    1903 <E0000+0x7b3>
mov    -0x10(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x28(%rbp),%rax
movq   $0x1,(%rax)
mov    0x2816(%rip),%rcx
mov    -0x30(%rbp),%rax
mov    %rcx,(%rax)
movsd  0x2797(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
jmp    1a98 <E0000+0x948>
jmp    1903 <E0000+0x7b3>
lea    0x279e(%rip),%rdi
lea    0x27af(%rip),%rsi
lea    0x2740(%rip),%rdx
lea    0x2761(%rip),%rcx
call   1040 <dstzr@plt>
mov    -0x10(%rbp),%rax
movl   $0x0,(%rax)
jmp    194a <E0000+0x7fa>
mov    -0x10(%rbp),%rax
cmpl   $0x1,(%rax)
je     1945 <E0000+0x7f5>
jmp    19a6 <E0000+0x856>
jmp    194a <E0000+0x7fa>
mov    -0x10(%rbp),%rdi
mov    -0x18(%rbp),%rsi
mov    -0x20(%rbp),%rdx
lea    0x2753(%rip),%rcx
lea    0x273c(%rip),%r8
lea    0x277d(%rip),%r9
lea    0x277e(%rip),%rax
mov    %rax,(%rsp)
call   1030 <dzror@plt>
mov    -0x10(%rbp),%rax
cmpl   $0x1,(%rax)
je     198d <E0000+0x83d>
jmp    199c <E0000+0x84c>
movl   $0x6,0x2739(%rip)
jmp    1a3a <E0000+0x8ea>
jmp    19a1 <E0000+0x851>
jmp    1933 <E0000+0x7e3>
movsd  0x2702(%rip),%xmm0
mov    -0x18(%rbp),%rax
movsd  %xmm0,(%rax)
mov    -0x10(%rbp),%rax
movl   $0x0,(%rax)
jmp    1a98 <E0000+0x948>
mov    0x38(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x26b3(%rip)
mov    0x20(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x267b(%rip)
mov    0x10(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x265b(%rip)
mov    0x28(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2673(%rip)
mov    0x40(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2683(%rip)
mov    0x18(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x2633(%rip)
mov    0x30(%rbp),%rax
movsd  (%rax),%xmm0
movsd  %xmm0,0x264b(%rip)
jmp    1a98 <E0000+0x948>
mov    -0x10(%rbp),%rax
movl   $0x1,(%rax)
jmp    1a98 <E0000+0x948>
mov    0x2681(%rip),%eax
add    $0xffffffff,%eax
mov    %eax,%ecx
mov    %rcx,-0x48(%rbp)
sub    $0x5,%eax
ja     1a93 <E0000+0x943>
mov    -0x48(%rbp),%rax
lea    0x5a4(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
jmp    1274 <E0000+0x124>
jmp    12a3 <E0000+0x153>
jmp    1438 <E0000+0x2e8>
jmp    156e <E0000+0x41e>
jmp    1776 <E0000+0x626>
jmp    19a1 <E0000+0x851>
jmp    1a98 <E0000+0x948>
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x10,%rsp
cmp    $0x1,%edi
jne    11df <E0000+0x8f>
mov    0x70(%rsp),%rax
mov    0x68(%rsp),%rcx
mov    0x60(%rsp),%r8
mov    0x58(%rsp),%rsi
mov    0x50(%rsp),%rdi
mov    0x48(%rsp),%rbx
mov    0x40(%rsp),%rdx
movsd  (%rcx),%xmm0
movsd  %xmm0,0x2eef(%rip)
movsd  (%rdi),%xmm0
movsd  %xmm0,0x2ec3(%rip)
movsd  (%rdx),%xmm0
movsd  %xmm0,0x2ea7(%rip)
movsd  (%rsi),%xmm0
movsd  %xmm0,0x2ebb(%rip)
movsd  (%rax),%xmm0
movsd  %xmm0,0x2ecf(%rip)
movsd  (%rbx),%xmm0
movsd  %xmm0,0x2e8b(%rip)
movsd  (%r8),%xmm0
movsd  %xmm0,0x2e9e(%rip)
jmp    16b9 <E0000+0x569>
mov    %rdx,%r14
mov    %rsi,%r13
mov    (%rsi),%eax
test   %eax,%eax
jle    1239 <E0000+0xe9>
mov    %rcx,%rbx
mov    0x2ecc(%rip),%ecx
add    $0xffffffff,%ecx
cmp    $0x5,%ecx
ja     16b9 <E0000+0x569>
mov    %r9,%r15
mov    %r8,%r12
lea    0xe03(%rip),%rdx
movslq (%rdx,%rcx,4),%rcx
add    %rdx,%rcx
jmp    *%rcx
movsd  (%rbx),%xmm0
movsd  %xmm0,0x2e46(%rip)
movsd  0x2e36(%rip),%xmm0
movsd  %xmm0,(%r14)
mov    $0x2,%eax
jmp    16ab <E0000+0x55b>
movsd  0x2e3f(%rip),%xmm0
movsd  (%r14),%xmm1
ucomisd %xmm0,%xmm1
setb   %al
movsd  0x2e0b(%rip),%xmm2
ucomisd %xmm1,%xmm2
setb   %cl
or     %al,%cl
movzbl %cl,%eax
mov    %rax,0x2e68(%rip)
cmp    $0x1,%al
jne    1285 <E0000+0x135>
lea    0xdb5(%rip),%rdi
call   1070 <ftnstop@plt>
movl   $0xffffffff,0x0(%r13)
ff
jmp    16b9 <E0000+0x569>
movsd  %xmm1,0x2e23(%rip)
movsd  %xmm0,(%r14)
mov    $0x1,%eax
jmp    16ab <E0000+0x55b>
movsd  (%rbx),%xmm0
movsd  0x2dc0(%rip),%xmm1
xor    %eax,%eax
ucomisd %xmm1,%xmm0
seta   %al
mov    %rax,0x2e30(%rip)
xorpd  %xmm2,%xmm2
jbe    156b <E0000+0x41b>
ucomisd %xmm1,%xmm2
jae    15fa <E0000+0x4aa>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x1,(%r15)
movq   $0x1,(%r12)
jmp    16b9 <E0000+0x569>
movsd  (%rbx),%xmm0
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    1591 <E0000+0x441>
jp     1591 <E0000+0x441>
movl   $0x0,0x0(%r13)
jmp    16b9 <E0000+0x569>
movsd  (%rbx),%xmm0
xorpd  %xmm1,%xmm1
xor    %edx,%edx
ucomisd %xmm1,%xmm0
setae  %dl
xor    %eax,%eax
ucomisd %xmm0,%xmm1
setae  %al
cmpq   $0x0,0x2db9(%rip)
cmove  %eax,%edx
movzbl %dl,%esi
mov    %rsi,0x2d8c(%rip)
movsd  0x2d74(%rip),%xmm2
movsd  0x2d14(%rip),%xmm1
xor    %ecx,%ecx
ucomisd %xmm1,%xmm2
setae  %cl
mov    %rcx,0x2d94(%rip)
mov    %ecx,%eax
or     %dl,%al
movzbl %al,%eax
mov    %rax,0x2d66(%rip)
test   %al,%al
jne    13bb <E0000+0x26b>
movsd  0x2d1a(%rip),%xmm0
mulsd  0x2d0a(%rip),%xmm0
movsd  %xmm0,0x2d02(%rip)
movsd  %xmm2,0x2d12(%rip)
addsd  %xmm2,%xmm0
call   1060 <fifdmin1@plt>
movsd  %xmm0,0x2d19(%rip)
cmpq   $0x0,0x2d29(%rip)
je     15eb <E0000+0x49b>
mov    0x2d3c(%rip),%rcx
mov    0x2d0d(%rip),%rsi
test   %rcx,%rcx
je     14ea <E0000+0x39a>
test   %rsi,%rsi
jne    14ea <E0000+0x39a>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x0,(%r12)
xor    %eax,%eax
cmpq   $0x0,0x2d01(%rip)
sete   %al
mov    %rax,(%r15)
movsd  0x2c6b(%rip),%xmm0
movsd  %xmm0,(%r14)
jmp    16b9 <E0000+0x569>
movsd  (%rbx),%xmm0
xorpd  %xmm1,%xmm1
xor    %edx,%edx
ucomisd %xmm0,%xmm1
setae  %dl
xor    %eax,%eax
ucomisd %xmm1,%xmm0
setae  %al
cmpq   $0x0,0x2cc7(%rip)
cmove  %eax,%edx
movzbl %dl,%esi
mov    %rsi,0x2c9a(%rip)
movsd  0x2c6a(%rip),%xmm0
movsd  0x2c42(%rip),%xmm1
xor    %ecx,%ecx
ucomisd %xmm0,%xmm1
setae  %cl
mov    %rcx,0x2ca2(%rip)
mov    %ecx,%eax
or     %dl,%al
movzbl %al,%eax
mov    %rax,0x2c74(%rip)
test   %al,%al
jne    14ad <E0000+0x35d>
movsd  0x2c28(%rip),%xmm2
mulsd  0x2c18(%rip),%xmm2
movsd  %xmm2,0x2c10(%rip)
movsd  %xmm0,0x2c38(%rip)
subsd  %xmm2,%xmm0
call   1050 <fifdmax1@plt>
movsd  %xmm0,0x2c0f(%rip)
cmpq   $0x0,0x2c37(%rip)
je     16a1 <E0000+0x551>
mov    0x2c4a(%rip),%rcx
mov    0x2c1b(%rip),%rsi
test   %rcx,%rcx
je     14ea <E0000+0x39a>
test   %rsi,%rsi
jne    14ea <E0000+0x39a>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x1,(%r12)
mov    0x2c1a(%rip),%rax
mov    %rax,(%r15)
movsd  0x2ba7(%rip),%xmm0
movsd  %xmm0,(%r14)
jmp    16b9 <E0000+0x569>
cmp    $0x1,%eax
je     1513 <E0000+0x3c3>
jmp    1551 <E0000+0x401>
lea    0x2baf(%rip),%rdi
lea    0x2bc0(%rip),%rsi
lea    0x2b59(%rip),%rdx
lea    0x2b72(%rip),%rcx
call   1040 <dstzr@plt>
movl   $0x0,0x0(%r13)
lea    0x2bc6(%rip),%rax
mov    %rax,(%rsp)
lea    0x2b83(%rip),%rcx
lea    0x2b6c(%rip),%r8
lea    0x2ba5(%rip),%r9
mov    %r13,%rdi
mov    %r14,%rsi
mov    %rbx,%rdx
call   1030 <dzror@plt>
mov    $0x6,%eax
cmpl   $0x1,0x0(%r13)
je     16ab <E0000+0x55b>
movsd  0x2b4f(%rip),%xmm0
movsd  %xmm0,(%r14)
movl   $0x0,0x0(%r13)
jmp    16b9 <E0000+0x569>
ucomisd %xmm2,%xmm1
jae    161c <E0000+0x4cc>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x1,(%r12)
movq   $0x0,(%r15)
jmp    16b9 <E0000+0x569>
mov    0x2b50(%rip),%rax
test   %rax,%rax
je     15a7 <E0000+0x457>
xorpd  %xmm1,%xmm1
ucomisd %xmm0,%xmm1
ja     15be <E0000+0x46e>
test   %rax,%rax
jne    1674 <E0000+0x524>
xorpd  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jbe    1674 <E0000+0x524>
movsd  0x2aea(%rip),%xmm0
movsd  %xmm0,0x2ad2(%rip)
addsd  0x2ab2(%rip),%xmm0
movsd  0x2a82(%rip),%xmm1
call   1060 <fifdmin1@plt>
movsd  %xmm0,0x2acd(%rip)
movsd  %xmm0,(%r14)
mov    $0x4,%eax
jmp    16ab <E0000+0x55b>
ucomisd %xmm2,%xmm0
jae    163b <E0000+0x4eb>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x0,(%r15)
movq   $0x0,(%r12)
jmp    16b9 <E0000+0x569>
ucomisd %xmm0,%xmm2
jae    163b <E0000+0x4eb>
movl   $0xffffffff,0x0(%r13)
ff
movq   $0x0,(%r12)
movq   $0x1,(%r15)
jmp    16b9 <E0000+0x569>
movsd  0x2a6d(%rip),%xmm1
movsd  %xmm1,(%r14)
movsd  0x2a00(%rip),%xmm0
andpd  0x9a8(%rip),%xmm1
mulsd  0x2a10(%rip),%xmm1
call   1050 <fifdmax1@plt>
movsd  %xmm0,0x2a1b(%rip)
mov    $0x3,%eax
jmp    16ab <E0000+0x55b>
movsd  0x2a34(%rip),%xmm0
movsd  %xmm0,0x2a34(%rip)
subsd  0x29fc(%rip),%xmm0
movsd  0x29ec(%rip),%xmm1
call   1050 <fifdmax1@plt>
movsd  %xmm0,0x29ff(%rip)
movsd  %xmm0,(%r14)
mov    $0x5,%eax
mov    %eax,0x2a0f(%rip)
movl   $0x1,0x0(%r13)
add    $0x10,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@E0000.absstp = internal global double 0.000000e+00
@E0000.abstol = internal global double 0.000000e+00
@E0000.big = internal global double 0.000000e+00
@E0000.fbig = internal global double 0.000000e+00
@E0000.fsmall = internal global double 0.000000e+00
@E0000.relstp = internal global double 0.000000e+00
@E0000.reltol = internal global double 0.000000e+00
@E0000.small = internal global double 0.000000e+00
@E0000.step = internal global double 0.000000e+00
@E0000.stpmul = internal global double 0.000000e+00
@E0000.xhi = internal global double 0.000000e+00
@E0000.xlb = internal global double 0.000000e+00
@E0000.xlo = internal global double 0.000000e+00
@E0000.xsave = internal global double 0.000000e+00
@E0000.xub = internal global double 0.000000e+00
@E0000.yy = internal global double 0.000000e+00
@E0000.i99999 = internal global i32 0
@E0000.qbdd = internal global i64 0
@E0000.qcond = internal global i64 0
@E0000.qdum1 = internal global i64 0
@E0000.qdum2 = internal global i64 0
@E0000.qincr = internal global i64 0
@E0000.qlim = internal global i64 0
@E0000.qok = internal global i64 0
@E0000.qup = internal global i64 0
@.str = [33 x i8] c"SMALL,X,BIG nonmonotone in E0000\00"
define void @E0000(i32 %0, i32* %1, double* %2, double* %3, i64* %4, i64* %5, double* %6, double* %7, double* %8, double* %9, double* %10, double* %11, double* %12) {
%14 = alloca i32
%15 = alloca i32*
%16 = alloca double*
%17 = alloca double*
%18 = alloca i64*
%19 = alloca i64*
%20 = alloca double*
%21 = alloca double*
%22 = alloca double*
%23 = alloca double*
%24 = alloca double*
%25 = alloca double*
%26 = alloca double*
store i32 %0, i32* %14
store i32* %1, i32** %15
store double* %2, double** %16
store double* %3, double** %17
store i64* %4, i64** %18
store i64* %5, i64** %19
store double* %6, double** %20
store double* %7, double** %21
store double* %8, double** %22
store double* %9, double** %23
store double* %10, double** %24
store double* %11, double** %25
store double* %12, double** %26
%27 = load i32, i32* %14
switch i32 %27, label %30 [
i32 0, label %28
i32 1, label %29
]
28: ; preds = %13
br label %31
29: ; preds = %13
br label %335
30: ; preds = %13
br label %31
31: ; preds = %30, %28
%32 = load i32*, i32** %15
%33 = load i32, i32* %32
%34 = icmp sgt i32 %33, 0
br i1 %34, label %35, label %36
35: ; preds = %31
br label %352
36: ; preds = %31
%37 = load double, double* @E0000.small
%38 = load double*, double** %16
%39 = load double, double* %38
%40 = fcmp ole double %37, %39
br i1 %40, label %41, label %46
41: ; preds = %36
%42 = load double*, double** %16
%43 = load double, double* %42
%44 = load double, double* @E0000.big
%45 = fcmp ole double %43, %44
br label %46
46: ; preds = %41, %36
%47 = phi i1 [ false, %36 ], [ %45, %41 ]
%48 = xor i1 %47, true
%49 = zext i1 %48 to i32
%50 = sext i32 %49 to i64
store i64 %50, i64* @E0000.qcond
%51 = load i64, i64* @E0000.qcond
%52 = icmp ne i64 %51, 0
br i1 %52, label %53, label %56
53: ; preds = %46
%54 = call i32 @ftnstop(i8* getelementptr inbounds ([33 x i8], [33 x i8]* @.str, i64 0, i64 0))
%55 = load i32*, i32** %15
store i32 -1, i32* %55
br label %361
56: ; preds = %46
%57 = load double*, double** %16
%58 = load double, double* %57
store double %58, double* @E0000.xsave
%59 = load double, double* @E0000.small
%60 = load double*, double** %16
store double %59, double* %60
store i32 1, i32* @E0000.i99999
br label %350
61: ; preds = %354
%62 = load double*, double** %17
%63 = load double, double* %62
store double %63, double* @E0000.fsmall
%64 = load double, double* @E0000.big
%65 = load double*, double** %16
store double %64, double* %65
store i32 2, i32* @E0000.i99999
br label %350
66: ; preds = %355
%67 = load double*, double** %17
%68 = load double, double* %67
store double %68, double* @E0000.fbig
%69 = load double, double* @E0000.fbig
%70 = load double, double* @E0000.fsmall
%71 = fcmp ogt double %69, %70
%72 = zext i1 %71 to i32
%73 = sext i32 %72 to i64
store i64 %73, i64* @E0000.qincr
%74 = load i64, i64* @E0000.qincr
%75 = icmp ne i64 %74, 0
br i1 %75, label %77, label %76
76: ; preds = %66
br label %94
77: ; preds = %66
%78 = load double, double* @E0000.fsmall
%79 = fcmp ole double %78, 0.000000e+00
br i1 %79, label %80, label %81
80: ; preds = %77
br label %85
81: ; preds = %77
%82 = load i32*, i32** %15
store i32 -1, i32* %82
%83 = load i64*, i64** %19
store i64 1, i64* %83
%84 = load i64*, i64** %18
store i64 1, i64* %84
br label %361
85: ; preds = %80
%86 = load double, double* @E0000.fbig
%87 = fcmp oge double %86, 0.000000e+00
br i1 %87, label %88, label %89
88: ; preds = %85
br label %93
89: ; preds = %85
%90 = load i32*, i32** %15
store i32 -1, i32* %90
%91 = load i64*, i64** %19
store i64 0, i64* %91
%92 = load i64*, i64** %18
store i64 0, i64* %92
br label %361
93: ; preds = %88
br label %110
94: ; preds = %76
%95 = load double, double* @E0000.fsmall
%96 = fcmp oge double %95, 0.000000e+00
br i1 %96, label %97, label %98
97: ; preds = %94
br label %102
98: ; preds = %94
%99 = load i32*, i32** %15
store i32 -1, i32* %99
%100 = load i64*, i64** %18
store i64 1, i64* %100
%101 = load i64*, i64** %19
store i64 0, i64* %101
br label %361
102: ; preds = %97
%103 = load double, double* @E0000.fbig
%104 = fcmp ole double %103, 0.000000e+00
br i1 %104, label %105, label %106
105: ; preds = %102
br label %111
106: ; preds = %102
%107 = load i32*, i32** %15
store i32 -1, i32* %107
%108 = load i64*, i64** %18
store i64 0, i64* %108
%109 = load i64*, i64** %19
store i64 1, i64* %109
br label %361
110: ; preds = %93
br label %111
111: ; preds = %110, %105
%112 = load double, double* @E0000.xsave
%113 = load double*, double** %16
store double %112, double* %113
%114 = load double, double* @E0000.absstp
%115 = load double, double* @E0000.relstp
%116 = load double*, double** %16
%117 = load double, double* %116
%118 = call double @llvm.fabs.f64(double %117)
%119 = fmul double %115, %118
%120 = call double @fifdmax1(double %114, double %119)
store double %120, double* @E0000.step
store i32 3, i32* @E0000.i99999
br label %350
121: ; preds = %356
%122 = load double*, double** %17
%123 = load double, double* %122
store double %123, double* @E0000.yy
%124 = load double, double* @E0000.yy
%125 = fcmp oeq double %124, 0.000000e+00
br i1 %125, label %127, label %126
126: ; preds = %121
br label %129
127: ; preds = %121
%128 = load i32*, i32** %15
store i32 0, i32* %128
store i64 1, i64* @E0000.qok
br label %361
129: ; preds = %126
%130 = load i64, i64* @E0000.qincr
%131 = icmp ne i64 %130, 0
br i1 %131, label %132, label %135
132: ; preds = %129
%133 = load double, double* @E0000.yy
%134 = fcmp olt double %133, 0.000000e+00
br i1 %134, label %143, label %135
135: ; preds = %132, %129
%136 = load i64, i64* @E0000.qincr
%137 = icmp ne i64 %136, 0
br i1 %137, label %141, label %138
138: ; preds = %135
%139 = load double, double* @E0000.yy
%140 = fcmp ogt double %139, 0.000000e+00
br label %141
141: ; preds = %138, %135
%142 = phi i1 [ false, %135 ], [ %140, %138 ]
br label %143
143: ; preds = %141, %132
%144 = phi i1 [ true, %132 ], [ %142, %141 ]
%145 = zext i1 %144 to i32
%146 = sext i32 %145 to i64
store i64 %146, i64* @E0000.qup
%147 = load i64, i64* @E0000.qup
%148 = icmp ne i64 %147, 0
br i1 %148, label %150, label %149
149: ; preds = %143
br label %232
150: ; preds = %143
%151 = load double, double* @E0000.xsave
store double %151, double* @E0000.xlb
%152 = load double, double* @E0000.xlb
%153 = load double, double* @E0000.step
%154 = fadd double %152, %153
%155 = load double, double* @E0000.big
%156 = call double @fifdmin1(double %154, double %155)
store double %156, double* @E0000.xub
br label %162
157: ; preds = %212
%158 = load i64, i64* @E0000.qcond
%159 = icmp ne i64 %158, 0
br i1 %159, label %160, label %161
160: ; preds = %157
br label %213
161: ; preds = %157
br label %162
162: ; preds = %161, %150
%163 = load double, double* @E0000.xub
%164 = load double*, double** %16
store double %163, double* %164
store i32 4, i32* @E0000.i99999
br label %350
165: ; preds = %357
%166 = load double*, double** %17
%167 = load double, double* %166
store double %167, double* @E0000.yy
%168 = load i64, i64* @E0000.qincr
%169 = icmp ne i64 %168, 0
br i1 %169, label %170, label %173
170: ; preds = %165
%171 = load double, double* @E0000.yy
%172 = fcmp oge double %171, 0.000000e+00
br i1 %172, label %181, label %173
173: ; preds = %170, %165
%174 = load i64, i64* @E0000.qincr
%175 = icmp ne i64 %174, 0
br i1 %175, label %179, label %176
176: ; preds = %173
%177 = load double, double* @E0000.yy
%178 = fcmp ole double %177, 0.000000e+00
br label %179
179: ; preds = %176, %173
%180 = phi i1 [ false, %173 ], [ %178, %176 ]
br label %181
181: ; preds = %179, %170
%182 = phi i1 [ true, %170 ], [ %180, %179 ]
%183 = zext i1 %182 to i32
%184 = sext i32 %183 to i64
store i64 %184, i64* @E0000.qbdd
%185 = load double, double* @E0000.xub
%186 = load double, double* @E0000.big
%187 = fcmp oge double %185, %186
%188 = zext i1 %187 to i32
%189 = sext i32 %188 to i64
store i64 %189, i64* @E0000.qlim
%190 = load i64, i64* @E0000.qbdd
%191 = icmp ne i64 %190, 0
br i1 %191, label %195, label %192
192: ; preds = %181
%193 = load i64, i64* @E0000.qlim
%194 = icmp ne i64 %193, 0
br label %195
195: ; preds = %192, %181
%196 = phi i1 [ true, %181 ], [ %194, %192 ]
%197 = zext i1 %196 to i32
%198 = sext i32 %197 to i64
store i64 %198, i64* @E0000.qcond
%199 = load i64, i64* @E0000.qcond
%200 = icmp ne i64 %199, 0
br i1 %200, label %201, label %202
201: ; preds = %195
br label %212
202: ; preds = %195
%203 = load double, double* @E0000.stpmul
%204 = load double, double* @E0000.step
%205 = fmul double %203, %204
store double %205, double* @E0000.step
%206 = load double, double* @E0000.xub
store double %206, double* @E0000.xlb
%207 = load double, double* @E0000.xlb
%208 = load double, double* @E0000.step
%209 = fadd double %207, %208
%210 = load double, double* @E0000.big
%211 = call double @fifdmin1(double %209, double %210)
store double %211, double* @E0000.xub
br label %212
212: ; preds = %202, %201
br label %157
213: ; preds = %160
%214 = load i64, i64* @E0000.qlim
%215 = icmp ne i64 %214, 0
br i1 %215, label %216, label %219
216: ; preds = %213
%217 = load i64, i64* @E0000.qbdd
%218 = icmp ne i64 %217, 0
br i1 %218, label %219, label %220
219: ; preds = %216, %213
br label %231
220: ; preds = %216
%221 = load i32*, i32** %15
store i32 -1, i32* %221
%222 = load i64*, i64** %18
store i64 0, i64* %222
%223 = load i64, i64* @E0000.qincr
%224 = icmp ne i64 %223, 0
%225 = xor i1 %224, true
%226 = zext i1 %225 to i32
%227 = sext i32 %226 to i64
%228 = load i64*, i64** %19
store i64 %227, i64* %228
%229 = load double, double* @E0000.big
%230 = load double*, double** %16
store double %229, double* %230
br label %361
231: ; preds = %219
br label %309
232: ; preds = %149
%233 = load double, double* @E0000.xsave
store double %233, double* @E0000.xub
%234 = load double, double* @E0000.xub
%235 = load double, double* @E0000.step
%236 = fsub double %234, %235
%237 = load double, double* @E0000.small
%238 = call double @fifdmax1(double %236, double %237)
store double %238, double* @E0000.xlb
br label %244
239: ; preds = %294
%240 = load i64, i64* @E0000.qcond
%241 = icmp ne i64 %240, 0
br i1 %241, label %242, label %243
242: ; preds = %239
br label %295
243: ; preds = %239
br label %244
244: ; preds = %243, %232
%245 = load double, double* @E0000.xlb
%246 = load double*, double** %16
store double %245, double* %246
store i32 5, i32* @E0000.i99999
br label %350
247: ; preds = %358
%248 = load double*, double** %17
%249 = load double, double* %248
store double %249, double* @E0000.yy
%250 = load i64, i64* @E0000.qincr
%251 = icmp ne i64 %250, 0
br i1 %251, label %252, label %255
252: ; preds = %247
%253 = load double, double* @E0000.yy
%254 = fcmp ole double %253, 0.000000e+00
br i1 %254, label %263, label %255
255: ; preds = %252, %247
%256 = load i64, i64* @E0000.qincr
%257 = icmp ne i64 %256, 0
br i1 %257, label %261, label %258
258: ; preds = %255
%259 = load double, double* @E0000.yy
%260 = fcmp oge double %259, 0.000000e+00
br label %261
261: ; preds = %258, %255
%262 = phi i1 [ false, %255 ], [ %260, %258 ]
br label %263
263: ; preds = %261, %252
%264 = phi i1 [ true, %252 ], [ %262, %261 ]
%265 = zext i1 %264 to i32
%266 = sext i32 %265 to i64
store i64 %266, i64* @E0000.qbdd
%267 = load double, double* @E0000.xlb
%268 = load double, double* @E0000.small
%269 = fcmp ole double %267, %268
%270 = zext i1 %269 to i32
%271 = sext i32 %270 to i64
store i64 %271, i64* @E0000.qlim
%272 = load i64, i64* @E0000.qbdd
%273 = icmp ne i64 %272, 0
br i1 %273, label %277, label %274
274: ; preds = %263
%275 = load i64, i64* @E0000.qlim
%276 = icmp ne i64 %275, 0
br label %277
277: ; preds = %274, %263
%278 = phi i1 [ true, %263 ], [ %276, %274 ]
%279 = zext i1 %278 to i32
%280 = sext i32 %279 to i64
store i64 %280, i64* @E0000.qcond
%281 = load i64, i64* @E0000.qcond
%282 = icmp ne i64 %281, 0
br i1 %282, label %283, label %284
283: ; preds = %277
br label %294
284: ; preds = %277
%285 = load double, double* @E0000.stpmul
%286 = load double, double* @E0000.step
%287 = fmul double %285, %286
store double %287, double* @E0000.step
%288 = load double, double* @E0000.xlb
store double %288, double* @E0000.xub
%289 = load double, double* @E0000.xub
%290 = load double, double* @E0000.step
%291 = fsub double %289, %290
%292 = load double, double* @E0000.small
%293 = call double @fifdmax1(double %291, double %292)
store double %293, double* @E0000.xlb
br label %294
294: ; preds = %284, %283
br label %239
295: ; preds = %242
%296 = load i64, i64* @E0000.qlim
%297 = icmp ne i64 %296, 0
br i1 %297, label %298, label %301
298: ; preds = %295
%299 = load i64, i64* @E0000.qbdd
%300 = icmp ne i64 %299, 0
br i1 %300, label %301, label %302
301: ; preds = %298, %295
br label %310
302: ; preds = %298
%303 = load i32*, i32** %15
store i32 -1, i32* %303
%304 = load i64*, i64** %18
store i64 1, i64* %304
%305 = load i64, i64* @E0000.qincr
%306 = load i64*, i64** %19
store i64 %305, i64* %306
%307 = load double, double* @E0000.small
%308 = load double*, double** %16
store double %307, double* %308
br label %361
309: ; preds = %231
br label %310
310: ; preds = %309, %301
%311 = call i32 @dstzr(double* @E0000.xlb, double* @E0000.xub, double* @E0000.abstol, double* @E0000.reltol)
%312 = load i32*, i32** %15
store i32 0, i32* %312
br label %319
313: ; preds = %330
%314 = load i32*, i32** %15
%315 = load i32, i32* %314
%316 = icmp eq i32 %315, 1
br i1 %316, label %318, label %317
317: ; preds = %313
br label %331
318: ; preds = %313
br label %319
319: ; preds = %318, %310
%320 = load i32*, i32** %15
%321 = load double*, double** %16
%322 = load double*, double** %17
%323 = call i32 @dzror(i32* %320, double* %321, double* %322, double* @E0000.xlo, double* @E0000.xhi, i64* @E0000.qdum1, i64* @E0000.qdum2)
%324 = load i32*, i32** %15
%325 = load i32, i32* %324
%326 = icmp eq i32 %325, 1
br i1 %326, label %328, label %327
327: ; preds = %319
br label %329
328: ; preds = %319
store i32 6, i32* @E0000.i99999
br label %350
329: ; preds = %327
br label %330
330: ; preds = %359, %329
br label %313
331: ; preds = %317
%332 = load double, double* @E0000.xlo
%333 = load double*, double** %16
store double %332, double* %333
%334 = load i32*, i32** %15
store i32 0, i32* %334
br label %361
335: ; preds = %29
%336 = load double*, double** %25
%337 = load double, double* %336
store double %337, double* @E0000.small
%338 = load double*, double** %22
%339 = load double, double* %338
store double %339, double* @E0000.big
%340 = load double*, double** %20
%341 = load double, double* %340
store double %341, double* @E0000.absstp
%342 = load double*, double** %23
%343 = load double, double* %342
store double %343, double* @E0000.relstp
%344 = load double*, double** %26
%345 = load double, double* %344
store double %345, double* @E0000.stpmul
%346 = load double*, double** %21
%347 = load double, double* %346
store double %347, double* @E0000.abstol
%348 = load double*, double** %24
%349 = load double, double* %348
store double %349, double* @E0000.reltol
br label %361
350: ; preds = %328, %244, %162, %111, %61, %56
%351 = load i32*, i32** %15
store i32 1, i32* %351
br label %361
352: ; preds = %35
%353 = load i32, i32* @E0000.i99999
switch i32 %353, label %360 [
i32 1, label %354
i32 2, label %355
i32 3, label %356
i32 4, label %357
i32 5, label %358
i32 6, label %359
]
354: ; preds = %352
br label %61
355: ; preds = %352
br label %66
356: ; preds = %352
br label %121
357: ; preds = %352
br label %165
358: ; preds = %352
br label %247
359: ; preds = %352
br label %330
360: ; preds = %352
br label %361
361: ; preds = %53, %81, %89, %98, %106, %127, %220, %302, %331, %335, %350, %360
ret void
}

LLVM IR (-O2):
@E0000.absstp = internal unnamed_addr global double 0.000000e+00
@E0000.abstol = internal global double 0.000000e+00
@E0000.big = internal unnamed_addr global double 0.000000e+00
@E0000.fsmall = internal unnamed_addr global double 0.000000e+00
@E0000.relstp = internal unnamed_addr global double 0.000000e+00
@E0000.reltol = internal global double 0.000000e+00
@E0000.small = internal unnamed_addr global double 0.000000e+00
@E0000.step = internal unnamed_addr global double 0.000000e+00
@E0000.stpmul = internal unnamed_addr global double 0.000000e+00
@E0000.xhi = internal global double 0.000000e+00
@E0000.xlb = internal global double 0.000000e+00
@E0000.xlo = internal global double 0.000000e+00
@E0000.xsave = internal unnamed_addr global double 0.000000e+00
@E0000.xub = internal global double 0.000000e+00
@E0000.i99999 = internal unnamed_addr global i32 0
@E0000.qbdd = internal unnamed_addr global i64 0
@E0000.qcond = internal unnamed_addr global i64 0
@E0000.qdum1 = internal global i64 0
@E0000.qdum2 = internal global i64 0
@E0000.qincr = internal unnamed_addr global i64 0
@E0000.qlim = internal unnamed_addr global i64 0
@.str = [33 x i8] c"SMALL,X,BIG nonmonotone in E0000\00"
define void @E0000(i32 %0, i32* %1, double* %2, double* %3, i64* nocapture writeonly %4, i64* nocapture writeonly %5, double* nocapture %6, double* nocapture %7, double* nocapture %8, double* nocapture %9, double* nocapture %10, double* nocapture %11, double* nocapture %12) {
%14 = icmp eq i32 %0, 1
br i1 %14, label %126, label %15
15: ; preds = %13
%16 = load i32, i32* %1
%17 = icmp sgt i32 %16, 0
br i1 %17, label %136, label %18
18: ; preds = %15
%19 = load double, double* @E0000.small
%20 = load double, double* %2
%21 = fcmp ugt double %19, %20
%22 = load double, double* @E0000.big
%23 = fcmp ugt double %20, %22
%24 = select i1 %21, i1 true, i1 %23
%25 = zext i1 %24 to i64
store i64 %25, i64* @E0000.qcond
br i1 %24, label %26, label %28
26: ; preds = %18
%27 = tail call i32 @ftnstop(i8* getelementptr inbounds ([33 x i8], [33 x i8]* @.str, i64 0, i64 0))
store i32 -1, i32* %1
br label %177
28: ; preds = %18
store double %20, double* @E0000.xsave
store double %19, double* %2
br label %134
29: ; preds = %141
%30 = fcmp ugt double %143, 0.000000e+00
br i1 %30, label %31, label %32
31: ; preds = %29
store i32 -1, i32* %1
store i64 1, i64* %5
store i64 1, i64* %4
br label %177
32: ; preds = %29
%33 = fcmp ult double %142, 0.000000e+00
br i1 %33, label %34, label %41
34: ; preds = %32
store i32 -1, i32* %1
store i64 0, i64* %5
store i64 0, i64* %4
br label %177
35: ; preds = %141
%36 = fcmp ult double %143, 0.000000e+00
br i1 %36, label %37, label %38
37: ; preds = %35
store i32 -1, i32* %1
store i64 1, i64* %4
store i64 0, i64* %5
br label %177
38: ; preds = %35
%39 = fcmp ugt double %142, 0.000000e+00
br i1 %39, label %40, label %41
40: ; preds = %38
store i32 -1, i32* %1
store i64 0, i64* %4
store i64 1, i64* %5
br label %177
41: ; preds = %32, %38
%42 = load double, double* @E0000.xsave
store double %42, double* %2
%43 = load double, double* @E0000.absstp
%44 = load double, double* @E0000.relstp
%45 = tail call double @llvm.fabs.f64(double %42)
%46 = fmul double %45, %44
%47 = tail call double @fifdmax1(double %43, double %46)
store double %47, double* @E0000.step
br label %134
48: ; preds = %146
store i32 0, i32* %1
br label %177
49: ; preds = %146
%50 = load i64, i64* @E0000.qincr
%51 = icmp ne i64 %50, 0
%52 = fcmp olt double %147, 0.000000e+00
%53 = select i1 %51, i1 %52, i1 false
br i1 %53, label %58, label %54
54: ; preds = %49
%55 = fcmp ogt double %147, 0.000000e+00
%56 = xor i1 %51, true
%57 = select i1 %56, i1 %55, i1 false
br i1 %57, label %58, label %88
58: ; preds = %49, %54
%59 = load double, double* @E0000.xsave
store double %59, double* @E0000.xlb
%60 = load double, double* @E0000.step
%61 = fadd double %59, %60
%62 = load double, double* @E0000.big
%63 = tail call double @fifdmin1(double %61, double %62)
store double %63, double* @E0000.xub
br label %64
64: ; preds = %66, %58
%65 = phi double [ %71, %66 ], [ %63, %58 ]
store double %65, double* %2
br label %134
66: ; preds = %149
%67 = load double, double* @E0000.stpmul
%68 = load double, double* @E0000.step
%69 = fmul double %67, %68
store double %69, double* @E0000.step
store double %157, double* @E0000.xlb
%70 = fadd double %157, %69
%71 = tail call double @fifdmin1(double %70, double %158)
store double %71, double* @E0000.xub
%72 = load i64, i64* @E0000.qcond
%73 = icmp eq i64 %72, 0
br i1 %73, label %64, label %74
74: ; preds = %66
%75 = load i64, i64* @E0000.qlim
%76 = load i64, i64* @E0000.qbdd
br label %77
77: ; preds = %74, %149
%78 = phi i64 [ %76, %74 ], [ %156, %149 ]
%79 = phi i64 [ %75, %74 ], [ %160, %149 ]
%80 = icmp eq i64 %79, 0
%81 = icmp ne i64 %78, 0
%82 = select i1 %80, i1 true, i1 %81
br i1 %82, label %116, label %83
83: ; preds = %77
store i32 -1, i32* %1
store i64 0, i64* %4
%84 = load i64, i64* @E0000.qincr
%85 = icmp eq i64 %84, 0
%86 = zext i1 %85 to i64
store i64 %86, i64* %5
%87 = load double, double* @E0000.big
store double %87, double* %2
br label %177
88: ; preds = %54
%89 = load double, double* @E0000.xsave
store double %89, double* @E0000.xub
%90 = load double, double* @E0000.step
%91 = fsub double %89, %90
%92 = load double, double* @E0000.small
%93 = tail call double @fifdmax1(double %91, double %92)
store double %93, double* @E0000.xlb
br label %94
94: ; preds = %96, %88
%95 = phi double [ %101, %96 ], [ %93, %88 ]
store double %95, double* %2
br label %134
96: ; preds = %163
%97 = load double, double* @E0000.stpmul
%98 = load double, double* @E0000.step
%99 = fmul double %97, %98
store double %99, double* @E0000.step
store double %171, double* @E0000.xub
%100 = fsub double %171, %99
%101 = tail call double @fifdmax1(double %100, double %172)
store double %101, double* @E0000.xlb
%102 = load i64, i64* @E0000.qcond
%103 = icmp eq i64 %102, 0
br i1 %103, label %94, label %104
104: ; preds = %96
%105 = load i64, i64* @E0000.qlim
%106 = load i64, i64* @E0000.qbdd
br label %107
107: ; preds = %104, %163
%108 = phi i64 [ %106, %104 ], [ %170, %163 ]
%109 = phi i64 [ %105, %104 ], [ %174, %163 ]
%110 = icmp eq i64 %109, 0
%111 = icmp ne i64 %108, 0
%112 = select i1 %110, i1 true, i1 %111
br i1 %112, label %116, label %113
113: ; preds = %107
store i32 -1, i32* %1
store i64 1, i64* %4
%114 = load i64, i64* @E0000.qincr
store i64 %114, i64* %5
%115 = load double, double* @E0000.small
store double %115, double* %2
br label %177
116: ; preds = %77, %107
%117 = tail call i32 @dstzr(double* @E0000.xlb, double* @E0000.xub, double* @E0000.abstol, double* @E0000.reltol)
store i32 0, i32* %1
br label %118
118: ; preds = %122, %116
%119 = tail call i32 @dzror(i32* %1, double* %2, double* %3, double* @E0000.xlo, double* @E0000.xhi, i64* @E0000.qdum1, i64* @E0000.qdum2)
%120 = load i32, i32* %1
%121 = icmp eq i32 %120, 1
br i1 %121, label %134, label %124
122: ; preds = %136
%123 = icmp eq i32 %16, 1
br i1 %123, label %118, label %124
124: ; preds = %118, %122
%125 = load double, double* @E0000.xlo
store double %125, double* %2
store i32 0, i32* %1
br label %177
126: ; preds = %13
%127 = load double, double* %11
store double %127, double* @E0000.small
%128 = load double, double* %8
store double %128, double* @E0000.big
%129 = load double, double* %6
store double %129, double* @E0000.absstp
%130 = load double, double* %9
store double %130, double* @E0000.relstp
%131 = load double, double* %12
store double %131, double* @E0000.stpmul
%132 = load double, double* %7
store double %132, double* @E0000.abstol
%133 = load double, double* %10
store double %133, double* @E0000.reltol
br label %177
134: ; preds = %118, %94, %64, %41, %138, %28
%135 = phi i32 [ 5, %94 ], [ 4, %64 ], [ 3, %41 ], [ 2, %138 ], [ 1, %28 ], [ 6, %118 ]
store i32 %135, i32* @E0000.i99999
store i32 1, i32* %1
br label %177
136: ; preds = %15
%137 = load i32, i32* @E0000.i99999
switch i32 %137, label %177 [
i32 1, label %138
i32 2, label %141
i32 3, label %146
i32 4, label %149
i32 5, label %163
i32 6, label %122
]
138: ; preds = %136
%139 = load double, double* %3
store double %139, double* @E0000.fsmall
%140 = load double, double* @E0000.big
store double %140, double* %2
br label %134
141: ; preds = %136
%142 = load double, double* %3
%143 = load double, double* @E0000.fsmall
%144 = fcmp ogt double %142, %143
%145 = zext i1 %144 to i64
store i64 %145, i64* @E0000.qincr
br i1 %144, label %29, label %35
146: ; preds = %136
%147 = load double, double* %3
%148 = fcmp oeq double %147, 0.000000e+00
br i1 %148, label %48, label %49
149: ; preds = %136
%150 = load double, double* %3
%151 = load i64, i64* @E0000.qincr
%152 = icmp eq i64 %151, 0
%153 = fcmp oge double %150, 0.000000e+00
%154 = fcmp ole double %150, 0.000000e+00
%155 = select i1 %152, i1 %154, i1 %153
%156 = zext i1 %155 to i64
store i64 %156, i64* @E0000.qbdd
%157 = load double, double* @E0000.xub
%158 = load double, double* @E0000.big
%159 = fcmp oge double %157, %158
%160 = zext i1 %159 to i64
store i64 %160, i64* @E0000.qlim
%161 = select i1 %155, i1 true, i1 %159
%162 = zext i1 %161 to i64
store i64 %162, i64* @E0000.qcond
br i1 %161, label %77, label %66
163: ; preds = %136
%164 = load double, double* %3
%165 = load i64, i64* @E0000.qincr
%166 = icmp eq i64 %165, 0
%167 = fcmp ole double %164, 0.000000e+00
%168 = fcmp oge double %164, 0.000000e+00
%169 = select i1 %166, i1 %168, i1 %167
%170 = zext i1 %169 to i64
store i64 %170, i64* @E0000.qbdd
%171 = load double, double* @E0000.xlb
%172 = load double, double* @E0000.small
%173 = fcmp ole double %171, %172
%174 = zext i1 %173 to i64
store i64 %174, i64* @E0000.qlim
%175 = select i1 %169, i1 true, i1 %173
%176 = zext i1 %175 to i64
store i64 %176, i64* @E0000.qcond
br i1 %175, label %107, label %96
177: ; preds = %136, %26, %31, %34, %37, %40, %48, %83, %113, %124, %126, %134
ret void
}