Fix MPI Bug

Author: Critsium-xy

source/module_base/test/math_chebyshev_test.cpp

@@ -336,6 +336,9 @@ TEST_F(MathChebyshevTest, tracepolyA)
 
 TEST_F(MathChebyshevTest, checkconverge)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     const int norder = 100;
     p_chetest = new ModuleBase::Chebyshev<double>(norder);
     auto fun_sigma_y

source/module_base/test/opt_CG_test.cpp

@@ -143,6 +143,9 @@ class CG_test : public testing::Test
 
 TEST_F(CG_test, Stand_Solve_LinearEq)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     CG_Solve_LinearEq();
     EXPECT_NEAR(x[0], 0.5, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], 1.6429086563584579739e-18, DOUBLETHRESHOLD);
@@ -153,6 +156,9 @@ TEST_F(CG_test, Stand_Solve_LinearEq)
 
 TEST_F(CG_test, PR_Solve_LinearEq)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(1, 0);
     EXPECT_NEAR(x[0], 0.50000000000003430589, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], -3.4028335704761047964e-14, DOUBLETHRESHOLD);
@@ -163,6 +169,9 @@ TEST_F(CG_test, PR_Solve_LinearEq)
 
 TEST_F(CG_test, HZ_Solve_LinearEq)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(2, 0);
     EXPECT_NEAR(x[0], 0.49999999999999944489, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], -9.4368957093138305936e-16, DOUBLETHRESHOLD);
@@ -173,6 +182,9 @@ TEST_F(CG_test, HZ_Solve_LinearEq)
 
 TEST_F(CG_test, PR_Min_Func)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(1, 1);
     EXPECT_NEAR(x[0], 4.0006805979150792396, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], 2.0713759992720870429, DOUBLETHRESHOLD);
@@ -183,6 +195,9 @@ TEST_F(CG_test, PR_Min_Func)
 
 TEST_F(CG_test, HZ_Min_Func)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(2, 1);
     EXPECT_NEAR(x[0], 4.0006825378033568086, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], 2.0691732100663737803, DOUBLETHRESHOLD);

source/module_base/test/opt_TN_test.cpp

@@ -110,6 +110,9 @@ class TN_test : public testing::Test
 
 TEST_F(TN_test, TN_Solve_LinearEq)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(0);
     EXPECT_NEAR(x[0], 0.50000000000003430589, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], -3.4028335704761047964e-14, DOUBLETHRESHOLD);
@@ -120,6 +123,9 @@ TEST_F(TN_test, TN_Solve_LinearEq)
 
 TEST_F(TN_test, TN_Min_Func)
 {
+#ifdef __MPI
+#undef __MPI
+#endif
     Solve(1);
     EXPECT_NEAR(x[0], 4.0049968540891525137, DOUBLETHRESHOLD);
     EXPECT_NEAR(x[1], 2.1208751163987624722, DOUBLETHRESHOLD);