2016-02-22 17:44:29 +00:00
|
|
|
// This file is part of Eigen, a lightweight C++ template library
|
|
|
|
|
// for linear algebra.
|
|
|
|
|
//
|
2018-04-04 05:14:58 +00:00
|
|
|
// Copyright (C) 2010-2014 Gael Guennebaud <gael.guennebaud@inria.fr>
|
2016-02-22 17:44:29 +00:00
|
|
|
//
|
|
|
|
|
// This Source Code Form is subject to the terms of the Mozilla
|
|
|
|
|
// Public License v. 2.0. If a copy of the MPL was not distributed
|
|
|
|
|
// with this file, You can obtain one at http://mozilla.org/MPL/2.0/.
|
|
|
|
|
|
|
|
|
|
#ifndef EIGEN_LAPACK_COMMON_H
|
|
|
|
|
#define EIGEN_LAPACK_COMMON_H
|
|
|
|
|
|
|
|
|
|
#include "../blas/common.h"
|
2018-04-04 05:14:58 +00:00
|
|
|
#include "../Eigen/src/misc/lapack.h"
|
2016-02-22 17:44:29 +00:00
|
|
|
|
|
|
|
|
#define EIGEN_LAPACK_FUNC(FUNC,ARGLIST) \
|
|
|
|
|
extern "C" { int EIGEN_BLAS_FUNC(FUNC) ARGLIST; } \
|
|
|
|
|
int EIGEN_BLAS_FUNC(FUNC) ARGLIST
|
|
|
|
|
|
|
|
|
|
typedef Eigen::Map<Eigen::Transpositions<Eigen::Dynamic,Eigen::Dynamic,int> > PivotsType;
|
|
|
|
|
|
2018-04-04 05:14:58 +00:00
|
|
|
#if ISCOMPLEX
|
|
|
|
|
#define EIGEN_LAPACK_ARG_IF_COMPLEX(X) X,
|
|
|
|
|
#else
|
|
|
|
|
#define EIGEN_LAPACK_ARG_IF_COMPLEX(X)
|
|
|
|
|
#endif
|
2016-02-22 17:44:29 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
#endif // EIGEN_LAPACK_COMMON_H
|
