在基于 LINUX 的环境中使用 LAPACK 和 C++

Question

这是我的第一个问题:)

我想它没有达到应有的资格，但这是我正在做的事情，如果能得到某人对此的意见会非常好。

我目前正在基于Linux的环境中使用LAPACK ，我对此感到非常困惑。 我正在尝试使用C++但我也可以使用Python进行编码。 首先，我在 HPC 中没有 root，我连接到学校的服务器，所以我在软件方面没有我需要的灵活。

我可以编写和编译任何其他需要非常基本的 C++ 代码，例如字符串等。 但是，我找不到一种方法来包含必要的东西或与 LAPACK 项目的链接。

例如： 用一个简单的例子理解 C++ 中的 LAPACK 调用

//LAPACK test code
//compile with: g++ main.cpp -llapack -lblas -o testprog

#include <iostream>
#include <vector>

using namespace std;

extern "C" void dgetrf_(int* dim1, int* dim2, double* a, int* lda, int* ipiv, int* info);
extern "C" void dgetrs_(char *TRANS, int *N, int *NRHS, double *A, int *LDA, int *IPIV, double *B, int *LDB, int *INFO );


int main()
{
   char trans = 'N';
   int dim = 2;
   int nrhs = 1;
   int LDA = dim;
   int LDB = dim;
   int info;

   vector<double> a, b;

   a.push_back(1);
   a.push_back(1);
   a.push_back(1);
   a.push_back(-1);

   b.push_back(2);
   b.push_back(0);

   int ipiv[3];

   dgetrf_(&dim, &dim, &*a.begin(), &LDA, ipiv, &info);
   dgetrs_(&trans, &dim, &nrhs, & *a.begin(), &LDA, ipiv, & *b.begin(), &LDB, &info);


   std::cout << "solution is:";
   std::cout << "[" << b[0] << ", " << b[1] << ", " << "]" << std::endl;
   std::cout << "Info = " << info << std::endl;

   return(0);
}

这个论点非常接近我想要做的，用 LAPACK 解决一个基本系统。 当我尝试在这里使用该代码时，我面临的错误是：

g++ main.cpp -llapack -lblas -o testprog
/cta/capps/lapack/3.9.0/lib/../lib/liblapack.a(xerbla.f.o): In function `xerbla_':
xerbla.f:(.text+0x49): undefined reference to `_gfortran_st_write'
xerbla.f:(.text+0x54): undefined reference to `_gfortran_string_len_trim'
xerbla.f:(.text+0x69): undefined reference to `_gfortran_transfer_character_write'
xerbla.f:(.text+0x79): undefined reference to `_gfortran_transfer_integer_write'
xerbla.f:(.text+0x81): undefined reference to `_gfortran_st_write_done'
xerbla.f:(.text+0x8a): undefined reference to `_gfortran_stop_string'
collect2: error: ld returned 1 exit status

我真的需要一些建议或资料来了解 LAPACK 背后的逻辑并将其与 C++ 联系起来。

提前致谢...

Answer 1

LAPACK 写在 fortran 中。 链接错误表明您的 LAPACK 版本是用 gfortran 编译的，它有一个帮助程序（运行时）库。 要扩展其他注释，您需要链接此运行时库以提供缺少的功能。 尝试将 -lgfortran 添加到您的链接行（在 -lblas 之后），但在 -o 之前。 希望这会有所帮助。