mkl_vml_functions.h

最小二乘拟和工具

/*
//               INTEL CORPORATION PROPRIETARY INFORMATION
//  This software is supplied under the terms of a license agreement or
//  nondisclosure agreement with Intel Corporation and may not be copied
//  or disclosed except in accordance with the terms of that agreement.
//    Copyright (C) 1996-2000 Intel Corporation. All Rights Reserved.
//
// File    : vml_functions.h
// Purpose : VML header (Windows version)
// Author  : Gilev Andrey
*/

#ifndef __VML_FUNCTIONS_H__
#define __VML_FUNCTIONS_H__

#include "mkl_vml_types.h"

#ifdef __cplusplus
extern "C" {
#endif

#if defined(MKL_VML_STDCALL)
#  define __VML_API(_VML_RET_TYPE,_VML_FUNC_NAME,_VML_FUNC_ARG) extern _VML_RET_TYPE __stdcall _VML_FUNC_NAME _VML_FUNC_ARG;
#  define __vml_api(_vml_ret_type,_vml_func_name,_vml_func_arg) extern _vml_ret_type __stdcall _vml_func_name _vml_func_arg;
#  define __Vml_Api(_Vml_Ret_Type,_Vml_Func_Name,_Vml_Func_Arg) extern _Vml_Ret_Type __stdcall _Vml_Func_Name _Vml_Func_Arg;
#else /* MKL_VML_CDECL */
#  define __VML_API(_VML_RET_TYPE,_VML_FUNC_NAME,_VML_FUNC_ARG) extern _VML_RET_TYPE __cdecl _VML_FUNC_NAME _VML_FUNC_ARG;
#  define __vml_api(_vml_ret_type,_vml_func_name,_vml_func_arg) extern _vml_ret_type __cdecl _vml_func_name _vml_func_arg;
#  define __Vml_Api(_Vml_Ret_Type,_Vml_Func_Name,_Vml_Func_Arg) extern _Vml_Ret_Type __cdecl _Vml_Func_Name _Vml_Func_Arg;
#endif

/*******************************************************************************
  Math functions
*******************************************************************************/

/* Inversion: r = 1.0 / a                                                 */
__VML_API(void,VSINV,(int *n, const float  a[], float  r[]))
__VML_API(void,VDINV,(int *n, const double a[], double r[]))
__vml_api(void, vsinv, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdinv, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsInv, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdInv, ( int n, const double a[], double r[] ))

/* Square root: r = a**0.5                                                */
__VML_API(void, VSSQRT, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDSQRT, ( int *n, const double a[], double r[] ))
__vml_api(void, vssqrt, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdsqrt, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsSqrt, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdSqrt, ( int n, const double a[], double r[] ))

/* Inversion Square root: r = 1/a**0.5                                                */
__VML_API(void, VSINVSQRT, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDINVSQRT, ( int *n, const double a[], double r[] ))
__vml_api(void, vsinvsqrt, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdinvsqrt, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsInvSqrt, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdInvSqrt, ( int n, const double a[], double r[] ))

/* Cube root: r = a**0.3(3)                                                */
__VML_API(void, VSCBRT, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDCBRT, ( int *n, const double a[], double r[] ))
__vml_api(void, vscbrt, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdcbrt, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsCbrt, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdCbrt, ( int n, const double a[], double r[] ))

/* Inversion Cube root: r = 1/a**0.3(3)                                                */
__VML_API(void, VSINVCBRT, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDINVCBRT, ( int *n, const double a[], double r[] ))
__vml_api(void, vsinvcbrt, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdinvcbrt, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsInvCbrt, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdInvCbrt, ( int n, const double a[], double r[] ))

/* Exponent: r = e**a                                                     */
__VML_API(void, VSEXP, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDEXP, ( int *n, const double a[], double r[] ))
__vml_api(void, vsexp, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdexp, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsExp, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdExp, ( int n, const double a[], double r[] ))

/* Logarithm: r = ln a                                                    */
__VML_API(void, VSLN, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDLN, ( int *n, const double a[], double r[] ))
__vml_api(void, vsln, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdln, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsLn, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdLn, ( int n, const double a[], double r[] ))

/* Decimal logarithm: r = lg a                                            */
__VML_API(void, VSLOG10, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDLOG10, ( int *n, const double a[], double r[] ))
__vml_api(void, vslog10, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdlog10, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsLog10, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdLog10, ( int n, const double a[], double r[] ))

/* Sin: r = SIN a                                                         */
__VML_API(void, VSSIN, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDSIN, ( int *n, const double a[], double r[] ))
__vml_api(void, vssin, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdsin, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsSin, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdSin, ( int n, const double a[], double r[] ))

/* Cos: r = COS a                                                         */
__VML_API(void, VSCOS, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDCOS, ( int *n, const double a[], double r[] ))
__vml_api(void, vscos, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdcos, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsCos, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdCos, ( int n, const double a[], double r[] ))

/* Tan: r = tan a                                                         */
__VML_API(void, VSTAN, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDTAN, ( int *n, const double a[], double r[] ))
__vml_api(void, vstan, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdtan, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsTan, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdTan, ( int n, const double a[], double r[] ))

/* Sinh: r = sh a                                                         */
__VML_API(void, VSSINH, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDSINH, ( int *n, const double a[], double r[] ))
__vml_api(void, vssinh, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdsinh, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsSinh, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdSinh, ( int n, const double a[], double r[] ))

/* Cosh: r = ch a                                                         */
__VML_API(void, VSCOSH, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDCOSH, ( int *n, const double a[], double r[] ))
__vml_api(void, vscosh, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdcosh, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsCosh, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdCosh, ( int n, const double a[], double r[] ))

/* Tanh: r = th a                                                         */
__VML_API(void, VSTANH, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDTANH, ( int *n, const double a[], double r[] ))
__vml_api(void, vstanh, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdtanh, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsTanh, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdTanh, ( int n, const double a[], double r[] ))

/* ACOS: r = arcCOS a                                                     */
__VML_API(void, VSACOS, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDACOS, ( int *n, const double a[], double r[] ))
__vml_api(void, vsacos, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdacos, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsAcos, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdAcos, ( int n, const double a[], double r[] ))

/* ASIN: r = arcSIN a                                                     */
__VML_API(void, VSASIN, ( int *n, const float  a[], float  r[] ))
__VML_API(void, VDASIN, ( int *n, const double a[], double r[] ))
__vml_api(void, vsasin, ( int *n, const float  a[], float  r[] ))
__vml_api(void, vdasin, ( int *n, const double a[], double r[] ))
__Vml_Api(void, vsAsin, ( int n, const float  a[], float  r[] ))
__Vml_Api(void, vdAsin, ( int n, const double a[], double r[] ))