#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double ell_int(double);
scalar_t__ scd(double, double, double, double *, double *, double *);
double sqrt(int);
int sn_i(double u, double v, double K, double k, double *sn_re, double *sn_im,
         double *dsn_redu, double *dsn_redv, double *dsn_imdu,
         double *dsn_imdv) {
  double s, c, d, s1, c1, d1;
  double kk, KK, nom;
  if (scd(u, K, k, &s, &c, &d))
    return 1;
  kk = sqrt(1 - k * k);
  KK = ell_int(kk);
  if (scd(v, KK, kk, &s1, &c1, &d1))
    return 1;
  nom = 1 - d * d * s1 * s1;
  (*sn_re) = s * d1 / nom;
  (*sn_im) = c * d * s1 * c1 / nom;
  if (dsn_redu != NULL)
    (*dsn_redu) = c * d * d1 / nom -
                  2 * (k * k) * c * d * (s * s) * d1 * (s1 * s1) / (nom * nom);
  if (dsn_imdu != NULL)
    (*dsn_imdu) =
        -(d * d) * s * c1 * s1 / nom - (k * k) * (c * c) * s * c1 * s1 / nom -
        2 * (k * k) * (c * c) * (d * d) * s * c1 * (s1 * s1 * s1) / (nom * nom);
  if (dsn_redv != NULL)
    (*dsn_redv) = 2 * (d * d) * s * c1 * (d1 * d1) * s1 / (nom * nom) -
                  (kk * kk) * s * c1 * s1 / nom;
  if (dsn_imdv != NULL)
    (*dsn_imdv) =
        -c * d * d1 * (s1 * s1) / nom + c * d * (c1 * c1) * d1 / nom +
        2 * c * (d * d * d) * (c1 * c1) * d1 * (s1 * s1) / (nom * nom);
  return 0;
}


