2362N/A * Copyright (c) 2003, Oracle and/or its affiliates. All rights reserved. 809N/A * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 809N/A * This code is free software; you can redistribute it and/or modify it 809N/A * under the terms of the GNU General Public License version 2 only, as 809N/A * published by the Free Software Foundation. 809N/A * This code is distributed in the hope that it will be useful, but WITHOUT 809N/A * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or 809N/A * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License 809N/A * version 2 for more details (a copy is included in the LICENSE file that 809N/A * accompanied this code). 809N/A * You should have received a copy of the GNU General Public License version 809N/A * 2 along with this work; if not, write to the Free Software Foundation, 809N/A * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA. 2362N/A * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA 2362N/A * or visit www.oracle.com if you need additional information or have any 809N/A * Shared static test methods for numerical tests. Sharing these 809N/A * helper test methods avoids repeated functions in the various test 809N/A * programs. The test methods return 1 for a test failure and 0 for 809N/A * success. The order of arguments to the test methods is generally 809N/A * the test name, followed by the test arguments, the computed result, 809N/A * and finally the expected result. 809N/A // We assume we won't be unlucky and have an inexact expected 809N/A // be nextDown(2^i) when 2^i would be the correctly rounded 809N/A // answer. This would cause the ulp size to be half as large 809N/A // as it should be, doubling the measured error). 809N/A return 0;
// result and expected are equivalent 809N/A // Equivalent results required but not found 809N/A // fail if greater than or unordered 809N/A "\tdifference greater than ulp tolerance " +
ulps);
809N/A // Two input arguments. 809N/A "\tdifference greater than ulp tolerance " +
ulps);
809N/A // For a successful test, the result must be within the ulp bound of 809N/A // expected AND the result must have absolute value less than or 809N/A "\tdifference greater than ulp tolerance " +
ulps +
809N/A // For a successful test, the result must be within the ulp bound of 809N/A // expected AND the result must have absolute value greater than 809N/A // or equal to the lowerBound. 809N/A "\ndifference greater than ulp tolerance " +
ulps +
809N/A // fail if greater than or unordered