blob: ad20b0598b3545a93a75a26541d6e46adf1a829d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
|
/* $Id$ */
/**************************************************************************
*
* Copyright (C) 1995 Silicon Graphics, Inc.
*
* These coded instructions, statements, and computer programs were
* developed by SGI for public use. If any changes are made to this code
* please try to get the changes back to the author. Feel free to make
* modifications and changes to the code and release it.
*
**************************************************************************/
/* FUZZ: disable check_for_math_include */
#include <math.h>
#include <stdlib.h>
#include "sysdep.h"
#include "bench.h"
double
mean(const double sum, const int n)
{
if (n)
{
return(sum / n);
}
else
{
return(0);
}
}
double
variance(const double sum, const double sumofsquares, const int n)
{
double meanofsum;
meanofsum = mean(sum, n);
return (mean(sumofsquares,n) - (meanofsum * meanofsum));
}
double
stddev(const double sum, const double sumofsquares, const int n)
{
return(sqrt(fabs(variance(sum, sumofsquares, n))));
}
|
