#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 ceil(double);
int floor(double);
int /*<<< orphan*/ printf(char *, double);
int scanf(char *, ...);
int main() {
  double expense[1001], avg1, avg2, sum, sum1, sum2;
  int i, students;
  while (scanf("%d\n", &students) != -1) {
    if (!students)
      break;
    sum = 0;
    for (i = 1; i <= students; i++) {
      scanf("%lf\n", &expense[i]);
      sum += expense[i];
    }
    avg1 = ceil((sum / students) * 100) / 100;
    avg2 = floor((sum / students) * 100) / 100;
    sum1 = 0;
    sum2 = 0;
    for (i = 1; i <= students; i++)
      if (expense[i] > avg1)
        sum1 += expense[i] - avg1;
    for (i = 1; i <= students; i++)
      if (expense[i] < avg2)
        sum2 += avg2 - expense[i];
    sum = sum1 > sum2 ? sum1 : sum2;
    printf("$%.2lf\n", sum);
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x1f90,%rsp
movl   $0x0,-0x4(%rbp)
lea    0xeaf(%rip),%rdi
lea    -0x1f80(%rbp),%rsi
mov    $0x0,%al
call   1050 <scanf@plt>
cmp    $0xffffffff,%eax
je     13e6 <main+0x2a6>
cmpl   $0x0,-0x1f80(%rbp)
jne    1182 <main+0x42>
jmp    13e6 <main+0x2a6>
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x1f68(%rbp)
ff
movl   $0x1,-0x1f7c(%rbp)
mov    -0x1f7c(%rbp),%eax
cmp    -0x1f80(%rbp),%eax
jg     1200 <main+0xc0>
movslq -0x1f7c(%rbp),%rax
lea    -0x1f50(%rbp),%rsi
shl    $0x3,%rax
add    %rax,%rsi
lea    0xe47(%rip),%rdi
mov    $0x0,%al
call   1050 <scanf@plt>
movslq -0x1f7c(%rbp),%rax
movsd  -0x1f50(%rbp,%rax,8),%xmm0
ff ff
addsd  -0x1f68(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f68(%rbp)
ff
mov    -0x1f7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1f7c(%rbp)
jmp    1197 <main+0x57>
movsd  -0x1f68(%rbp),%xmm0
ff
cvtsi2sdl -0x1f80(%rbp),%xmm1
ff
divsd  %xmm1,%xmm0
movsd  0xde4(%rip),%xmm1
mulsd  %xmm1,%xmm0
call   1030 <ceil@plt>
mov    $0x64,%ecx
cltd
idiv   %ecx
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x1f58(%rbp)
ff
movsd  -0x1f68(%rbp),%xmm0
ff
cvtsi2sdl -0x1f80(%rbp),%xmm1
ff
divsd  %xmm1,%xmm0
movsd  0xdab(%rip),%xmm1
mulsd  %xmm1,%xmm0
call   1060 <floor@plt>
mov    $0x64,%ecx
cltd
idiv   %ecx
cvtsi2sd %eax,%xmm0
movsd  %xmm0,-0x1f60(%rbp)
ff
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x1f70(%rbp)
ff
xorps  %xmm0,%xmm0
movsd  %xmm0,-0x1f78(%rbp)
ff
movl   $0x1,-0x1f7c(%rbp)
mov    -0x1f7c(%rbp),%eax
cmp    -0x1f80(%rbp),%eax
jg     1303 <main+0x1c3>
movslq -0x1f7c(%rbp),%rax
movsd  -0x1f50(%rbp,%rax,8),%xmm0
ff ff
ucomisd -0x1f58(%rbp),%xmm0
ff
jbe    12ea <main+0x1aa>
movslq -0x1f7c(%rbp),%rax
movsd  -0x1f50(%rbp,%rax,8),%xmm0
ff ff
subsd  -0x1f58(%rbp),%xmm0
ff
addsd  -0x1f70(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f70(%rbp)
ff
jmp    12ef <main+0x1af>
mov    -0x1f7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1f7c(%rbp)
jmp    1292 <main+0x152>
movl   $0x1,-0x1f7c(%rbp)
mov    -0x1f7c(%rbp),%eax
cmp    -0x1f80(%rbp),%eax
jg     1382 <main+0x242>
movslq -0x1f7c(%rbp),%rax
movsd  -0x1f50(%rbp,%rax,8),%xmm1
ff ff
movsd  -0x1f60(%rbp),%xmm0
ff
ucomisd %xmm1,%xmm0
jbe    1369 <main+0x229>
movsd  -0x1f60(%rbp),%xmm0
ff
movslq -0x1f7c(%rbp),%rax
subsd  -0x1f50(%rbp,%rax,8),%xmm0
ff ff
addsd  -0x1f78(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f78(%rbp)
ff
jmp    136e <main+0x22e>
mov    -0x1f7c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1f7c(%rbp)
jmp    130d <main+0x1cd>
movsd  -0x1f70(%rbp),%xmm0
ff
ucomisd -0x1f78(%rbp),%xmm0
ff
jbe    13ad <main+0x26d>
movsd  -0x1f70(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f88(%rbp)
ff
jmp    13bd <main+0x27d>
movsd  -0x1f78(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f88(%rbp)
ff
movsd  -0x1f88(%rbp),%xmm0
ff
movsd  %xmm0,-0x1f68(%rbp)
ff
movsd  -0x1f68(%rbp),%xmm0
ff
lea    0xc35(%rip),%rdi
call   1040 <printf@plt>
jmp    1152 <main+0x12>
xor    %eax,%eax
add    $0x1f90,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x1f58,%rsp
lea    0xeb8(%rip),%rdi
lea    0x4(%rsp),%rsi
xor    %eax,%eax
call   1050 <scanf@plt>
cmp    $0xffffffff,%eax
je     1509 <main+0x3c9>
mov    0x4(%rsp),%eax
test   %eax,%eax
je     1509 <main+0x3c9>
lea    0x18(%rsp),%r13
lea    0xe8b(%rip),%r15
lea    0x4(%rsp),%r12
lea    0xe83(%rip),%rbx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
xorpd  %xmm0,%xmm0
test   %eax,%eax
jle    11f5 <main+0xb5>
xorpd  %xmm0,%xmm0
xor    %ebp,%ebp
xor    %r14d,%r14d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movsd  %xmm0,0x8(%rsp)
mov    %r13,%rsi
add    %rbp,%rsi
mov    %rbx,%rdi
xor    %eax,%eax
call   1050 <scanf@plt>
movsd  0x8(%rsp),%xmm0
addsd  0x18(%rsp,%r14,8),%xmm0
movslq 0x4(%rsp),%rax
add    $0x1,%r14
add    $0x8,%rbp
cmp    %rax,%r14
jl     11c0 <main+0x80>
xorps  %xmm1,%xmm1
cvtsi2sd %eax,%xmm1
movsd  %xmm0,0x8(%rsp)
divsd  %xmm1,%xmm0
movsd  0xdf2(%rip),%xmm1
mulsd  %xmm1,%xmm0
call   1030 <ceil@plt>
mov    %eax,%ebp
xorps  %xmm0,%xmm0
cvtsi2sdl 0x4(%rsp),%xmm0
movsd  0x8(%rsp),%xmm1
divsd  %xmm0,%xmm1
mulsd  0xdcc(%rip),%xmm1
movapd %xmm1,%xmm0
call   1060 <floor@plt>
mov    0x4(%rsp),%esi
xorpd  %xmm1,%xmm1
test   %esi,%esi
xorpd  %xmm0,%xmm0
jle    14db <main+0x39b>
movslq %ebp,%rcx
imul   $0x51eb851f,%rcx,%rcx
mov    %rcx,%rdx
shr    $0x3f,%rdx
sar    $0x25,%rcx
add    %edx,%ecx
xorps  %xmm4,%xmm4
cvtsi2sd %ecx,%xmm4
lea    -0x1(%rsi),%rbp
mov    %esi,%ecx
and    $0x3,%ecx
cmp    $0x3,%rbp
jae    12a0 <main+0x160>
xorpd  %xmm0,%xmm0
mov    $0x1,%edi
movsd  0xd79(%rip),%xmm5
test   %rcx,%rcx
jne    1362 <main+0x222>
jmp    139b <main+0x25b>
nopl   (%rax)
mov    %esi,%edx
and    $0xfffffffc,%edx
xorpd  %xmm0,%xmm0
xor    %edi,%edi
movsd  0xd55(%rip),%xmm5
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movsd  0x18(%rsp,%rdi,8),%xmm1
movsd  0x20(%rsp,%rdi,8),%xmm2
movapd %xmm4,%xmm3
cmpltsd %xmm1,%xmm3
subsd  %xmm4,%xmm1
andpd  %xmm3,%xmm1
andnpd %xmm5,%xmm3
orpd   %xmm1,%xmm3
addsd  %xmm0,%xmm3
movapd %xmm4,%xmm1
cmpltsd %xmm2,%xmm1
subsd  %xmm4,%xmm2
andpd  %xmm1,%xmm2
andnpd %xmm5,%xmm1
orpd   %xmm2,%xmm1
addsd  %xmm3,%xmm1
movsd  0x28(%rsp,%rdi,8),%xmm2
movapd %xmm4,%xmm3
cmpltsd %xmm2,%xmm3
subsd  %xmm4,%xmm2
andpd  %xmm3,%xmm2
andnpd %xmm5,%xmm3
orpd   %xmm2,%xmm3
addsd  %xmm1,%xmm3
movsd  0x30(%rsp,%rdi,8),%xmm1
movapd %xmm4,%xmm0
cmpltsd %xmm1,%xmm0
subsd  %xmm4,%xmm1
andpd  %xmm0,%xmm1
andnpd %xmm5,%xmm0
orpd   %xmm1,%xmm0
addsd  %xmm3,%xmm0
add    $0x4,%rdi
cmp    %rdi,%rdx
jne    12c0 <main+0x180>
add    $0x1,%rdi
test   %rcx,%rcx
je     139b <main+0x25b>
lea    (%rsp,%rdi,8),%rdx
add    $0x10,%rdx
xor    %edi,%edi
nopl   0x0(%rax)
movsd  (%rdx,%rdi,8),%xmm1
movapd %xmm4,%xmm2
cmpltsd %xmm1,%xmm2
subsd  %xmm4,%xmm1
andpd  %xmm2,%xmm1
andnpd %xmm5,%xmm2
orpd   %xmm1,%xmm2
addsd  %xmm2,%xmm0
add    $0x1,%rdi
cmp    %rdi,%rcx
jne    1370 <main+0x230>
test   %esi,%esi
jle    13e0 <main+0x2a0>
cltq
imul   $0x51eb851f,%rax,%rax
mov    %rax,%rdx
shr    $0x3f,%rdx
sar    $0x25,%rax
add    %edx,%eax
cvtsi2sd %eax,%xmm6
cmp    $0x3,%rbp
jae    13e9 <main+0x2a9>
xorpd  %xmm1,%xmm1
mov    $0x1,%eax
test   $0x3,%sil
jne    14a3 <main+0x363>
jmp    14db <main+0x39b>
nopw   0x0(%rax,%rax,1)
xorpd  %xmm1,%xmm1
jmp    14db <main+0x39b>
mov    %esi,%edx
and    $0xfffffffc,%edx
xorpd  %xmm1,%xmm1
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movsd  0x18(%rsp,%rax,8),%xmm3
movsd  0x20(%rsp,%rax,8),%xmm2
movapd %xmm6,%xmm4
subsd  %xmm3,%xmm4
cmpltsd %xmm6,%xmm3
andpd  %xmm3,%xmm4
andnpd %xmm5,%xmm3
orpd   %xmm4,%xmm3
addsd  %xmm1,%xmm3
movapd %xmm6,%xmm1
subsd  %xmm2,%xmm1
cmpltsd %xmm6,%xmm2
andpd  %xmm2,%xmm1
andnpd %xmm5,%xmm2
orpd   %xmm1,%xmm2
addsd  %xmm3,%xmm2
movsd  0x28(%rsp,%rax,8),%xmm3
movapd %xmm6,%xmm1
subsd  %xmm3,%xmm1
cmpltsd %xmm6,%xmm3
andpd  %xmm3,%xmm1
andnpd %xmm5,%xmm3
orpd   %xmm1,%xmm3
addsd  %xmm2,%xmm3
movsd  0x30(%rsp,%rax,8),%xmm1
movapd %xmm6,%xmm2
subsd  %xmm1,%xmm2
cmpltsd %xmm6,%xmm1
andpd  %xmm1,%xmm2
andnpd %xmm5,%xmm1
orpd   %xmm2,%xmm1
addsd  %xmm3,%xmm1
add    $0x4,%rax
cmp    %rax,%rdx
jne    1400 <main+0x2c0>
add    $0x1,%rax
test   $0x3,%sil
je     14db <main+0x39b>
lea    (%rsp,%rax,8),%rax
add    $0x10,%rax
xor    %edx,%edx
nopl   (%rax)
movsd  (%rax,%rdx,8),%xmm2
movapd %xmm6,%xmm3
subsd  %xmm2,%xmm3
cmpltsd %xmm6,%xmm2
andpd  %xmm2,%xmm3
andnpd %xmm5,%xmm2
orpd   %xmm3,%xmm2
addsd  %xmm2,%xmm1
add    $0x1,%rdx
cmp    %rdx,%rcx
jne    14b0 <main+0x370>
maxsd  %xmm1,%xmm0
lea    0xb33(%rip),%rdi
call   1040 <printf@plt>
mov    %r15,%rdi
mov    %r12,%rsi
xor    %eax,%eax
call   1050 <scanf@plt>
cmp    $0xffffffff,%eax
je     1509 <main+0x3c9>
mov    0x4(%rsp),%eax
test   %eax,%eax
jne    11a0 <main+0x60>
xor    %eax,%eax
add    $0x1f58,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [4 x i8] c"%d\0A\00"
@.str.1 = [5 x i8] c"%lf\0A\00"
@.str.2 = [8 x i8] c"$%.2lf\0A\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca [1001 x double]
%3 = alloca double
%4 = alloca double
%5 = alloca double
%6 = alloca double
%7 = alloca double
%8 = alloca i32
%9 = alloca i32
store i32 0, i32* %1
br label %10
10: ; preds = %110, %0
%11 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i32* %9)
%12 = icmp ne i32 %11, -1
br i1 %12, label %13, label %114
13: ; preds = %10
%14 = load i32, i32* %9
%15 = icmp ne i32 %14, 0
br i1 %15, label %17, label %16
16: ; preds = %13
br label %114
17: ; preds = %13
store double 0.000000e+00, double* %5
store i32 1, i32* %8
br label %18
18: ; preds = %33, %17
%19 = load i32, i32* %8
%20 = load i32, i32* %9
%21 = icmp sle i32 %19, %20
br i1 %21, label %22, label %36
22: ; preds = %18
%23 = load i32, i32* %8
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %24
%26 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), double* %25)
%27 = load i32, i32* %8
%28 = sext i32 %27 to i64
%29 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %28
%30 = load double, double* %29
%31 = load double, double* %5
%32 = fadd double %31, %30
store double %32, double* %5
br label %33
33: ; preds = %22
%34 = load i32, i32* %8
%35 = add nsw i32 %34, 1
store i32 %35, i32* %8
br label %18
36: ; preds = %18
%37 = load double, double* %5
%38 = load i32, i32* %9
%39 = sitofp i32 %38 to double
%40 = fdiv double %37, %39
%41 = fmul double %40, 1.000000e+02
%42 = call i32 @ceil(double %41)
%43 = sdiv i32 %42, 100
%44 = sitofp i32 %43 to double
store double %44, double* %3
%45 = load double, double* %5
%46 = load i32, i32* %9
%47 = sitofp i32 %46 to double
%48 = fdiv double %45, %47
%49 = fmul double %48, 1.000000e+02
%50 = call i32 @floor(double %49)
%51 = sdiv i32 %50, 100
%52 = sitofp i32 %51 to double
store double %52, double* %4
store double 0.000000e+00, double* %6
store double 0.000000e+00, double* %7
store i32 1, i32* %8
br label %53
53: ; preds = %74, %36
%54 = load i32, i32* %8
%55 = load i32, i32* %9
%56 = icmp sle i32 %54, %55
br i1 %56, label %57, label %77
57: ; preds = %53
%58 = load i32, i32* %8
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %59
%61 = load double, double* %60
%62 = load double, double* %3
%63 = fcmp ogt double %61, %62
br i1 %63, label %64, label %73
64: ; preds = %57
%65 = load i32, i32* %8
%66 = sext i32 %65 to i64
%67 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %66
%68 = load double, double* %67
%69 = load double, double* %3
%70 = fsub double %68, %69
%71 = load double, double* %6
%72 = fadd double %71, %70
store double %72, double* %6
br label %73
73: ; preds = %64, %57
br label %74
74: ; preds = %73
%75 = load i32, i32* %8
%76 = add nsw i32 %75, 1
store i32 %76, i32* %8
br label %53
77: ; preds = %53
store i32 1, i32* %8
br label %78
78: ; preds = %99, %77
%79 = load i32, i32* %8
%80 = load i32, i32* %9
%81 = icmp sle i32 %79, %80
br i1 %81, label %82, label %102
82: ; preds = %78
%83 = load i32, i32* %8
%84 = sext i32 %83 to i64
%85 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %84
%86 = load double, double* %85
%87 = load double, double* %4
%88 = fcmp olt double %86, %87
br i1 %88, label %89, label %98
89: ; preds = %82
%90 = load double, double* %4
%91 = load i32, i32* %8
%92 = sext i32 %91 to i64
%93 = getelementptr inbounds [1001 x double], [1001 x double]* %2, i64 0, i64 %92
%94 = load double, double* %93
%95 = fsub double %90, %94
%96 = load double, double* %7
%97 = fadd double %96, %95
store double %97, double* %7
br label %98
98: ; preds = %89, %82
br label %99
99: ; preds = %98
%100 = load i32, i32* %8
%101 = add nsw i32 %100, 1
store i32 %101, i32* %8
br label %78
102: ; preds = %78
%103 = load double, double* %6
%104 = load double, double* %7
%105 = fcmp ogt double %103, %104
br i1 %105, label %106, label %108
106: ; preds = %102
%107 = load double, double* %6
br label %110
108: ; preds = %102
%109 = load double, double* %7
br label %110
110: ; preds = %108, %106
%111 = phi double [ %107, %106 ], [ %109, %108 ]
store double %111, double* %5
%112 = load double, double* %5
%113 = call i32 @printf(i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.2, i64 0, i64 0), double %112)
br label %10
114: ; preds = %16, %10
ret i32 0
}

LLVM IR (-O2):
@.str = [4 x i8] c"%d\0A\00"
@.str.1 = [5 x i8] c"%lf\0A\00"
@.str.2 = [8 x i8] c"$%.2lf\0A\00"
define i32 @main() {
%1 = alloca [1001 x double]
%2 = alloca i32
%3 = bitcast [1001 x double]* %1 to i8*
%4 = bitcast i32* %2 to i8*
%5 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i32* %2)
%6 = icmp ne i32 %5, -1
%7 = load i32, i32* %2
%8 = icmp ne i32 %7, 0
%9 = select i1 %6, i1 %8, i1 false
br i1 %9, label %10, label %173
10: ; preds = %0, %162
%11 = phi i32 [ %170, %162 ], [ %7, %0 ]
%12 = icmp slt i32 %11, 1
br i1 %12, label %24, label %13
13: ; preds = %10, %13
%14 = phi i64 [ %20, %13 ], [ 1, %10 ]
%15 = phi double [ %19, %13 ], [ 0.000000e+00, %10 ]
%16 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %14
%17 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.1, i64 0, i64 0), double* %16)
%18 = load double, double* %16
%19 = fadd double %15, %18
%20 = add nuw nsw i64 %14, 1
%21 = load i32, i32* %2
%22 = sext i32 %21 to i64
%23 = icmp slt i64 %14, %22
br i1 %23, label %13, label %24
24: ; preds = %13, %10
%25 = phi double [ 0.000000e+00, %10 ], [ %19, %13 ]
%26 = phi i32 [ %11, %10 ], [ %21, %13 ]
%27 = sitofp i32 %26 to double
%28 = fdiv double %25, %27
%29 = fmul double %28, 1.000000e+02
%30 = call i32 @ceil(double %29)
%31 = sdiv i32 %30, 100
%32 = sitofp i32 %31 to double
%33 = load i32, i32* %2
%34 = sitofp i32 %33 to double
%35 = fdiv double %25, %34
%36 = fmul double %35, 1.000000e+02
%37 = call i32 @floor(double %36)
%38 = sdiv i32 %37, 100
%39 = sitofp i32 %38 to double
%40 = load i32, i32* %2
%41 = icmp slt i32 %40, 1
br i1 %41, label %162, label %42
42: ; preds = %24
%43 = add nuw i32 %40, 1
%44 = zext i32 %43 to i64
%45 = add nsw i64 %44, -1
%46 = add nsw i64 %44, -2
%47 = and i64 %45, 3
%48 = icmp ult i64 %46, 3
br i1 %48, label %51, label %49
49: ; preds = %42
%50 = and i64 %45, -4
br label %76
51: ; preds = %76, %42
%52 = phi double [ undef, %42 ], [ %106, %76 ]
%53 = phi i64 [ 1, %42 ], [ %107, %76 ]
%54 = phi double [ 0.000000e+00, %42 ], [ %106, %76 ]
%55 = icmp eq i64 %47, 0
br i1 %55, label %69, label %56
56: ; preds = %51, %56
%57 = phi i64 [ %66, %56 ], [ %53, %51 ]
%58 = phi double [ %65, %56 ], [ %54, %51 ]
%59 = phi i64 [ %67, %56 ], [ 0, %51 ]
%60 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %57
%61 = load double, double* %60
%62 = fcmp ogt double %61, %32
%63 = fsub double %61, %32
%64 = select i1 %62, double %63, double -0.000000e+00
%65 = fadd double %58, %64
%66 = add nuw nsw i64 %57, 1
%67 = add i64 %59, 1
%68 = icmp eq i64 %67, %47
br i1 %68, label %69, label %56
69: ; preds = %56, %51
%70 = phi double [ %52, %51 ], [ %65, %56 ]
br i1 %41, label %162, label %71
71: ; preds = %69
%72 = and i64 %45, 3
%73 = icmp ult i64 %46, 3
br i1 %73, label %144, label %74
74: ; preds = %71
%75 = and i64 %45, -4
br label %110
76: ; preds = %76, %49
%77 = phi i64 [ 1, %49 ], [ %107, %76 ]
%78 = phi double [ 0.000000e+00, %49 ], [ %106, %76 ]
%79 = phi i64 [ 0, %49 ], [ %108, %76 ]
%80 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %77
%81 = load double, double* %80
%82 = fcmp ogt double %81, %32
%83 = fsub double %81, %32
%84 = select i1 %82, double %83, double -0.000000e+00
%85 = fadd double %78, %84
%86 = add nuw nsw i64 %77, 1
%87 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %86
%88 = load double, double* %87
%89 = fcmp ogt double %88, %32
%90 = fsub double %88, %32
%91 = select i1 %89, double %90, double -0.000000e+00
%92 = fadd double %85, %91
%93 = add nuw nsw i64 %77, 2
%94 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %93
%95 = load double, double* %94
%96 = fcmp ogt double %95, %32
%97 = fsub double %95, %32
%98 = select i1 %96, double %97, double -0.000000e+00
%99 = fadd double %92, %98
%100 = add nuw nsw i64 %77, 3
%101 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %100
%102 = load double, double* %101
%103 = fcmp ogt double %102, %32
%104 = fsub double %102, %32
%105 = select i1 %103, double %104, double -0.000000e+00
%106 = fadd double %99, %105
%107 = add nuw nsw i64 %77, 4
%108 = add i64 %79, 4
%109 = icmp eq i64 %108, %50
br i1 %109, label %51, label %76
110: ; preds = %110, %74
%111 = phi i64 [ 1, %74 ], [ %141, %110 ]
%112 = phi double [ 0.000000e+00, %74 ], [ %140, %110 ]
%113 = phi i64 [ 0, %74 ], [ %142, %110 ]
%114 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %111
%115 = load double, double* %114
%116 = fcmp olt double %115, %39
%117 = fsub double %39, %115
%118 = select i1 %116, double %117, double -0.000000e+00
%119 = fadd double %112, %118
%120 = add nuw nsw i64 %111, 1
%121 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %120
%122 = load double, double* %121
%123 = fcmp olt double %122, %39
%124 = fsub double %39, %122
%125 = select i1 %123, double %124, double -0.000000e+00
%126 = fadd double %119, %125
%127 = add nuw nsw i64 %111, 2
%128 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %127
%129 = load double, double* %128
%130 = fcmp olt double %129, %39
%131 = fsub double %39, %129
%132 = select i1 %130, double %131, double -0.000000e+00
%133 = fadd double %126, %132
%134 = add nuw nsw i64 %111, 3
%135 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %134
%136 = load double, double* %135
%137 = fcmp olt double %136, %39
%138 = fsub double %39, %136
%139 = select i1 %137, double %138, double -0.000000e+00
%140 = fadd double %133, %139
%141 = add nuw nsw i64 %111, 4
%142 = add i64 %113, 4
%143 = icmp eq i64 %142, %75
br i1 %143, label %144, label %110
144: ; preds = %110, %71
%145 = phi double [ undef, %71 ], [ %140, %110 ]
%146 = phi i64 [ 1, %71 ], [ %141, %110 ]
%147 = phi double [ 0.000000e+00, %71 ], [ %140, %110 ]
%148 = icmp eq i64 %72, 0
br i1 %148, label %162, label %149
149: ; preds = %144, %149
%150 = phi i64 [ %159, %149 ], [ %146, %144 ]
%151 = phi double [ %158, %149 ], [ %147, %144 ]
%152 = phi i64 [ %160, %149 ], [ 0, %144 ]
%153 = getelementptr inbounds [1001 x double], [1001 x double]* %1, i64 0, i64 %150
%154 = load double, double* %153
%155 = fcmp olt double %154, %39
%156 = fsub double %39, %154
%157 = select i1 %155, double %156, double -0.000000e+00
%158 = fadd double %151, %157
%159 = add nuw nsw i64 %150, 1
%160 = add i64 %152, 1
%161 = icmp eq i64 %160, %72
br i1 %161, label %162, label %149
162: ; preds = %144, %149, %24, %69
%163 = phi double [ %70, %69 ], [ 0.000000e+00, %24 ], [ %70, %149 ], [ %70, %144 ]
%164 = phi double [ 0.000000e+00, %69 ], [ 0.000000e+00, %24 ], [ %145, %144 ], [ %158, %149 ]
%165 = fcmp ogt double %163, %164
%166 = select i1 %165, double %163, double %164
%167 = call i32 @printf(i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str.2, i64 0, i64 0), double %166)
%168 = call i32 (i8*, ...) @scanf(i8* getelementptr inbounds ([4 x i8], [4 x i8]* @.str, i64 0, i64 0), i32* %2)
%169 = icmp ne i32 %168, -1
%170 = load i32, i32* %2
%171 = icmp ne i32 %170, 0
%172 = select i1 %169, i1 %171, i1 false
br i1 %172, label %10, label %173
173: ; preds = %162, %0
ret i32 0
}