/*****************************************************************************版权所有(c)2010,Intel Corp。保留所有权利。以源代码和二进制形式重新分发和使用,有或无如果满足以下条件,则允许进行修改:*源代码的重新分发必须保留上述版权声明,此条件列表和以下免责声明。*二进制形式的重新分发必须复制上述版权注意,此条件列表和以下免责声明分发时提供的文件和/或其他材料。*既非英特尔公司的名称,也非其贡献者的姓名可用于支持或推广源自此软件的产品未经事先书面许可。本软件由版权持有者和贡献者“按原样”提供以及任何明示或暗示的保证,包括但不限于对适销性和特定用途适用性的默示保证特此声明。在任何情况下,版权所有者或贡献者均不得对任何直接、间接、偶然、特殊、示范或间接损害(包括但不限于替代货物或服务;使用、数据或利润损失;或商业中断)无论是何种原因,也无论是何种责任理论合同、严格责任或侵权(包括疏忽或其他)以任何方式因使用本软件而产生,即使已通知此类损坏的可能性。*******************************************************************************内容:LAPACK的本机C接口*作者:英特尔公司*****************************************************************************/#如果索引_LAPACKE_CONFIG_H_#定义_LAPACKE_CONFIG_H_#ifdef __cplusplus#如果已定义(LAPACK_COMPLEX_CPP)#包括#结尾外部“C”{#endif/*__cplusplus*/#包括#ifndef lapack输入#如果已定义(LAPACK_ILP64)#定义lapack_int长#其他#定义lapack_int int#结尾#结尾#ifndef lapack逻辑#定义lapack逻辑lapack int#结尾#如果下载LAPACK_COMPLEX_CUSTOM#如果已定义(LAPACK_COMPLEX_STRUCTURE)typedef结构{float real,imag;}_lapack_complex_float;typedef结构{双实数,imag;}_lapack_complex_double;#定义lapack_complex_float#定义lapack_complex_double_lapack-complex-double#定义lapack_complex_float_real(z)((z).real)#定义lapack_complex_float_imag(z)((z).imag)#定义lapack_complex_double_real(z)((z).real)#定义lapack_complex_double_imag(z)((z).imag)#elif定义(LAPACK_COMPLEX_C99)#包括#定义lapack_complex_float float_complex#定义lapack_complex_double-double_complex#定义lapack_complex_float_real(z)(creal(z))#定义lapack_complex_float_imag(z)(cimag(z))#定义lapack_complex_double_real(z)(creal(z))#定义lapack_complex_double_imag(z)(cimag(z))#elif定义(LAPACK_COMPLEX_CPP)#定义lapack_complex_float标准::complex#定义lapack_complex_double std::complex#定义lapack_complex_float_real(z)((z).real())#定义lapack_complex_float_imag(z)((z).imag())#定义lapack_complex_double_real(z)((z).real())#定义lapack_complex_double_imag(z)((z).imag())#其他#包括#定义lapack_complex_float float_complex#定义lapack_complex_double-double_complex#定义lapack_complex_float_real(z)(creal(z))#定义lapack_complex_float_imag(z)(cimag(z))#定义lapack_complex_double_real(z)(creal(z))#定义lapackcomplexdouble_imag(z)(cimag(z))#结尾lapack_complex_float lapack_make_complex_float(浮点re,浮点im);lapack_complex_double lapack_make_complex _double(双re,双im);#结尾#ifndef LAPACK_分配#定义LAPACK_malloc(大小)malloc#结尾#ifndef LAPACK_免费#定义LAPACK_free(p)free(p)#结尾#ifdef __cplusplus}#endif/*__cplusplus*/#endif/*_LAPACKE_CONFIG_H_*/