#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 */
typedef double complex;

/* Variables and functions */
double _Complex_I;
complex pz2res(double w, int nz, complex *zr, int np, complex *pl, double sg) {
  int i;
  complex num, den;
  num = 1.0;
  den = 1.0;
  for (i = 0; i < nz; i++)
    num *= _Complex_I * w - zr[i];
  for (i = 0; i < np; i++)
    den *= _Complex_I * w - pl[i];
  return sg * num / den;
}


x86 assembly (clang, -O0):
<pz2res>:
push   %rbp
mov    %rsp,%rbp
movsd  %xmm0,-0x8(%rbp)
mov    %edi,-0xc(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %edx,-0x1c(%rbp)
mov    %rcx,-0x28(%rbp)
movsd  %xmm1,-0x30(%rbp)
movsd  0xedc(%rip),%xmm0
movsd  %xmm0,-0x40(%rbp)
movsd  0xecf(%rip),%xmm0
movsd  %xmm0,-0x48(%rbp)
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    119d <pz2res+0x9d>
mov    0x2e90(%rip),%rax
movsd  (%rax),%xmm0
movsd  -0x8(%rbp),%xmm2
mov    -0x18(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mulsd  -0x40(%rbp),%xmm0
movsd  %xmm0,-0x40(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    113d <pz2res+0x3d>
movl   $0x0,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x1c(%rbp),%eax
jge    1204 <pz2res+0x104>
mov    0x2e29(%rip),%rax
movsd  (%rax),%xmm0
movsd  -0x8(%rbp),%xmm2
mov    -0x28(%rbp),%rax
movslq -0x34(%rbp),%rcx
movsd  (%rax,%rcx,8),%xmm1
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
mulsd  %xmm2,%xmm0
addsd  %xmm1,%xmm0
mulsd  -0x48(%rbp),%xmm0
movsd  %xmm0,-0x48(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11a4 <pz2res+0xa4>
movsd  -0x30(%rbp),%xmm0
mulsd  -0x40(%rbp),%xmm0
divsd  -0x48(%rbp),%xmm0
pop    %rbp
ret

x86 assembly (clang, -O2):
<pz2res>:
movsd  0xef8(%rip),%xmm3
movapd %xmm3,%xmm2
test   %edi,%edi
jle    11c6 <pz2res+0xc6>
mov    0x2ec5(%rip),%rax
movsd  (%rax),%xmm4
mov    %edi,%edi
lea    -0x1(%rdi),%rax
mov    %edi,%r8d
and    $0x3,%r8d
cmp    $0x3,%rax
jae    113e <pz2res+0x3e>
movsd  0xec6(%rip),%xmm2
xor    %eax,%eax
jmp    11a0 <pz2res+0xa0>
and    $0xfffffffc,%edi
movsd  0xeb7(%rip),%xmm2
xor    %eax,%eax
movapd %xmm4,%xmm5
mulsd  %xmm0,%xmm5
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movapd %xmm5,%xmm6
subsd  (%rsi,%rax,8),%xmm6
mulsd  %xmm2,%xmm6
movapd %xmm5,%xmm7
subsd  0x8(%rsi,%rax,8),%xmm7
mulsd  %xmm6,%xmm7
movapd %xmm5,%xmm6
subsd  0x10(%rsi,%rax,8),%xmm6
movapd %xmm5,%xmm2
subsd  0x18(%rsi,%rax,8),%xmm2
mulsd  %xmm7,%xmm6
mulsd  %xmm6,%xmm2
add    $0x4,%rax
cmp    %rax,%rdi
jne    1160 <pz2res+0x60>
test   %r8,%r8
je     11c6 <pz2res+0xc6>
lea    (%rsi,%rax,8),%rax
xor    %esi,%esi
mulsd  %xmm0,%xmm4
nop
movapd %xmm4,%xmm5
subsd  (%rax,%rsi,8),%xmm5
mulsd  %xmm5,%xmm2
add    $0x1,%rsi
cmp    %rsi,%r8
jne    11b0 <pz2res+0xb0>
test   %edx,%edx
jle    1276 <pz2res+0x176>
mov    0x2e0b(%rip),%rax
movsd  (%rax),%xmm4
mov    %edx,%edx
lea    -0x1(%rdx),%rsi
mov    %edx,%eax
and    $0x3,%eax
cmp    $0x3,%rsi
jae    11f6 <pz2res+0xf6>
movsd  0xe0e(%rip),%xmm3
xor    %esi,%esi
jmp    1250 <pz2res+0x150>
and    $0xfffffffc,%edx
movsd  0xdff(%rip),%xmm3
xor    %esi,%esi
movapd %xmm4,%xmm5
mulsd  %xmm0,%xmm5
nopl   0x0(%rax,%rax,1)
movapd %xmm5,%xmm6
subsd  (%rcx,%rsi,8),%xmm6
mulsd  %xmm3,%xmm6
movapd %xmm5,%xmm7
subsd  0x8(%rcx,%rsi,8),%xmm7
mulsd  %xmm6,%xmm7
movapd %xmm5,%xmm6
subsd  0x10(%rcx,%rsi,8),%xmm6
movapd %xmm5,%xmm3
subsd  0x18(%rcx,%rsi,8),%xmm3
mulsd  %xmm7,%xmm6
mulsd  %xmm6,%xmm3
add    $0x4,%rsi
cmp    %rsi,%rdx
jne    1210 <pz2res+0x110>
test   %rax,%rax
je     1276 <pz2res+0x176>
lea    (%rcx,%rsi,8),%rcx
xor    %edx,%edx
mulsd  %xmm0,%xmm4
nop
movapd %xmm4,%xmm0
subsd  (%rcx,%rdx,8),%xmm0
mulsd  %xmm0,%xmm3
add    $0x1,%rdx
cmp    %rdx,%rax
jne    1260 <pz2res+0x160>
mulsd  %xmm1,%xmm2
divsd  %xmm3,%xmm2
movapd %xmm2,%xmm0
ret

LLVM IR (-O0):
@_Complex_I = global double 0.000000e+00
define double @pz2res(double %0, i32 %1, double* %2, i32 %3, double* %4, double %5) {
%7 = alloca double
%8 = alloca i32
%9 = alloca double*
%10 = alloca i32
%11 = alloca double*
%12 = alloca double
%13 = alloca i32
%14 = alloca double
%15 = alloca double
store double %0, double* %7
store i32 %1, i32* %8
store double* %2, double** %9
store i32 %3, i32* %10
store double* %4, double** %11
store double %5, double* %12
store double 1.000000e+00, double* %14
store double 1.000000e+00, double* %15
store i32 0, i32* %13
br label %16
16: ; preds = %32, %6
%17 = load i32, i32* %13
%18 = load i32, i32* %8
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %35
20: ; preds = %16
%21 = load double, double* @_Complex_I
%22 = load double, double* %7
%23 = load double*, double** %9
%24 = load i32, i32* %13
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds double, double* %23, i64 %25
%27 = load double, double* %26
%28 = fneg double %27
%29 = call double @llvm.fmuladd.f64(double %21, double %22, double %28)
%30 = load double, double* %14
%31 = fmul double %30, %29
store double %31, double* %14
br label %32
32: ; preds = %20
%33 = load i32, i32* %13
%34 = add nsw i32 %33, 1
store i32 %34, i32* %13
br label %16
35: ; preds = %16
store i32 0, i32* %13
br label %36
36: ; preds = %52, %35
%37 = load i32, i32* %13
%38 = load i32, i32* %10
%39 = icmp slt i32 %37, %38
br i1 %39, label %40, label %55
40: ; preds = %36
%41 = load double, double* @_Complex_I
%42 = load double, double* %7
%43 = load double*, double** %11
%44 = load i32, i32* %13
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds double, double* %43, i64 %45
%47 = load double, double* %46
%48 = fneg double %47
%49 = call double @llvm.fmuladd.f64(double %41, double %42, double %48)
%50 = load double, double* %15
%51 = fmul double %50, %49
store double %51, double* %15
br label %52
52: ; preds = %40
%53 = load i32, i32* %13
%54 = add nsw i32 %53, 1
store i32 %54, i32* %13
br label %36
55: ; preds = %36
%56 = load double, double* %12
%57 = load double, double* %14
%58 = fmul double %56, %57
%59 = load double, double* %15
%60 = fdiv double %58, %59
ret double %60
}

LLVM IR (-O2):
@_Complex_I = global double 0.000000e+00
define double @pz2res(double %0, i32 %1, double* nocapture %2, i32 %3, double* nocapture %4, double %5) {
%7 = icmp sgt i32 %1, 0
br i1 %7, label %8, label %33
8: ; preds = %6
%9 = load double, double* @_Complex_I
%10 = zext i32 %1 to i64
%11 = add nsw i64 %10, -1
%12 = and i64 %10, 3
%13 = icmp ult i64 %11, 3
br i1 %13, label %16, label %14
14: ; preds = %8
%15 = and i64 %10, 4294967292
br label %44
16: ; preds = %44, %8
%17 = phi double [ undef, %8 ], [ %70, %44 ]
%18 = phi i64 [ 0, %8 ], [ %71, %44 ]
%19 = phi double [ 1.000000e+00, %8 ], [ %70, %44 ]
%20 = icmp eq i64 %12, 0
br i1 %20, label %33, label %21
21: ; preds = %16, %21
%22 = phi i64 [ %30, %21 ], [ %18, %16 ]
%23 = phi double [ %29, %21 ], [ %19, %16 ]
%24 = phi i64 [ %31, %21 ], [ 0, %16 ]
%25 = getelementptr inbounds double, double* %2, i64 %22
%26 = load double, double* %25
%27 = fneg double %26
%28 = tail call double @llvm.fmuladd.f64(double %9, double %0, double %27)
%29 = fmul double %23, %28
%30 = add nuw nsw i64 %22, 1
%31 = add i64 %24, 1
%32 = icmp eq i64 %31, %12
br i1 %32, label %33, label %21
33: ; preds = %16, %21, %6
%34 = phi double [ 1.000000e+00, %6 ], [ %17, %16 ], [ %29, %21 ]
%35 = icmp sgt i32 %3, 0
br i1 %35, label %36, label %121
36: ; preds = %33
%37 = load double, double* @_Complex_I
%38 = zext i32 %3 to i64
%39 = add nsw i64 %38, -1
%40 = and i64 %38, 3
%41 = icmp ult i64 %39, 3
br i1 %41, label %104, label %42
42: ; preds = %36
%43 = and i64 %38, 4294967292
br label %74
44: ; preds = %44, %14
%45 = phi i64 [ 0, %14 ], [ %71, %44 ]
%46 = phi double [ 1.000000e+00, %14 ], [ %70, %44 ]
%47 = phi i64 [ 0, %14 ], [ %72, %44 ]
%48 = getelementptr inbounds double, double* %2, i64 %45
%49 = load double, double* %48
%50 = fneg double %49
%51 = tail call double @llvm.fmuladd.f64(double %9, double %0, double %50)
%52 = fmul double %46, %51
%53 = or i64 %45, 1
%54 = getelementptr inbounds double, double* %2, i64 %53
%55 = load double, double* %54
%56 = fneg double %55
%57 = tail call double @llvm.fmuladd.f64(double %9, double %0, double %56)
%58 = fmul double %52, %57
%59 = or i64 %45, 2
%60 = getelementptr inbounds double, double* %2, i64 %59
%61 = load double, double* %60
%62 = fneg double %61
%63 = tail call double @llvm.fmuladd.f64(double %9, double %0, double %62)
%64 = fmul double %58, %63
%65 = or i64 %45, 3
%66 = getelementptr inbounds double, double* %2, i64 %65
%67 = load double, double* %66
%68 = fneg double %67
%69 = tail call double @llvm.fmuladd.f64(double %9, double %0, double %68)
%70 = fmul double %64, %69
%71 = add nuw nsw i64 %45, 4
%72 = add i64 %47, 4
%73 = icmp eq i64 %72, %15
br i1 %73, label %16, label %44
74: ; preds = %74, %42
%75 = phi i64 [ 0, %42 ], [ %101, %74 ]
%76 = phi double [ 1.000000e+00, %42 ], [ %100, %74 ]
%77 = phi i64 [ 0, %42 ], [ %102, %74 ]
%78 = getelementptr inbounds double, double* %4, i64 %75
%79 = load double, double* %78
%80 = fneg double %79
%81 = tail call double @llvm.fmuladd.f64(double %37, double %0, double %80)
%82 = fmul double %76, %81
%83 = or i64 %75, 1
%84 = getelementptr inbounds double, double* %4, i64 %83
%85 = load double, double* %84
%86 = fneg double %85
%87 = tail call double @llvm.fmuladd.f64(double %37, double %0, double %86)
%88 = fmul double %82, %87
%89 = or i64 %75, 2
%90 = getelementptr inbounds double, double* %4, i64 %89
%91 = load double, double* %90
%92 = fneg double %91
%93 = tail call double @llvm.fmuladd.f64(double %37, double %0, double %92)
%94 = fmul double %88, %93
%95 = or i64 %75, 3
%96 = getelementptr inbounds double, double* %4, i64 %95
%97 = load double, double* %96
%98 = fneg double %97
%99 = tail call double @llvm.fmuladd.f64(double %37, double %0, double %98)
%100 = fmul double %94, %99
%101 = add nuw nsw i64 %75, 4
%102 = add i64 %77, 4
%103 = icmp eq i64 %102, %43
br i1 %103, label %104, label %74
104: ; preds = %74, %36
%105 = phi double [ undef, %36 ], [ %100, %74 ]
%106 = phi i64 [ 0, %36 ], [ %101, %74 ]
%107 = phi double [ 1.000000e+00, %36 ], [ %100, %74 ]
%108 = icmp eq i64 %40, 0
br i1 %108, label %121, label %109
109: ; preds = %104, %109
%110 = phi i64 [ %118, %109 ], [ %106, %104 ]
%111 = phi double [ %117, %109 ], [ %107, %104 ]
%112 = phi i64 [ %119, %109 ], [ 0, %104 ]
%113 = getelementptr inbounds double, double* %4, i64 %110
%114 = load double, double* %113
%115 = fneg double %114
%116 = tail call double @llvm.fmuladd.f64(double %37, double %0, double %115)
%117 = fmul double %111, %116
%118 = add nuw nsw i64 %110, 1
%119 = add i64 %112, 1
%120 = icmp eq i64 %119, %40
br i1 %120, label %121, label %109
121: ; preds = %104, %109, %33
%122 = phi double [ 1.000000e+00, %33 ], [ %105, %104 ], [ %117, %109 ]
%123 = fmul double %34, %5
%124 = fdiv double %123, %122
ret double %124
}