os/ossrv/genericopenlibs/liboil/src/simdpack/sincos_f64.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
     1 /*
     2  * LIBOIL - Library of Optimized Inner Loops
     3  * Copyright (c) 2003,2004 David A. Schleef <ds@schleef.org>
     4  * All rights reserved.
     5  *
     6  * Redistribution and use in source and binary forms, with or without
     7  * modification, are permitted provided that the following conditions
     8  * are met:
     9  * 1. Redistributions of source code must retain the above copyright
    10  *    notice, this list of conditions and the following disclaimer.
    11  * 2. Redistributions in binary form must reproduce the above copyright
    12  *    notice, this list of conditions and the following disclaimer in the
    13  *    documentation and/or other materials provided with the distribution.
    14  * 
    15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
    16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
    17  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
    19  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
    20  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
    21  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
    22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
    23  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
    24  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    25  * POSSIBILITY OF SUCH DAMAGE.
    26  */
    27 //Portions Copyright (c)  2008-2009 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. 
    28 
    29 #ifdef HAVE_CONFIG_H
    30 #include "config.h"
    31 #endif
    32 
    33 #include <liboil/liboilfunction.h>
    34 #include <liboil/liboilclasses.h>
    35 #include <math.h>
    36 
    37 /* XXX This gets more inaccurate as N increases */
    38 static void
    39 sincos_f64_i20_fast(double *dest_sin, double *dest_cos, int n, double *offset,
    40     double *interval)
    41 {
    42 	int i;
    43 	double c,s,dc,ds,temp_s,temp_c;
    44 
    45 	dest_sin[0] = s = sin(*offset);
    46 	dest_cos[0] = c = cos(*offset);
    47 	ds = sin(*interval);
    48 	dc = cos(*interval);
    49 	for(i=1;i<n;i++){
    50 		temp_s = s*dc + c*ds;
    51 		temp_c = c*dc - s*ds;
    52 		dest_sin[i] = s = temp_s;
    53 		dest_cos[i] = c = temp_c;
    54 	}
    55 }
    56 OIL_DEFINE_IMPL (sincos_f64_i20_fast, sincos_f64);
    57 
    58 #ifdef HAVE_SINCOS
    59 static void
    60 sincos_f64_sincos (double *dest_sin, double *dest_cos, int n, double *offset,
    61     double *interval)
    62 {
    63 	int i;
    64 
    65 	for(i=0;i<n;i++){
    66           sincos (*offset + *interval * i, dest_sin + i, dest_cos + i);
    67 	}
    68 }
    69 OIL_DEFINE_IMPL (sincos_f64_sincos, sincos_f64);
    70 #endif
    71 
    72 
    73 
    74 #ifdef	__SYMBIAN32__
    75  
    76 OilFunctionImpl* __oil_function_impl_sincos_f64_i20_fast() {
    77 		return &_oil_function_impl_sincos_f64_i20_fast;
    78 }
    79 #endif
    80 #if 0
    81 #ifdef	__SYMBIAN32__
    82  
    83 OilFunctionImpl* __oil_function_impl_sincos_f64_sincos() {
    84 		return &_oil_function_impl_sincos_f64_sincos;
    85 }
    86 #endif
    87 #endif
    88