1178476Sjb/*
2178476Sjb * CDDL HEADER START
3178476Sjb *
4178476Sjb * The contents of this file are subject to the terms of the
5178476Sjb * Common Development and Distribution License (the "License").
6178476Sjb * You may not use this file except in compliance with the License.
7178476Sjb *
8178476Sjb * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9178476Sjb * or http://www.opensolaris.org/os/licensing.
10178476Sjb * See the License for the specific language governing permissions
11178476Sjb * and limitations under the License.
12178476Sjb *
13178476Sjb * When distributing Covered Code, include this CDDL HEADER in each
14178476Sjb * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15178476Sjb * If applicable, add the following below this CDDL HEADER, with the
16178476Sjb * fields enclosed by brackets "[]" replaced with your own identifying
17178476Sjb * information: Portions Copyright [yyyy] [name of copyright owner]
18178476Sjb *
19178476Sjb * CDDL HEADER END
20178476Sjb */
21178476Sjb
22178476Sjb/*
23210767Srpaulo * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
24178476Sjb * Use is subject to license terms.
25178476Sjb */
26178476Sjb
27178476Sjb/*
28178476Sjb * ASSERTION:
29210767Srpaulo *     Positive stddev() test
30178476Sjb *
31178476Sjb * SECTION: Aggregations/Aggregations
32178476Sjb *
33178476Sjb * NOTES: This is a simple verifiable positive test of the stddev() function.
34210767Srpaulo *     printa() for one aggregation, default printing behavior for the other
35210767Srpaulo *     so that we exercise both code paths.
36178476Sjb */
37178476Sjb
38178476Sjb#pragma D option quiet
39178476Sjb
40178476SjbBEGIN
41178476Sjb{
42178476Sjb	@a = stddev(5000000000);
43178476Sjb	@a = stddev(5000000100);
44178476Sjb	@a = stddev(5000000200);
45178476Sjb	@a = stddev(5000000300);
46178476Sjb	@a = stddev(5000000400);
47178476Sjb	@a = stddev(5000000500);
48178476Sjb	@a = stddev(5000000600);
49178476Sjb	@a = stddev(5000000700);
50178476Sjb	@a = stddev(5000000800);
51178476Sjb	@a = stddev(5000000900);
52178476Sjb	@b = stddev(-5000000000);
53178476Sjb	@b = stddev(-5000000100);
54178476Sjb	@b = stddev(-5000000200);
55178476Sjb	@b = stddev(-5000000300);
56178476Sjb	@b = stddev(-5000000400);
57178476Sjb	@b = stddev(-5000000500);
58178476Sjb	@b = stddev(-5000000600);
59178476Sjb	@b = stddev(-5000000700);
60178476Sjb	@b = stddev(-5000000800);
61178476Sjb	@b = stddev(-5000000900);
62210767Srpaulo	printa("%@d\n", @a);
63178476Sjb	exit(0);
64178476Sjb}
65