#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 fabs(double);
double G_func2(double q) {
  int l = 3;
  int d = 15;
  int n = 0;
  double A, B, G;
  if (q == 0.0)
    return 1.0;
  A = B = G = 1.0;
  while (fabs(B / G) > 1e-15) {
    l += 2;
    d += 4 * l;
    n += 10 * l;
    A = d / (d - n * A * q);
    B *= A - 1.0;
    G += B;
    l += 2;
    d += 4 * l;
    n -= 8 * l;
    A = d / (d - n * A * q);
    B *= A - 1.0;
    G += B;
  }
  return G;
}


x86 assembly (clang, -O0):
<G_func2>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
movsd  %xmm0,-0x10(%rbp)
movl   $0x3,-0x14(%rbp)
movl   $0xf,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
movsd  -0x10(%rbp),%xmm0
xorps  %xmm1,%xmm1
ucomisd %xmm1,%xmm0
jne    115c <G_func2+0x4c>
jp     115c <G_func2+0x4c>
movsd  0xeae(%rip),%xmm0
movsd  %xmm0,-0x8(%rbp)
jmp    12cf <G_func2+0x1bf>
movsd  0xe9c(%rip),%xmm0
movsd  %xmm0,-0x38(%rbp)
movsd  0xe8f(%rip),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  0xe82(%rip),%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x30(%rbp),%xmm0
divsd  -0x38(%rbp),%xmm0
call   1030 <fabs@plt>
cvtsi2sd %eax,%xmm0
movsd  0xe6a(%rip),%xmm1
ucomisd %xmm1,%xmm0
jbe    12c5 <G_func2+0x1b5>
mov    -0x14(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
shl    $0x2,%eax
add    -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
imul   $0xa,-0x14(%rbp),%eax
add    -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
cvtsi2sdl -0x18(%rbp),%xmm0
cvtsi2sdl -0x18(%rbp),%xmm2
cvtsi2sdl -0x1c(%rbp),%xmm1
mulsd  -0x28(%rbp),%xmm1
movsd  -0x10(%rbp),%xmm3
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  0xdeb(%rip),%xmm1
subsd  %xmm1,%xmm0
mulsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
mov    -0x14(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x14(%rbp)
mov    -0x14(%rbp),%eax
shl    $0x2,%eax
add    -0x18(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0x14(%rbp),%ecx
shl    $0x3,%ecx
mov    -0x1c(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x1c(%rbp)
cvtsi2sdl -0x18(%rbp),%xmm0
cvtsi2sdl -0x18(%rbp),%xmm2
cvtsi2sdl -0x1c(%rbp),%xmm1
mulsd  -0x28(%rbp),%xmm1
movsd  -0x10(%rbp),%xmm3
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm3,%xmm1
addsd  %xmm2,%xmm1
divsd  %xmm1,%xmm0
movsd  %xmm0,-0x28(%rbp)
movsd  -0x28(%rbp),%xmm0
movsd  0xd5d(%rip),%xmm1
subsd  %xmm1,%xmm0
mulsd  -0x30(%rbp),%xmm0
movsd  %xmm0,-0x30(%rbp)
movsd  -0x30(%rbp),%xmm0
addsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x38(%rbp)
jmp    1183 <G_func2+0x73>
movsd  -0x38(%rbp),%xmm0
movsd  %xmm0,-0x8(%rbp)
movsd  -0x8(%rbp),%xmm0
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<G_func2>:
push   %rbp
push   %r15
push   %r14
push   %r12
push   %rbx
sub    $0x20,%rsp
movapd %xmm0,%xmm1
xorpd  %xmm0,%xmm0
ucomisd %xmm0,%xmm1
jne    1139 <G_func2+0x29>
jp     1139 <G_func2+0x29>
movsd  0xecc(%rip),%xmm3
jmp    124c <G_func2+0x13c>
movsd  0xebf(%rip),%xmm0
movsd  %xmm1,(%rsp)
call   1030 <fabs@plt>
movsd  0xead(%rip),%xmm3
test   %eax,%eax
jle    124c <G_func2+0x13c>
mov    $0xf,%ebx
xor    %ebp,%ebp
movsd  0xe96(%rip),%xmm3
mov    $0x14,%r14d
mov    $0x32,%r15d
mov    $0xffffffc8,%r12d
movapd %xmm3,%xmm6
movapd %xmm3,%xmm2
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    %r14d,%ebx
xorps  %xmm0,%xmm0
cvtsi2sd %ebx,%xmm0
add    %r15d,%ebp
xorps  %xmm1,%xmm1
cvtsi2sd %ebp,%xmm1
mulsd  %xmm2,%xmm1
movsd  (%rsp),%xmm4
mulsd  %xmm4,%xmm1
movapd %xmm0,%xmm2
subsd  %xmm1,%xmm2
divsd  %xmm2,%xmm0
add    %r12d,%ebp
xorps  %xmm1,%xmm1
cvtsi2sd %ebp,%xmm1
mulsd  %xmm0,%xmm1
movsd  0xe35(%rip),%xmm5
addsd  %xmm5,%xmm0
mulsd  %xmm6,%xmm0
lea    0x8(%r14,%rbx,1),%ebx
xorps  %xmm6,%xmm6
cvtsi2sd %ebx,%xmm6
addsd  %xmm0,%xmm3
mulsd  %xmm4,%xmm1
movapd %xmm6,%xmm2
subsd  %xmm1,%xmm2
divsd  %xmm2,%xmm6
movsd  %xmm6,0x10(%rsp)
addsd  %xmm5,%xmm6
mulsd  %xmm0,%xmm6
movsd  %xmm6,0x8(%rsp)
addsd  %xmm6,%xmm3
movsd  %xmm3,0x18(%rsp)
movapd %xmm6,%xmm0
divsd  %xmm3,%xmm0
call   1030 <fabs@plt>
movsd  0x10(%rsp),%xmm2
movsd  0x8(%rsp),%xmm6
movsd  0x18(%rsp),%xmm3
add    $0x10,%r14d
add    $0x28,%r15d
add    $0xffffffe0,%r12d
test   %eax,%eax
jg     1190 <G_func2+0x80>
movapd %xmm3,%xmm0
add    $0x20,%rsp
pop    %rbx
pop    %r12
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define double @G_func2(double %0) {
%2 = alloca double
%3 = alloca double
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca double
%8 = alloca double
%9 = alloca double
store double %0, double* %3
store i32 3, i32* %4
store i32 15, i32* %5
store i32 0, i32* %6
%10 = load double, double* %3
%11 = fcmp oeq double %10, 0.000000e+00
br i1 %11, label %12, label %13
12: ; preds = %1
store double 1.000000e+00, double* %2
br label %82
13: ; preds = %1
store double 1.000000e+00, double* %9
store double 1.000000e+00, double* %8
store double 1.000000e+00, double* %7
br label %14
14: ; preds = %21, %13
%15 = load double, double* %8
%16 = load double, double* %9
%17 = fdiv double %15, %16
%18 = call i32 @fabs(double %17)
%19 = sitofp i32 %18 to double
%20 = fcmp ogt double %19, 1.000000e-15
br i1 %20, label %21, label %80
21: ; preds = %14
%22 = load i32, i32* %4
%23 = add nsw i32 %22, 2
store i32 %23, i32* %4
%24 = load i32, i32* %4
%25 = mul nsw i32 4, %24
%26 = load i32, i32* %5
%27 = add nsw i32 %26, %25
store i32 %27, i32* %5
%28 = load i32, i32* %4
%29 = mul nsw i32 10, %28
%30 = load i32, i32* %6
%31 = add nsw i32 %30, %29
store i32 %31, i32* %6
%32 = load i32, i32* %5
%33 = sitofp i32 %32 to double
%34 = load i32, i32* %5
%35 = sitofp i32 %34 to double
%36 = load i32, i32* %6
%37 = sitofp i32 %36 to double
%38 = load double, double* %7
%39 = fmul double %37, %38
%40 = load double, double* %3
%41 = fneg double %39
%42 = call double @llvm.fmuladd.f64(double %41, double %40, double %35)
%43 = fdiv double %33, %42
store double %43, double* %7
%44 = load double, double* %7
%45 = fsub double %44, 1.000000e+00
%46 = load double, double* %8
%47 = fmul double %46, %45
store double %47, double* %8
%48 = load double, double* %8
%49 = load double, double* %9
%50 = fadd double %49, %48
store double %50, double* %9
%51 = load i32, i32* %4
%52 = add nsw i32 %51, 2
store i32 %52, i32* %4
%53 = load i32, i32* %4
%54 = mul nsw i32 4, %53
%55 = load i32, i32* %5
%56 = add nsw i32 %55, %54
store i32 %56, i32* %5
%57 = load i32, i32* %4
%58 = mul nsw i32 8, %57
%59 = load i32, i32* %6
%60 = sub nsw i32 %59, %58
store i32 %60, i32* %6
%61 = load i32, i32* %5
%62 = sitofp i32 %61 to double
%63 = load i32, i32* %5
%64 = sitofp i32 %63 to double
%65 = load i32, i32* %6
%66 = sitofp i32 %65 to double
%67 = load double, double* %7
%68 = fmul double %66, %67
%69 = load double, double* %3
%70 = fneg double %68
%71 = call double @llvm.fmuladd.f64(double %70, double %69, double %64)
%72 = fdiv double %62, %71
store double %72, double* %7
%73 = load double, double* %7
%74 = fsub double %73, 1.000000e+00
%75 = load double, double* %8
%76 = fmul double %75, %74
store double %76, double* %8
%77 = load double, double* %8
%78 = load double, double* %9
%79 = fadd double %78, %77
store double %79, double* %9
br label %14
80: ; preds = %14
%81 = load double, double* %9
store double %81, double* %2
br label %82
82: ; preds = %80, %12
%83 = load double, double* %2
ret double %83
}

LLVM IR (-O2):
define double @G_func2(double %0) {
%2 = fcmp oeq double %0, 0.000000e+00
br i1 %2, label %44, label %3
3: ; preds = %1
%4 = tail call i32 @fabs(double 1.000000e+00)
%5 = icmp sgt i32 %4, 0
br i1 %5, label %6, label %44
6: ; preds = %3, %6
%7 = phi double [ %40, %6 ], [ 1.000000e+00, %3 ]
%8 = phi double [ %39, %6 ], [ 1.000000e+00, %3 ]
%9 = phi double [ %37, %6 ], [ 1.000000e+00, %3 ]
%10 = phi i32 [ %31, %6 ], [ 0, %3 ]
%11 = phi i32 [ %29, %6 ], [ 15, %3 ]
%12 = phi i32 [ %27, %6 ], [ 3, %3 ]
%13 = add nuw nsw i32 %12, 2
%14 = shl nsw i32 %13, 2
%15 = add nsw i32 %14, %11
%16 = mul nsw i32 %13, 10
%17 = add nsw i32 %10, %16
%18 = sitofp i32 %15 to double
%19 = sitofp i32 %17 to double
%20 = fneg double %9
%21 = fmul double %20, %19
%22 = tail call double @llvm.fmuladd.f64(double %21, double %0, double %18)
%23 = fdiv double %18, %22
%24 = fadd double %23, -1.000000e+00
%25 = fmul double %8, %24
%26 = fadd double %7, %25
%27 = add nuw nsw i32 %12, 4
%28 = shl nsw i32 %27, 2
%29 = add nsw i32 %15, %28
%30 = mul i32 %27, -8
%31 = add i32 %17, %30
%32 = sitofp i32 %29 to double
%33 = sitofp i32 %31 to double
%34 = fneg double %23
%35 = fmul double %33, %34
%36 = tail call double @llvm.fmuladd.f64(double %35, double %0, double %32)
%37 = fdiv double %32, %36
%38 = fadd double %37, -1.000000e+00
%39 = fmul double %25, %38
%40 = fadd double %26, %39
%41 = fdiv double %39, %40
%42 = tail call i32 @fabs(double %41)
%43 = icmp sgt i32 %42, 0
br i1 %43, label %6, label %44
44: ; preds = %6, %3, %1
%45 = phi double [ 1.000000e+00, %1 ], [ 1.000000e+00, %3 ], [ %40, %6 ]
ret double %45
}