x86 assembly (clang, -O0):
<sn_i>:
push   %rbp
mov    %rsp,%rbp
sub    $0xa0,%rsp
movsd  %xmm0,-0x10(%rbp)
movsd  %xmm1,-0x18(%rbp)
movsd  %xmm2,-0x20(%rbp)
movsd  %xmm3,-0x28(%rbp)
mov    %rdi,-0x30(%rbp)
mov    %rsi,-0x38(%rbp)
mov    %rdx,-0x40(%rbp)
mov    %rcx,-0x48(%rbp)
mov    %r8,-0x50(%rbp)
mov    %r9,-0x58(%rbp)
movsd  -0x10(%rbp),%xmm0
movsd  -0x20(%rbp),%xmm1
movsd  -0x28(%rbp),%xmm2
lea    -0x60(%rbp),%rdi
lea    -0x68(%rbp),%rsi
lea    -0x70(%rbp),%rdx
call   1030 <scd@plt>
cmp    $0x0,%rax
je     119d <sn_i+0x6d>
movl   $0x1,-0x4(%rbp)
jmp    1591 <sn_i+0x461>
movsd  -0x28(%rbp),%xmm0
movsd  -0x28(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm1,%xmm0
movsd  0xe36(%rip),%xmm1
addsd  %xmm1,%xmm0
cvttsd2si %xmm0,%edi
call   1050 <sqrt@plt>
movsd  %xmm0,-0x90(%rbp)
ff
movsd  -0x90(%rbp),%xmm0
ff
call   1040 <ell_int@plt>
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x18(%rbp),%xmm0
movsd  -0x98(%rbp),%xmm1
movsd  -0x90(%rbp),%xmm2
ff
lea    -0x78(%rbp),%rdi
lea    -0x80(%rbp),%rsi
lea    -0x88(%rbp),%rdx
call   1030 <scd@plt>
cmp    $0x0,%rax
je     1233 <sn_i+0x103>
movl   $0x1,-0x4(%rbp)
jmp    1591 <sn_i+0x461>
movsd  -0x70(%rbp),%xmm0
mulsd  -0x70(%rbp),%xmm0
mulsd  -0x78(%rbp),%xmm0
movsd  -0x78(%rbp),%xmm1
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  %xmm1,%xmm0
movsd  0xd96(%rip),%xmm1
addsd  %xmm1,%xmm0
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x60(%rbp),%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
divsd  -0xa0(%rbp),%xmm0
ff
mov    -0x30(%rbp),%rax
movsd  %xmm0,(%rax)
movsd  -0x68(%rbp),%xmm0
mulsd  -0x70(%rbp),%xmm0
mulsd  -0x78(%rbp),%xmm0
mulsd  -0x80(%rbp),%xmm0
divsd  -0xa0(%rbp),%xmm0
ff
mov    -0x38(%rbp),%rax
movsd  %xmm0,(%rax)
cmpq   $0x0,-0x40(%rbp)
je     1340 <sn_i+0x210>
movsd  -0x68(%rbp),%xmm0
mulsd  -0x70(%rbp),%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
divsd  -0xa0(%rbp),%xmm0
ff
movsd  -0x28(%rbp),%xmm2
mulsd  -0x28(%rbp),%xmm2
movsd  0xd1a(%rip),%xmm1
mulsd  %xmm2,%xmm1
mulsd  -0x68(%rbp),%xmm1
mulsd  -0x70(%rbp),%xmm1
movsd  -0x60(%rbp),%xmm2
mulsd  -0x60(%rbp),%xmm2
mulsd  %xmm2,%xmm1
mulsd  -0x88(%rbp),%xmm1
ff
movsd  -0x78(%rbp),%xmm2
mulsd  -0x78(%rbp),%xmm2
mulsd  %xmm2,%xmm1
movsd  -0xa0(%rbp),%xmm2
ff
mulsd  -0xa0(%rbp),%xmm2
ff
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
mov    -0x40(%rbp),%rax
movsd  %xmm0,(%rax)
cmpq   $0x0,-0x50(%rbp)
je     1425 <sn_i+0x2f5>
movsd  -0x70(%rbp),%xmm0
mulsd  -0x70(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  -0x60(%rbp),%xmm0
mulsd  -0x80(%rbp),%xmm0
mulsd  -0x78(%rbp),%xmm0
divsd  -0xa0(%rbp),%xmm0
ff
movsd  -0x28(%rbp),%xmm1
mulsd  -0x28(%rbp),%xmm1
movsd  -0x68(%rbp),%xmm2
mulsd  -0x68(%rbp),%xmm2
mulsd  %xmm2,%xmm1
mulsd  -0x60(%rbp),%xmm1
mulsd  -0x80(%rbp),%xmm1
mulsd  -0x78(%rbp),%xmm1
divsd  -0xa0(%rbp),%xmm1
ff
subsd  %xmm1,%xmm0
movsd  -0x28(%rbp),%xmm2
mulsd  -0x28(%rbp),%xmm2
movsd  0xc40(%rip),%xmm1
mulsd  %xmm2,%xmm1
movsd  -0x68(%rbp),%xmm2
mulsd  -0x68(%rbp),%xmm2
mulsd  %xmm2,%xmm1
movsd  -0x70(%rbp),%xmm2
mulsd  -0x70(%rbp),%xmm2
mulsd  %xmm2,%xmm1
mulsd  -0x60(%rbp),%xmm1
mulsd  -0x80(%rbp),%xmm1
movsd  -0x78(%rbp),%xmm2
mulsd  -0x78(%rbp),%xmm2
mulsd  -0x78(%rbp),%xmm2
mulsd  %xmm2,%xmm1
movsd  -0xa0(%rbp),%xmm2
ff
mulsd  -0xa0(%rbp),%xmm2
ff
divsd  %xmm2,%xmm1
subsd  %xmm1,%xmm0
mov    -0x50(%rbp),%rax
movsd  %xmm0,(%rax)
cmpq   $0x0,-0x48(%rbp)
je     14b0 <sn_i+0x380>
movsd  -0x70(%rbp),%xmm1
mulsd  -0x70(%rbp),%xmm1
movsd  0xbc6(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  -0x60(%rbp),%xmm0
mulsd  -0x80(%rbp),%xmm0
movsd  -0x88(%rbp),%xmm1
ff
mulsd  -0x88(%rbp),%xmm1
ff
mulsd  %xmm1,%xmm0
mulsd  -0x78(%rbp),%xmm0
movsd  -0xa0(%rbp),%xmm1
ff
mulsd  -0xa0(%rbp),%xmm1
ff
divsd  %xmm1,%xmm0
movsd  -0x90(%rbp),%xmm1
ff
mulsd  -0x90(%rbp),%xmm1
ff
mulsd  -0x60(%rbp),%xmm1
mulsd  -0x80(%rbp),%xmm1
mulsd  -0x78(%rbp),%xmm1
divsd  -0xa0(%rbp),%xmm1
ff
subsd  %xmm1,%xmm0
mov    -0x48(%rbp),%rax
movsd  %xmm0,(%rax)
cmpq   $0x0,-0x58(%rbp)
je     158a <sn_i+0x45a>
movsd  -0x68(%rbp),%xmm0
movq   %xmm0,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm0
mulsd  -0x70(%rbp),%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
movsd  -0x78(%rbp),%xmm1
mulsd  -0x78(%rbp),%xmm1
mulsd  %xmm1,%xmm0
divsd  -0xa0(%rbp),%xmm0
ff
movsd  -0x68(%rbp),%xmm1
mulsd  -0x70(%rbp),%xmm1
movsd  -0x80(%rbp),%xmm2
mulsd  -0x80(%rbp),%xmm2
mulsd  %xmm2,%xmm1
mulsd  -0x88(%rbp),%xmm1
ff
divsd  -0xa0(%rbp),%xmm1
ff
addsd  %xmm1,%xmm0
movsd  0xada(%rip),%xmm1
mulsd  -0x68(%rbp),%xmm1
movsd  -0x70(%rbp),%xmm2
mulsd  -0x70(%rbp),%xmm2
mulsd  -0x70(%rbp),%xmm2
mulsd  %xmm2,%xmm1
movsd  -0x80(%rbp),%xmm2
mulsd  -0x80(%rbp),%xmm2
mulsd  %xmm2,%xmm1
mulsd  -0x88(%rbp),%xmm1
ff
movsd  -0x78(%rbp),%xmm2
mulsd  -0x78(%rbp),%xmm2
mulsd  %xmm2,%xmm1
movsd  -0xa0(%rbp),%xmm2
ff
mulsd  -0xa0(%rbp),%xmm2
ff
divsd  %xmm2,%xmm1
addsd  %xmm1,%xmm0
mov    -0x58(%rbp),%rax
movsd  %xmm0,(%rax)
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0xa0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<sn_i>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x48,%rsp
mov    %r9,%r15
mov    %r8,%r13
mov    %rcx,%r12
mov    %rdx,%rbx
mov    %rsi,%r14
mov    %rdi,%rbp
movsd  %xmm1,0x10(%rsp)
lea    0x40(%rsp),%rdi
lea    0x38(%rsp),%rsi
lea    0x30(%rsp),%rdx
movapd %xmm2,%xmm1
movsd  %xmm3,(%rsp)
movapd %xmm3,%xmm2
call   1030 <scd@plt>
mov    $0x1,%ecx
test   %rax,%rax
jne    141a <sn_i+0x2ea>
movsd  (%rsp),%xmm1
mulsd  %xmm1,%xmm1
movsd  0xe6a(%rip),%xmm0
movsd  %xmm1,(%rsp)
subsd  %xmm1,%xmm0
cvttsd2si %xmm0,%edi
call   1050 <sqrt@plt>
movsd  %xmm0,0x8(%rsp)
call   1040 <ell_int@plt>
movapd %xmm0,%xmm1
lea    0x28(%rsp),%rdi
lea    0x20(%rsp),%rsi
lea    0x18(%rsp),%rdx
movsd  0x10(%rsp),%xmm0
movsd  0x8(%rsp),%xmm2
call   1030 <scd@plt>
mov    $0x1,%ecx
test   %rax,%rax
jne    141a <sn_i+0x2ea>
movsd  0x8(%rsp),%xmm2
movsd  0x30(%rsp),%xmm0
movsd  0x28(%rsp),%xmm1
movapd %xmm0,%xmm10
mulsd  %xmm0,%xmm10
movapd %xmm10,%xmm3
mulsd  %xmm1,%xmm3
mulsd  %xmm1,%xmm3
movsd  0xde9(%rip),%xmm13
subsd  %xmm3,%xmm13
movsd  0x40(%rsp),%xmm12
movsd  0x18(%rsp),%xmm9
movapd %xmm12,%xmm3
mulsd  %xmm9,%xmm3
divsd  %xmm13,%xmm3
movsd  %xmm3,0x0(%rbp)
movsd  0x38(%rsp),%xmm8
movapd %xmm0,%xmm3
mulsd  %xmm8,%xmm3
movapd %xmm1,%xmm5
mulsd  %xmm3,%xmm5
movsd  0x20(%rsp),%xmm11
mulsd  %xmm11,%xmm5
divsd  %xmm13,%xmm5
movsd  %xmm5,(%r14)
test   %rbx,%rbx
movsd  (%rsp),%xmm6
je     12ca <sn_i+0x19a>
movapd %xmm9,%xmm5
mulsd  %xmm3,%xmm5
divsd  %xmm13,%xmm5
movapd %xmm6,%xmm4
addsd  %xmm6,%xmm4
mulsd  %xmm8,%xmm4
mulsd  %xmm0,%xmm4
movapd %xmm12,%xmm7
mulsd  %xmm12,%xmm7
mulsd  %xmm4,%xmm7
mulsd  %xmm9,%xmm7
movapd %xmm1,%xmm4
mulsd  %xmm1,%xmm4
mulsd  %xmm7,%xmm4
movapd %xmm13,%xmm7
mulsd  %xmm13,%xmm7
divsd  %xmm7,%xmm4
subsd  %xmm4,%xmm5
movsd  %xmm5,(%rbx)
test   %r13,%r13
je     135b <sn_i+0x22b>
movapd 0xd35(%rip),%xmm5
xorpd  %xmm10,%xmm5
mulsd  %xmm12,%xmm5
mulsd  %xmm11,%xmm5
mulsd  %xmm1,%xmm5
divsd  %xmm13,%xmm5
movapd %xmm8,%xmm4
mulsd  %xmm8,%xmm4
movapd %xmm6,%xmm7
mulsd  %xmm4,%xmm7
mulsd  %xmm12,%xmm7
mulsd  %xmm11,%xmm7
mulsd  %xmm1,%xmm7
divsd  %xmm13,%xmm7
subsd  %xmm7,%xmm5
addsd  %xmm6,%xmm6
mulsd  %xmm4,%xmm6
mulsd  %xmm10,%xmm6
mulsd  %xmm12,%xmm6
mulsd  %xmm11,%xmm6
movapd %xmm1,%xmm4
mulsd  %xmm1,%xmm4
mulsd  %xmm1,%xmm4
mulsd  %xmm6,%xmm4
movapd %xmm13,%xmm7
mulsd  %xmm13,%xmm7
divsd  %xmm7,%xmm4
subsd  %xmm4,%xmm5
movsd  %xmm5,0x0(%r13)
test   %r12,%r12
je     13b5 <sn_i+0x285>
movapd %xmm10,%xmm4
addsd  %xmm10,%xmm4
mulsd  %xmm12,%xmm4
mulsd  %xmm11,%xmm4
movapd %xmm9,%xmm5
mulsd  %xmm9,%xmm5
mulsd  %xmm4,%xmm5
mulsd  %xmm1,%xmm5
movapd %xmm13,%xmm4
mulsd  %xmm13,%xmm4
divsd  %xmm4,%xmm5
mulsd  %xmm2,%xmm2
mulsd  %xmm12,%xmm2
mulsd  %xmm11,%xmm2
mulsd  %xmm1,%xmm2
divsd  %xmm13,%xmm2
subsd  %xmm2,%xmm5
movsd  %xmm5,(%r12)
xor    %ecx,%ecx
test   %r15,%r15
je     141a <sn_i+0x2ea>
movapd %xmm9,%xmm2
mulsd  %xmm3,%xmm2
mulsd  %xmm1,%xmm1
mulsd  %xmm1,%xmm2
divsd  %xmm13,%xmm2
mulsd  %xmm11,%xmm11
mulsd  %xmm11,%xmm3
mulsd  %xmm9,%xmm3
divsd  %xmm13,%xmm3
subsd  %xmm2,%xmm3
addsd  %xmm8,%xmm8
mulsd  %xmm10,%xmm0
mulsd  %xmm8,%xmm0
mulsd  %xmm11,%xmm0
mulsd  %xmm9,%xmm0
mulsd  %xmm1,%xmm0
mulsd  %xmm13,%xmm13
divsd  %xmm13,%xmm0
addsd  %xmm3,%xmm0
movsd  %xmm0,(%r15)
mov    %ecx,%eax
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
define i32 @sn_i(double %0, double %1, double %2, double %3, double* nocapture writeonly %4, double* nocapture writeonly %5, double* writeonly %6, double* writeonly %7, double* writeonly %8, double* writeonly %9) {
%11 = alloca double
%12 = alloca double
%13 = alloca double
%14 = alloca double
%15 = alloca double
%16 = alloca double
%17 = bitcast double* %11 to i8*
%18 = bitcast double* %12 to i8*
%19 = bitcast double* %13 to i8*
%20 = bitcast double* %14 to i8*
%21 = bitcast double* %15 to i8*
%22 = bitcast double* %16 to i8*
%23 = call i64 @scd(double %0, double %2, double %3, double* %11, double* %12, double* %13)
%24 = icmp eq i64 %23, 0
br i1 %24, label %25, label %136
25: ; preds = %10
%26 = fneg double %3
%27 = call double @llvm.fmuladd.f64(double %26, double %3, double 1.000000e+00)
%28 = fptosi double %27 to i32
%29 = call double @sqrt(i32 %28)
%30 = call double @ell_int(double %29)
%31 = call i64 @scd(double %1, double %30, double %29, double* %14, double* %15, double* %16)
%32 = icmp eq i64 %31, 0
br i1 %32, label %33, label %136
33: ; preds = %25
%34 = load double, double* %13
%35 = load double, double* %14
%36 = fneg double %34
%37 = fmul double %34, %36
%38 = fmul double %37, %35
%39 = call double @llvm.fmuladd.f64(double %38, double %35, double 1.000000e+00)
%40 = load double, double* %11
%41 = load double, double* %16
%42 = fmul double %40, %41
%43 = fdiv double %42, %39
store double %43, double* %4
%44 = load double, double* %12
%45 = fmul double %34, %44
%46 = fmul double %35, %45
%47 = load double, double* %15
%48 = fmul double %47, %46
%49 = fdiv double %48, %39
store double %49, double* %5
%50 = icmp eq double* %6, null
br i1 %50, label %66, label %51
51: ; preds = %33
%52 = fmul double %41, %45
%53 = fdiv double %52, %39
%54 = fmul double %3, %3
%55 = fmul double %54, 2.000000e+00
%56 = fmul double %55, %44
%57 = fmul double %34, %56
%58 = fmul double %40, %40
%59 = fmul double %58, %57
%60 = fmul double %41, %59
%61 = fmul double %35, %35
%62 = fmul double %61, %60
%63 = fmul double %39, %39
%64 = fdiv double %62, %63
%65 = fsub double %53, %64
store double %65, double* %6
br label %66
66: ; preds = %51, %33
%67 = icmp eq double* %8, null
br i1 %67, label %94, label %68
68: ; preds = %66
%69 = fmul double %34, %34
%70 = fneg double %69
%71 = fmul double %40, %70
%72 = fmul double %71, %47
%73 = fmul double %35, %72
%74 = fdiv double %73, %39
%75 = fmul double %3, %3
%76 = fmul double %44, %44
%77 = fmul double %75, %76
%78 = fmul double %40, %77
%79 = fmul double %47, %78
%80 = fmul double %35, %79
%81 = fdiv double %80, %39
%82 = fsub double %74, %81
%83 = fmul double %75, 2.000000e+00
%84 = fmul double %83, %76
%85 = fmul double %69, %84
%86 = fmul double %40, %85
%87 = fmul double %47, %86
%88 = fmul double %35, %35
%89 = fmul double %35, %88
%90 = fmul double %89, %87
%91 = fmul double %39, %39
%92 = fdiv double %90, %91
%93 = fsub double %82, %92
store double %93, double* %8
br label %94
94: ; preds = %68, %66
%95 = icmp eq double* %7, null
br i1 %95, label %112, label %96
96: ; preds = %94
%97 = fmul double %34, %34
%98 = fmul double %97, 2.000000e+00
%99 = fmul double %98, %40
%100 = fmul double %99, %47
%101 = fmul double %41, %41
%102 = fmul double %101, %100
%103 = fmul double %35, %102
%104 = fmul double %39, %39
%105 = fdiv double %103, %104
%106 = fmul double %29, %29
%107 = fmul double %106, %40
%108 = fmul double %107, %47
%109 = fmul double %35, %108
%110 = fdiv double %109, %39
%111 = fsub double %105, %110
store double %111, double* %7
br label %112
112: ; preds = %96, %94
%113 = icmp eq double* %9, null
br i1 %113, label %136, label %114
114: ; preds = %112
%115 = fneg double %44
%116 = fmul double %34, %115
%117 = fmul double %41, %116
%118 = fmul double %35, %35
%119 = fmul double %118, %117
%120 = fdiv double %119, %39
%121 = fmul double %47, %47
%122 = fmul double %45, %121
%123 = fmul double %41, %122
%124 = fdiv double %123, %39
%125 = fadd double %120, %124
%126 = fmul double %44, 2.000000e+00
%127 = fmul double %34, %34
%128 = fmul double %34, %127
%129 = fmul double %128, %126
%130 = fmul double %129, %121
%131 = fmul double %41, %130
%132 = fmul double %118, %131
%133 = fmul double %39, %39
%134 = fdiv double %132, %133
%135 = fadd double %125, %134
store double %135, double* %9
br label %136
136: ; preds = %112, %114, %25, %10
%137 = phi i32 [ 1, %10 ], [ 1, %25 ], [ 0, %114 ], [ 0, %112 ]
ret i32 %137
}