#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 _ada_use_c2phc(int, int *, int *, double *);
int varbprec_Newton_Laurent_step(int dim, int wanted, int maxitr, int maxprc,
                                 int ns, char *s) {
  int i, fail;
  int a[5];
  int b[ns];
  double *c;
  a[0] = dim;
  a[1] = ns;
  a[2] = wanted;
  a[3] = maxitr;
  a[4] = maxprc;
  for (i = 0; i < ns; i++)
    b[i] = (int)s[i];
  fail = _ada_use_c2phc(179, a, b, c);
  return fail;
}


x86 assembly (clang, -O0):
<varbprec_Newton_Laurent_step>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
mov    %edx,-0xc(%rbp)
mov    %ecx,-0x10(%rbp)
mov    %r8d,-0x14(%rbp)
mov    %r9,-0x20(%rbp)
mov    -0x14(%rbp),%eax
mov    %rsp,%rcx
mov    %rcx,-0x48(%rbp)
lea    0xf(,%rax,4),%rdx
and    $0xfffffffffffffff0,%rdx
mov    %rsp,%rcx
sub    %rdx,%rcx
mov    %rcx,-0x60(%rbp)
mov    %rcx,%rsp
mov    %rax,-0x50(%rbp)
mov    -0x4(%rbp),%eax
mov    %eax,-0x40(%rbp)
mov    -0x14(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x8(%rbp),%eax
mov    %eax,-0x38(%rbp)
mov    -0xc(%rbp),%eax
mov    %eax,-0x34(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x30(%rbp)
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    11a9 <varbprec_Newton_Laurent_step+0x99>
mov    -0x60(%rbp),%rax
mov    -0x20(%rbp),%rcx
movslq -0x24(%rbp),%rdx
movsbl (%rcx,%rdx,1),%edx
movslq -0x24(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1178 <varbprec_Newton_Laurent_step+0x68>
mov    -0x60(%rbp),%rdx
lea    -0x40(%rbp),%rsi
mov    -0x58(%rbp),%rcx
mov    $0xb3,%edi
call   1030 <_ada_use_c2phc@plt>
mov    %eax,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x48(%rbp),%rcx
mov    %rcx,%rsp
mov    %rbp,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<varbprec_Newton_Laurent_step>:
push   %rbp
mov    %rsp,%rbp
push   %r14
push   %rbx
sub    $0x20,%rsp
mov    %edx,%r10d
mov    %rsp,%r14
mov    %r8d,%ebx
mov    %rsp,%rdx
lea    0xf(,%rbx,4),%rax
and    $0xfffffffffffffff0,%rax
sub    %rax,%rdx
mov    %rdx,%rsp
mov    %edi,-0x30(%rbp)
mov    %r8d,-0x2c(%rbp)
mov    %esi,-0x28(%rbp)
mov    %r10d,-0x24(%rbp)
mov    %ecx,-0x20(%rbp)
test   %r8d,%r8d
jle    1251 <varbprec_Newton_Laurent_step+0x141>
cmp    $0x8,%r8d
jae    1160 <varbprec_Newton_Laurent_step+0x50>
xor    %eax,%eax
jmp    1240 <varbprec_Newton_Laurent_step+0x130>
mov    %ebx,%eax
and    $0xfffffff8,%eax
lea    -0x8(%rax),%rcx
mov    %rcx,%rsi
shr    $0x3,%rsi
add    $0x1,%rsi
test   %rcx,%rcx
je     126b <varbprec_Newton_Laurent_step+0x15b>
mov    %rsi,%rdi
and    $0xfffffffffffffffe,%rdi
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
movd   (%r9,%rcx,1),%xmm0
punpcklbw %xmm0,%xmm0
punpcklwd %xmm0,%xmm0
movd   0x4(%r9,%rcx,1),%xmm1
punpcklbw %xmm1,%xmm1
punpcklwd %xmm1,%xmm1
psrad  $0x18,%xmm0
psrad  $0x18,%xmm1
movdqa %xmm0,(%rdx,%rcx,4)
movdqa %xmm1,0x10(%rdx,%rcx,4)
movd   0x8(%r9,%rcx,1),%xmm0
punpcklbw %xmm0,%xmm0
punpcklwd %xmm0,%xmm0
movd   0xc(%r9,%rcx,1),%xmm1
punpcklbw %xmm1,%xmm1
punpcklwd %xmm1,%xmm1
psrad  $0x18,%xmm0
psrad  $0x18,%xmm1
movdqa %xmm0,0x20(%rdx,%rcx,4)
movdqa %xmm1,0x30(%rdx,%rcx,4)
add    $0x10,%rcx
add    $0xfffffffffffffffe,%rdi
jne    1190 <varbprec_Newton_Laurent_step+0x80>
test   $0x1,%sil
je     1238 <varbprec_Newton_Laurent_step+0x128>
movd   (%r9,%rcx,1),%xmm0
movd   0x4(%r9,%rcx,1),%xmm1
punpcklbw %xmm0,%xmm0
punpcklwd %xmm0,%xmm0
psrad  $0x18,%xmm0
punpcklbw %xmm1,%xmm1
punpcklwd %xmm1,%xmm1
psrad  $0x18,%xmm1
movdqa %xmm0,(%rdx,%rcx,4)
movdqa %xmm1,0x10(%rdx,%rcx,4)
cmp    %rbx,%rax
je     1251 <varbprec_Newton_Laurent_step+0x141>
nopl   (%rax)
movsbl (%r9,%rax,1),%ecx
mov    %ecx,(%rdx,%rax,4)
add    $0x1,%rax
cmp    %rax,%rbx
jne    1240 <varbprec_Newton_Laurent_step+0x130>
lea    -0x30(%rbp),%rsi
mov    $0xb3,%edi
call   1030 <_ada_use_c2phc@plt>
mov    %r14,%rsp
lea    -0x10(%rbp),%rsp
pop    %rbx
pop    %r14
pop    %rbp
ret
xor    %ecx,%ecx
test   $0x1,%sil
jne    1206 <varbprec_Newton_Laurent_step+0xf6>
jmp    1238 <varbprec_Newton_Laurent_step+0x128>

LLVM IR (-O0):
define i32 @varbprec_Newton_Laurent_step(i32 %0, i32 %1, i32 %2, i32 %3, i32 %4, i8* %5) {
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i8*
%13 = alloca i32
%14 = alloca i32
%15 = alloca [5 x i32]
%16 = alloca i8*
%17 = alloca i64
%18 = alloca double*
store i32 %0, i32* %7
store i32 %1, i32* %8
store i32 %2, i32* %9
store i32 %3, i32* %10
store i32 %4, i32* %11
store i8* %5, i8** %12
%19 = load i32, i32* %11
%20 = zext i32 %19 to i64
%21 = call i8* @llvm.stacksave()
store i8* %21, i8** %16
%22 = alloca i32, i64 %20
store i64 %20, i64* %17
%23 = load i32, i32* %7
%24 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 0
store i32 %23, i32* %24
%25 = load i32, i32* %11
%26 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 1
store i32 %25, i32* %26
%27 = load i32, i32* %8
%28 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 2
store i32 %27, i32* %28
%29 = load i32, i32* %9
%30 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 3
store i32 %29, i32* %30
%31 = load i32, i32* %10
%32 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 4
store i32 %31, i32* %32
store i32 0, i32* %13
br label %33
33: ; preds = %47, %6
%34 = load i32, i32* %13
%35 = load i32, i32* %11
%36 = icmp slt i32 %34, %35
br i1 %36, label %37, label %50
37: ; preds = %33
%38 = load i8*, i8** %12
%39 = load i32, i32* %13
%40 = sext i32 %39 to i64
%41 = getelementptr inbounds i8, i8* %38, i64 %40
%42 = load i8, i8* %41
%43 = sext i8 %42 to i32
%44 = load i32, i32* %13
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds i32, i32* %22, i64 %45
store i32 %43, i32* %46
br label %47
47: ; preds = %37
%48 = load i32, i32* %13
%49 = add nsw i32 %48, 1
store i32 %49, i32* %13
br label %33
50: ; preds = %33
%51 = getelementptr inbounds [5 x i32], [5 x i32]* %15, i64 0, i64 0
%52 = load double*, double** %18
%53 = call i32 @_ada_use_c2phc(i32 179, i32* %51, i32* %22, double* %52)
store i32 %53, i32* %14
%54 = load i32, i32* %14
%55 = load i8*, i8** %16
ret i32 %54
}

LLVM IR (-O2):
define i32 @varbprec_Newton_Laurent_step(i32 %0, i32 %1, i32 %2, i32 %3, i32 %4, i8* nocapture %5) {
%7 = alloca [5 x i32]
%8 = bitcast [5 x i32]* %7 to i8*
%9 = zext i32 %4 to i64
%10 = tail call i8* @llvm.stacksave()
%11 = alloca i32, i64 %9
%12 = getelementptr inbounds [5 x i32], [5 x i32]* %7, i64 0, i64 0
store i32 %0, i32* %12
%13 = getelementptr inbounds [5 x i32], [5 x i32]* %7, i64 0, i64 1
store i32 %4, i32* %13
%14 = getelementptr inbounds [5 x i32], [5 x i32]* %7, i64 0, i64 2
store i32 %1, i32* %14
%15 = getelementptr inbounds [5 x i32], [5 x i32]* %7, i64 0, i64 3
store i32 %2, i32* %15
%16 = getelementptr inbounds [5 x i32], [5 x i32]* %7, i64 0, i64 4
store i32 %3, i32* %16
%17 = icmp sgt i32 %4, 0
br i1 %17, label %18, label %88
18: ; preds = %6
%19 = icmp ult i32 %4, 8
br i1 %19, label %78, label %20
20: ; preds = %18
%21 = and i64 %9, 4294967288
%22 = add nsw i64 %21, -8
%23 = lshr exact i64 %22, 3
%24 = add nuw nsw i64 %23, 1
%25 = and i64 %24, 1
%26 = icmp eq i64 %22, 0
br i1 %26, label %60, label %27
27: ; preds = %20
%28 = and i64 %24, 4611686018427387902
br label %29
29: ; preds = %29, %27
%30 = phi i64 [ 0, %27 ], [ %57, %29 ]
%31 = phi i64 [ 0, %27 ], [ %58, %29 ]
%32 = getelementptr inbounds i8, i8* %5, i64 %30
%33 = bitcast i8* %32 to <4 x i8>*
%34 = load <4 x i8>, <4 x i8>* %33
%35 = getelementptr inbounds i8, i8* %32, i64 4
%36 = bitcast i8* %35 to <4 x i8>*
%37 = load <4 x i8>, <4 x i8>* %36
%38 = sext <4 x i8> %34 to <4 x i32>
%39 = sext <4 x i8> %37 to <4 x i32>
%40 = getelementptr inbounds i32, i32* %11, i64 %30
%41 = bitcast i32* %40 to <4 x i32>*
store <4 x i32> %38, <4 x i32>* %41
%42 = getelementptr inbounds i32, i32* %40, i64 4
%43 = bitcast i32* %42 to <4 x i32>*
store <4 x i32> %39, <4 x i32>* %43
%44 = or i64 %30, 8
%45 = getelementptr inbounds i8, i8* %5, i64 %44
%46 = bitcast i8* %45 to <4 x i8>*
%47 = load <4 x i8>, <4 x i8>* %46
%48 = getelementptr inbounds i8, i8* %45, i64 4
%49 = bitcast i8* %48 to <4 x i8>*
%50 = load <4 x i8>, <4 x i8>* %49
%51 = sext <4 x i8> %47 to <4 x i32>
%52 = sext <4 x i8> %50 to <4 x i32>
%53 = getelementptr inbounds i32, i32* %11, i64 %44
%54 = bitcast i32* %53 to <4 x i32>*
store <4 x i32> %51, <4 x i32>* %54
%55 = getelementptr inbounds i32, i32* %53, i64 4
%56 = bitcast i32* %55 to <4 x i32>*
store <4 x i32> %52, <4 x i32>* %56
%57 = add nuw i64 %30, 16
%58 = add i64 %31, 2
%59 = icmp eq i64 %58, %28
br i1 %59, label %60, label %29
60: ; preds = %29, %20
%61 = phi i64 [ 0, %20 ], [ %57, %29 ]
%62 = icmp eq i64 %25, 0
br i1 %62, label %76, label %63
63: ; preds = %60
%64 = getelementptr inbounds i8, i8* %5, i64 %61
%65 = bitcast i8* %64 to <4 x i8>*
%66 = load <4 x i8>, <4 x i8>* %65
%67 = getelementptr inbounds i8, i8* %64, i64 4
%68 = bitcast i8* %67 to <4 x i8>*
%69 = load <4 x i8>, <4 x i8>* %68
%70 = sext <4 x i8> %66 to <4 x i32>
%71 = sext <4 x i8> %69 to <4 x i32>
%72 = getelementptr inbounds i32, i32* %11, i64 %61
%73 = bitcast i32* %72 to <4 x i32>*
store <4 x i32> %70, <4 x i32>* %73
%74 = getelementptr inbounds i32, i32* %72, i64 4
%75 = bitcast i32* %74 to <4 x i32>*
store <4 x i32> %71, <4 x i32>* %75
br label %76
76: ; preds = %60, %63
%77 = icmp eq i64 %21, %9
br i1 %77, label %88, label %78
78: ; preds = %18, %76
%79 = phi i64 [ 0, %18 ], [ %21, %76 ]
br label %80
80: ; preds = %78, %80
%81 = phi i64 [ %86, %80 ], [ %79, %78 ]
%82 = getelementptr inbounds i8, i8* %5, i64 %81
%83 = load i8, i8* %82
%84 = sext i8 %83 to i32
%85 = getelementptr inbounds i32, i32* %11, i64 %81
store i32 %84, i32* %85
%86 = add nuw nsw i64 %81, 1
%87 = icmp eq i64 %86, %9
br i1 %87, label %88, label %80
88: ; preds = %80, %76, %6
%89 = call i32 @_ada_use_c2phc(i32 179, i32* %12, i32* %11, double* undef)
ret i32 %89
}