1 /* 2 * CDDL HEADER START 3 * 4 * The contents of this file are subject to the terms of the 5 * Common Development and Distribution License (the "License"). 6 * You may not use this file except in compliance with the License. 7 * 8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9 * or http://www.opensolaris.org/os/licensing. 10 * See the License for the specific language governing permissions 11 * and limitations under the License. 12 * 13 * When distributing Covered Code, include this CDDL HEADER in each 14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15 * If applicable, add the following below this CDDL HEADER, with the 16 * fields enclosed by brackets "[]" replaced with your own identifying 17 * information: Portions Copyright [yyyy] [name of copyright owner] 18 * 19 * CDDL HEADER END 20 */ 21 22 /* 23 * Copyright 2011 Nexenta Systems, Inc. All rights reserved. 24 */ 25 /* 26 * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 27 * Use is subject to license terms. 28 */ 29 30 #ifdef __RESTRICT 31 #define restrict _Restrict 32 #else 33 #define restrict 34 #endif 35 36 extern void __vz_exp(int, double *, int, double *, int, double *); 37 extern void __vz_log(int, double *, int, double *, int); 38 39 void 40 __vz_pow(int n, double * restrict x, int stridex, double * restrict y, 41 int stridey, double * restrict z, int stridez, double * restrict tmp) 42 { 43 double r; 44 int i, j, k; 45 46 __vz_log(n, x, stridex, tmp, 1); 47 stridey <<= 1; 48 for (i = j = 0; i < n; i++, j += stridey) 49 { 50 k = i << 1; 51 r = y[j] * tmp[k] - y[j+1] * tmp[k+1]; 52 tmp[k+1] = y[j+1] * tmp[k] + y[j] * tmp[k+1]; 53 tmp[k] = r; 54 } 55 __vz_exp(n, tmp, 1, z, stridez, tmp + n + n); 56 } 57