1 2/* @(#)e_acosh.c 1.3 95/01/18 */ 3/* 4 * ==================================================== 5 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 6 * 7 * Developed at SunSoft, a Sun Microsystems, Inc. business. 8 * Permission to use, copy, modify, and distribute this 9 * software is freely granted, provided that this notice 10 * is preserved. 11 * ==================================================== 12 * 13 */ 14
| 1 2/* @(#)e_acosh.c 1.3 95/01/18 */ 3/* 4 * ==================================================== 5 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved. 6 * 7 * Developed at SunSoft, a Sun Microsystems, Inc. business. 8 * Permission to use, copy, modify, and distribute this 9 * software is freely granted, provided that this notice 10 * is preserved. 11 * ==================================================== 12 * 13 */ 14
|
18 19/* __ieee754_acosh(x) 20 * Method : 21 * Based on 22 * acosh(x) = log [ x + sqrt(x*x-1) ] 23 * we have 24 * acosh(x) := log(x)+ln2, if x is large; else 25 * acosh(x) := log(2x-1/(sqrt(x*x-1)+x)) if x>2; else
--- 38 unchanged lines hidden --- | 17 18/* __ieee754_acosh(x) 19 * Method : 20 * Based on 21 * acosh(x) = log [ x + sqrt(x*x-1) ] 22 * we have 23 * acosh(x) := log(x)+ln2, if x is large; else 24 * acosh(x) := log(2x-1/(sqrt(x*x-1)+x)) if x>2; else
--- 38 unchanged lines hidden --- |