// File: /workspace/github_c_makefile_star2_O0/olcaytaner[P]Isell/tests.c
// Function: scheffe
int scheffe(char **files,int *which,double confidence,double *real_confidence)
{
 /*Last Changed 02.02.2004 added safemalloc*/
 /*Last Changed 07.05.2001*/
 /*One Tailed Test for H0: mu1 <= mu2 H1: mu1 > mu2*/
 /*Two Tailed Test for H0: mu1 = mu2 H1: mu1 != mu2*/
 /*confidence = 0.95 for alpha = 0.05, confidence = 0.99 for alpha = 0.01 etc.*/
 int i, j, counts[2], df;
 double means[2], **observations, mse, sse = 0.0, variance, c1min, c1max, res, tmp;
 observations = read_observations_for_two_file(files, counts);
 if (!observations)
  {
   *real_confidence = 0.5;
   return 0;
  }
 for (i = 0; i < 2; i++)
  {
   means[i] = 0.0;
   for (j = 0; j < counts[i]; j++)
     means[i] += observations[i][j];
   means[i] /= counts[i];
  }
 if (means[0] > means[1])
   (*which) = 1;
 else
   (*which) = 2;
 if (!get_parameter_o("accuracy")) 
   (*which) = 3 - (*which);    
 for (i = 0; i < 2; i++)
   for (j = 0; j < counts[i]; j++)
     sse += pow(observations[i][j] - means[i], 2);
 df = counts[0] + counts[1] - 2;
 mse = sse / df;
 free_2d((void**) observations, 2);
 variance = sqrt(mse * (1.0 / counts[0] + 1.0 / counts[1]));
 tmp = fabs(means[0] - means[1]) / variance;
 (*real_confidence) = 1 - f_distribution(tmp * tmp, 1, df);
 if (get_parameter_i("tailed") == 2)
  {
   res = sqrt(f_distribution_inverse(1 - confidence, 1, df));
   c1min = means[0] - means[1] - variance * res;
   c1max = means[0] - means[1] + variance * res;
   if ((c1min < 0) && (c1max > 0))
     return 0;
   else
     return 1;
  }
 else
   printf(m1316);
 return 0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x90, %rsp
movq %rdi, -0x10(%rbp)
movq %rsi, -0x18(%rbp)
movsd %xmm0, -0x20(%rbp)
movq %rdx, -0x28(%rbp)
xorps %xmm0, %xmm0
movsd %xmm0, -0x68(%rbp)
movq -0x10(%rbp), %rdi
leaq -0x38(%rbp), %rsi
callq 0xd2020
movq %rax, -0x58(%rbp)
cmpq $0x0, -0x58(%rbp)
jne 0xd7548
movq -0x28(%rbp), %rax
movsd 0xb480(%rip), %xmm0     # 0xe29b8
movsd %xmm0, (%rax)
movl $0x0, -0x4(%rbp)
jmp 0xd7818
movl $0x0, -0x2c(%rbp)
cmpl $0x2, -0x2c(%rbp)
jge 0xd75cf
movslq -0x2c(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, -0x50(%rbp,%rax,8)
movl $0x0, -0x30(%rbp)
movl -0x30(%rbp), %eax
movslq -0x2c(%rbp), %rcx
cmpl -0x38(%rbp,%rcx,4), %eax
jge 0xd75a6
movq -0x58(%rbp), %rax
movslq -0x2c(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movslq -0x2c(%rbp), %rax
addsd -0x50(%rbp,%rax,8), %xmm0
movsd %xmm0, -0x50(%rbp,%rax,8)
movl -0x30(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x30(%rbp)
jmp 0xd7569
movslq -0x2c(%rbp), %rax
cvtsi2sdl -0x38(%rbp,%rax,4), %xmm1
movslq -0x2c(%rbp), %rax
movsd -0x50(%rbp,%rax,8), %xmm0
divsd %xmm1, %xmm0
movsd %xmm0, -0x50(%rbp,%rax,8)
movl -0x2c(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x2c(%rbp)
jmp 0xd754f
movsd -0x50(%rbp), %xmm0
ucomisd -0x48(%rbp), %xmm0
jbe 0xd75e7
movq -0x18(%rbp), %rax
movl $0x1, (%rax)
jmp 0xd75f1
movq -0x18(%rbp), %rax
movl $0x2, (%rax)
leaq 0x10dc4(%rip), %rdi     # 0xe83bc
callq 0x79440
cmpl $0x0, %eax
jne 0xd7613
movq -0x18(%rbp), %rax
movl $0x3, %ecx
subl (%rax), %ecx
movq -0x18(%rbp), %rax
movl %ecx, (%rax)
movl $0x0, -0x2c(%rbp)
cmpl $0x2, -0x2c(%rbp)
jge 0xd7682
movl $0x0, -0x30(%rbp)
movl -0x30(%rbp), %eax
movslq -0x2c(%rbp), %rcx
cmpl -0x38(%rbp,%rcx,4), %eax
jge 0xd7675
movq -0x58(%rbp), %rax
movslq -0x2c(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x30(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movslq -0x2c(%rbp), %rax
subsd -0x50(%rbp,%rax,8), %xmm0
movsd 0xb645(%rip), %xmm1     # 0xe2ca0
callq 0x4290
addsd -0x68(%rbp), %xmm0
movsd %xmm0, -0x68(%rbp)
movl -0x30(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x30(%rbp)
jmp 0xd7627
jmp 0xd7677
movl -0x2c(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x2c(%rbp)
jmp 0xd761a
movl -0x38(%rbp), %eax
addl -0x34(%rbp), %eax
subl $0x2, %eax
movl %eax, -0x3c(%rbp)
movsd -0x68(%rbp), %xmm0
cvtsi2sdl -0x3c(%rbp), %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, -0x60(%rbp)
movq -0x58(%rbp), %rdi
movl $0x2, %esi
callq 0x52e20
movsd -0x60(%rbp), %xmm0
cvtsi2sdl -0x38(%rbp), %xmm2
movsd 0xa957(%rip), %xmm1     # 0xe2018
divsd %xmm2, %xmm1
cvtsi2sdl -0x34(%rbp), %xmm3
movsd 0xa946(%rip), %xmm2     # 0xe2018
divsd %xmm3, %xmm2
addsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
callq 0x42a0
movsd %xmm0, -0x70(%rbp)
movsd -0x50(%rbp), %xmm0
subsd -0x48(%rbp), %xmm0
movaps 0xb767(%rip), %xmm1     # 0xe2e60
pand %xmm1, %xmm0
divsd -0x70(%rbp), %xmm0
movsd %xmm0, -0x90(%rbp)
movsd -0x90(%rbp), %xmm0
mulsd -0x90(%rbp), %xmm0
movl -0x3c(%rbp), %esi
movl $0x1, %edi
callq 0x2ddf0
movaps %xmm0, %xmm1
movsd 0xa8e6(%rip), %xmm0     # 0xe2018
subsd %xmm1, %xmm0
movq -0x28(%rbp), %rax
movsd %xmm0, (%rax)
leaq 0x11aff(%rip), %rdi     # 0xe9244
callq 0x78f10
cmpl $0x2, %eax
jne 0xd7803
movsd 0xa8bd(%rip), %xmm0     # 0xe2018
subsd -0x20(%rbp), %xmm0
movl -0x3c(%rbp), %esi
movl $0x1, %edi
callq 0x2e160
callq 0x42a0
movsd %xmm0, -0x88(%rbp)
movsd -0x50(%rbp), %xmm1
subsd -0x48(%rbp), %xmm1
movsd -0x70(%rbp), %xmm0
movsd -0x88(%rbp), %xmm2
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x78(%rbp)
movsd -0x50(%rbp), %xmm1
subsd -0x48(%rbp), %xmm1
movsd -0x70(%rbp), %xmm0
movsd -0x88(%rbp), %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x80(%rbp)
xorps %xmm0, %xmm0
ucomisd -0x78(%rbp), %xmm0
jbe 0xd77fa
movsd -0x80(%rbp), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jbe 0xd77fa
movl $0x0, -0x4(%rbp)
jmp 0xd7818
movl $0x1, -0x4(%rbp)
jmp 0xd7818
leaq 0x16bdc(%rip), %rdi     # 0xee3e6
movb $0x0, %al
callq 0x4030
movl $0x0, -0x4(%rbp)
movl -0x4(%rbp), %eax
addq $0x90, %rsp
popq %rbp
retq
nopw %cs:(%rax,%rax)