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