From: Denis Davydov <davydden@gmail.com>
Date: Mon, 28 Mar 2016 19:12:58 +0000 (+0200)
Subject: partly extend tests/mpi/p4est_save_02.cc to complex-valued PETSc
X-Git-Tag: v8.5.0-rc1~1153^2~38
X-Git-Url: https://gitweb.dealii.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=afdd832449943daef4de17c906a71d440e6a42b8;p=dealii.git

partly extend tests/mpi/p4est_save_02.cc to complex-valued PETSc
---

diff --git a/tests/mpi/p4est_save_02.cc b/tests/mpi/p4est_save_02.cc
index 05770bbca1..fe4725e53f 100644
--- a/tests/mpi/p4est_save_02.cc
+++ b/tests/mpi/p4est_save_02.cc
@@ -86,7 +86,11 @@ void test()
     for (unsigned int i=0; i<locally_owned_dofs.n_elements(); ++i)
       {
         unsigned int idx = locally_owned_dofs.nth_index_in_set(i);
+#ifdef PETSC_USE_COMPLEX
+        x(idx)=std::complex<double>(idx,0);
+#else
         x(idx)=idx;
+#endif
 
 //  std::cout << '[' << idx << ']' << ' ' << solution(idx) << std::endl;
       }
@@ -127,14 +131,18 @@ void test()
 
     PETScWrappers::MPI::Vector solution(locally_owned_dofs, MPI_COMM_WORLD);
     parallel::distributed::SolutionTransfer<dim,PETScWrappers::MPI::Vector> soltrans(dh);
+#if PETSC_USE_COMPLEX
+    solution = std::complex<double>(2,0);
+#else
     solution = 2;
+#endif
     soltrans.deserialize(solution);
 
     for (unsigned int i=0; i<locally_owned_dofs.n_elements(); ++i)
       {
         unsigned int idx = locally_owned_dofs.nth_index_in_set(i);
         //std::cout << '[' << idx << ']' << ' ' << solution(idx) << std::endl;
-        Assert(idx == solution(idx),ExcInternalError());
+        Assert(idx == PetscRealPart(solution(idx)),ExcInternalError());
 
       }