#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 /*<<< orphan*/ pearsn(float *, float *, int, float *, float *, float *);
int /*<<< orphan*/ printf(char *, ...);
int main(void) {
  int i;
  float prob, r, z;
  static float dose[10 + 1] = {0.0,  56.1, 64.1, 70.0,  66.6, 82.0,
                               91.3, 90.0, 99.7, 115.3, 110.0};
  static float spore[10 + 1] = {0.0,  0.11, 0.40, 0.37, 0.48, 0.75,
                                0.66, 0.71, 1.20, 1.01, 0.95};
  printf("\nEffect of Gamma Rays on Man-in-the-Moon Marigolds\n");
  printf("%16s %23s\n", "Count Rate (cpm)", "Pollen Index");
  for (i = 1; i <= 10; i++)
    printf("%10.2f %25.2f \n", dose[i], spore[i]);
  pearsn(dose, spore, 10, &r, &prob, &z);
  printf("\n%30s %16s\n", "PEARSN", "Expected");
  printf("%s %8s %9f %15f\n", "Corr. Coeff.", " ", r, 0.9069586);
  printf("%s %9s %9f %15f\n", "Probability", " ", prob, 0.2926505e-3);
  printf("%s %10s %9f %15f\n", "Fisher's z", " ", z, 1.510110);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
movl   $0x0,-0x4(%rbp)
lea    0xee2(%rip),%rdi
mov    $0x0,%al
call   1030 <printf@plt>
lea    0xf08(%rip),%rdi
lea    0xf0c(%rip),%rsi
lea    0xf16(%rip),%rdx
mov    $0x0,%al
call   1030 <printf@plt>
movl   $0x1,-0x8(%rbp)
cmpl   $0xa,-0x8(%rbp)
jg     11ae <main+0x8e>
movslq -0x8(%rbp),%rcx
lea    0x2ecb(%rip),%rax
movss  (%rax,%rcx,4),%xmm0
cvtss2sd %xmm0,%xmm0
movslq -0x8(%rbp),%rcx
lea    0x2ee7(%rip),%rax
movss  (%rax,%rcx,4),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xedc(%rip),%rdi
mov    $0x2,%al
call   1030 <printf@plt>
mov    -0x8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x8(%rbp)
jmp    1160 <main+0x40>
lea    0x2e8b(%rip),%rdi
lea    0x2eb4(%rip),%rsi
mov    $0xa,%edx
lea    -0x10(%rbp),%rcx
lea    -0xc(%rbp),%r8
lea    -0x14(%rbp),%r9
call   1040 <pearsn@plt>
lea    0xeac(%rip),%rdi
lea    0xeb1(%rip),%rsi
lea    0xeb1(%rip),%rdx
mov    $0x0,%al
call   1030 <printf@plt>
movss  -0x10(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xea3(%rip),%rdi
lea    0xead(%rip),%rsi
lea    0xeb3(%rip),%rdx
movsd  0xdfc(%rip),%xmm1
mov    $0x2,%al
call   1030 <printf@plt>
movss  -0xc(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xe96(%rip),%rdi
lea    0xea0(%rip),%rsi
lea    0xe86(%rip),%rdx
movsd  0xdc7(%rip),%xmm1
mov    $0x2,%al
call   1030 <printf@plt>
movss  -0x14(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xe86(%rip),%rdi
lea    0xe91(%rip),%rsi
lea    0xe59(%rip),%rdx
movsd  0xd92(%rip),%xmm1
mov    $0x2,%al
call   1030 <printf@plt>
xor    %eax,%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %r15
push   %r14
push   %rbx
sub    $0x10,%rsp
lea    0xf87(%rip),%rdi
call   1030 <puts@plt>
lea    0xecc(%rip),%rdi
lea    0xed0(%rip),%rsi
lea    0xeda(%rip),%rdx
xor    %eax,%eax
call   1040 <printf@plt>
lea    0x2ed8(%rip),%r14
movss  0x2ed4(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0x2ef5(%rip),%r15
movss  0x2ef1(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xeb3(%rip),%rbx
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2ea8(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2ecc(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2e8a(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2eae(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2e6c(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2e90(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2e4e(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2e72(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2e30(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2e54(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2e12(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2e36(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2df4(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2e18(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2dd6(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2dfa(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x2db8(%rip),%xmm0
cvtss2sd %xmm0,%xmm0
movss  0x2ddc(%rip),%xmm1
cvtss2sd %xmm1,%xmm1
mov    %rbx,%rdi
mov    $0x2,%al
call   1040 <printf@plt>
lea    0x8(%rsp),%rcx
lea    0xc(%rsp),%r8
lea    0x4(%rsp),%r9
mov    %r14,%rdi
mov    %r15,%rsi
mov    $0xa,%edx
call   1050 <pearsn@plt>
lea    0xd61(%rip),%rdi
lea    0xd66(%rip),%rsi
lea    0xd66(%rip),%rdx
xor    %eax,%eax
call   1040 <printf@plt>
movss  0x8(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xd57(%rip),%rdi
lea    0xd61(%rip),%rsi
lea    0xd67(%rip),%rbx
movsd  0xcd4(%rip),%xmm1
mov    %rbx,%rdx
mov    $0x2,%al
call   1040 <printf@plt>
movss  0xc(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xd46(%rip),%rdi
lea    0xd50(%rip),%rsi
movsd  0xcb2(%rip),%xmm1
mov    %rbx,%rdx
mov    $0x2,%al
call   1040 <printf@plt>
movss  0x4(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
lea    0xd39(%rip),%rdi
lea    0xd44(%rip),%rsi
movsd  0xc90(%rip),%xmm1
mov    %rbx,%rdx
mov    $0x2,%al
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x10,%rsp
pop    %rbx
pop    %r14
pop    %r15
ret

LLVM IR (-O0):
@main.dose = internal global [11 x float] [float 0.000000e+00, float 0x404C0CCCC0000000, float 0x4050066660000000, float 7.000000e+01, float 0x4050A66660000000, float 8.200000e+01, float 0x4056D33340000000, float 9.000000e+01, float 0x4058ECCCC0000000, float 0x405CD33340000000, float 1.100000e+02]
@main.spore = internal global [11 x float] [float 0.000000e+00, float 0x3FBC28F5C0000000, float 0x3FD99999A0000000, float 0x3FD7AE1480000000, float 0x3FDEB851E0000000, float 7.500000e-01, float 0x3FE51EB860000000, float 0x3FE6B851E0000000, float 0x3FF3333340000000, float 0x3FF028F5C0000000, float 0x3FEE666660000000]
@.str = [52 x i8] c"\0AEffect of Gamma Rays on Man-in-the-Moon Marigolds\0A\00"
@.str.1 = [11 x i8] c"%16s %23s\0A\00"
@.str.2 = [17 x i8] c"Count Rate (cpm)\00"
@.str.3 = [13 x i8] c"Pollen Index\00"
@.str.4 = [16 x i8] c"%10.2f %25.2f \0A\00"
@.str.5 = [12 x i8] c"\0A%30s %16s\0A\00"
@.str.6 = [7 x i8] c"PEARSN\00"
@.str.7 = [9 x i8] c"Expected\00"
@.str.8 = [17 x i8] c"%s %8s %9f %15f\0A\00"
@.str.9 = [13 x i8] c"Corr. Coeff.\00"
@.str.10 = [2 x i8] c" \00"
@.str.11 = [17 x i8] c"%s %9s %9f %15f\0A\00"
@.str.12 = [12 x i8] c"Probability\00"
@.str.13 = [18 x i8] c"%s %10s %9f %15f\0A\00"
@.str.14 = [11 x i8] c"Fisher's z\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca i32
%3 = alloca float
%4 = alloca float
%5 = alloca float
store i32 0, i32* %1
%6 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([52 x i8], [52 x i8]* @.str, i64 0, i64 0))
%7 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.1, i64 0, i64 0), i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0), i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.3, i64 0, i64 0))
store i32 1, i32* %2
br label %8
8: ; preds = %23, %0
%9 = load i32, i32* %2
%10 = icmp sle i32 %9, 10
br i1 %10, label %11, label %26
11: ; preds = %8
%12 = load i32, i32* %2
%13 = sext i32 %12 to i64
%14 = getelementptr inbounds [11 x float], [11 x float]* @main.dose, i64 0, i64 %13
%15 = load float, float* %14
%16 = fpext float %15 to double
%17 = load i32, i32* %2
%18 = sext i32 %17 to i64
%19 = getelementptr inbounds [11 x float], [11 x float]* @main.spore, i64 0, i64 %18
%20 = load float, float* %19
%21 = fpext float %20 to double
%22 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %16, double %21)
br label %23
23: ; preds = %11
%24 = load i32, i32* %2
%25 = add nsw i32 %24, 1
store i32 %25, i32* %2
br label %8
26: ; preds = %8
%27 = call i32 @pearsn(float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 0), float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 0), i32 10, float* %4, float* %3, float* %5)
%28 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.5, i64 0, i64 0), i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%29 = load float, float* %4
%30 = fpext float %29 to double
%31 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.8, i64 0, i64 0), i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.9, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %30, double 0x3FED05CE0ABA6E25)
%32 = load float, float* %3
%33 = fpext float %32 to double
%34 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.11, i64 0, i64 0), i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.12, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %33, double 0x3F332DDC539FDCA1)
%35 = load float, float* %5
%36 = fpext float %35 to double
%37 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str.13, i64 0, i64 0), i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.14, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %36, double 1.510110e+00)
ret i32 0
}

LLVM IR (-O2):
@main.dose = internal global [11 x float] [float 0.000000e+00, float 0x404C0CCCC0000000, float 0x4050066660000000, float 7.000000e+01, float 0x4050A66660000000, float 8.200000e+01, float 0x4056D33340000000, float 9.000000e+01, float 0x4058ECCCC0000000, float 0x405CD33340000000, float 1.100000e+02]
@main.spore = internal global [11 x float] [float 0.000000e+00, float 0x3FBC28F5C0000000, float 0x3FD99999A0000000, float 0x3FD7AE1480000000, float 0x3FDEB851E0000000, float 7.500000e-01, float 0x3FE51EB860000000, float 0x3FE6B851E0000000, float 0x3FF3333340000000, float 0x3FF028F5C0000000, float 0x3FEE666660000000]
@.str.1 = [11 x i8] c"%16s %23s\0A\00"
@.str.2 = [17 x i8] c"Count Rate (cpm)\00"
@.str.3 = [13 x i8] c"Pollen Index\00"
@.str.4 = [16 x i8] c"%10.2f %25.2f \0A\00"
@.str.5 = [12 x i8] c"\0A%30s %16s\0A\00"
@.str.6 = [7 x i8] c"PEARSN\00"
@.str.7 = [9 x i8] c"Expected\00"
@.str.8 = [17 x i8] c"%s %8s %9f %15f\0A\00"
@.str.9 = [13 x i8] c"Corr. Coeff.\00"
@.str.10 = [2 x i8] c" \00"
@.str.11 = [17 x i8] c"%s %9s %9f %15f\0A\00"
@.str.12 = [12 x i8] c"Probability\00"
@.str.13 = [18 x i8] c"%s %10s %9f %15f\0A\00"
@.str.14 = [11 x i8] c"Fisher's z\00"
@str = [51 x i8] c"\0AEffect of Gamma Rays on Man-in-the-Moon Marigolds\00"
define i32 @main() {
%1 = alloca float
%2 = alloca float
%3 = alloca float
%4 = bitcast float* %1 to i8*
%5 = bitcast float* %2 to i8*
%6 = bitcast float* %3 to i8*
%7 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([51 x i8], [51 x i8]* @str, i64 0, i64 0))
%8 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @.str.1, i64 0, i64 0), i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.2, i64 0, i64 0), i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.3, i64 0, i64 0))
%9 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 1)
%10 = fpext float %9 to double
%11 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 1)
%12 = fpext float %11 to double
%13 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %10, double %12)
%14 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 2)
%15 = fpext float %14 to double
%16 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 2)
%17 = fpext float %16 to double
%18 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %15, double %17)
%19 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 3)
%20 = fpext float %19 to double
%21 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 3)
%22 = fpext float %21 to double
%23 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %20, double %22)
%24 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 4)
%25 = fpext float %24 to double
%26 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 4)
%27 = fpext float %26 to double
%28 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %25, double %27)
%29 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 5)
%30 = fpext float %29 to double
%31 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 5)
%32 = fpext float %31 to double
%33 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %30, double %32)
%34 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 6)
%35 = fpext float %34 to double
%36 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 6)
%37 = fpext float %36 to double
%38 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %35, double %37)
%39 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 7)
%40 = fpext float %39 to double
%41 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 7)
%42 = fpext float %41 to double
%43 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %40, double %42)
%44 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 8)
%45 = fpext float %44 to double
%46 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 8)
%47 = fpext float %46 to double
%48 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %45, double %47)
%49 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 9)
%50 = fpext float %49 to double
%51 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 9)
%52 = fpext float %51 to double
%53 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %50, double %52)
%54 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 10)
%55 = fpext float %54 to double
%56 = load float, float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 10)
%57 = fpext float %56 to double
%58 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([16 x i8], [16 x i8]* @.str.4, i64 0, i64 0), double %55, double %57)
%59 = call i32 @pearsn(float* getelementptr inbounds ([11 x float], [11 x float]* @main.dose, i64 0, i64 0), float* getelementptr inbounds ([11 x float], [11 x float]* @main.spore, i64 0, i64 0), i32 10, float* %2, float* %1, float* %3)
%60 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([12 x i8], [12 x i8]* @.str.5, i64 0, i64 0), i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.6, i64 0, i64 0), i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.7, i64 0, i64 0))
%61 = load float, float* %2
%62 = fpext float %61 to double
%63 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([17 x i8], [17 x i8]* @.str.8, i64 0, i64 0), i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.9, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %62, double 0x3FED05CE0ABA6E25)
%64 = load float, float* %1
%65 = fpext float %64 to double
%66 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([17 x i8], [17 x i8]* @.str.11, i64 0, i64 0), i8* getelementptr inbounds ([12 x i8], [12 x i8]* @.str.12, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %65, double 0x3F332DDC539FDCA1)
%67 = load float, float* %3
%68 = fpext float %67 to double
%69 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.13, i64 0, i64 0), i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.14, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.10, i64 0, i64 0), double %68, double 1.510110e+00)
ret i32 0
}