schur.cpp serif/solver/preconditioner/backend/mfem/gravity/schur.hpp cmath serif/solver/preconditioner/backend/mfem/inverse/validation.hpp serif/meta/enums.hpp serif/solver/preconditioner/backend/mfem/gravity/schur.hpp serif/solver/preconditioner/backend/mfem/inverse.hpp serif/solver/preconditioner/backend/mfem/inverse/validation.hpp serif/solver/preconditioner/contract.hpp serif/solver/preconditioner/failure.hpp serif/utils/error/codes.hpp serif/utils/error/errors.hpp serif/utils/misc/concepts/exceptions.hpp serif/utils/misc/concepts/numeric.hpp serif/utils/misc/terminal/colors.hpp serif/utils/types/strings.hpp src/lib/serif/solver/preconditioner/backend/mfem/gravity/schur.cpp algorithm cmath concepts cstdint cstdio cstdlib exception expected format iostream magic_enum/magic_enum_all.hpp memory mfem/linalg/operator.hpp mfem/linalg/sparsemat.hpp span string string_view type_traits unistd.h unordered_map utility version serif serif::solver serif::solver::preconditioner serif::solver::preconditioner::backend serif::solver::preconditioner::backend::mfem #include"serif/solver/preconditioner/backend/mfem/gravity/schur.hpp" #include<cmath> #include"serif/solver/preconditioner/backend/mfem/inverse/validation.hpp" namespaceserif::solver::preconditioner::backend::mfem { std::expected<std::shared_ptr<const::mfem::SparseMatrix>,Failure>try_gravity_schur(const::mfem::SparseMatrix&divergence,conststd::span<constdouble>mapped_mass_diagonal) { usingenumutils::errors::SERiFErrorCode; if(!divergence.Finalized()||divergence.Height()<=0||divergence.Width()<=0||mapped_mass_diagonal.size()!=static_cast<std::size_t>(divergence.Width())) { returndetail::failure<PRECONDITIONER_SIZE_MISMATCH>("ThegravitySchursurrogaterequiresfinalizedcomputationaldivergenceandonemappedmassentrypergradientcoordinate."); } ::mfem::Vectorreciprocal(divergence.Width()); for(intindex=0;index<reciprocal.Size();++index) { constdoubleentry=mapped_mass_diagonal[index]; if(!std::isfinite(entry)||entry<=0.0||!std::isfinite(1.0/entry)) { returndetail::failure<PRECONDITIONER_INVALID_OPERATOR>("Mappedmassentry{}mustbepositive,finiteandhavearepresentablereciprocalbeforeformingthegravitySchursurrogate.",index); } reciprocal[index]=1.0/entry; } for(intindex=0;index<divergence.NumNonZeroElems();++index) { if(!std::isfinite(divergence.GetData()[index])) { returndetail::failure<PRECONDITIONER_NONFINITE_VALUE>("Computationaldivergencecontainsanonfinitecoefficient."); } } ::mfem::SparseMatrixweighted(divergence); weighted.ScaleColumns(reciprocal); conststd::unique_ptr<::mfem::SparseMatrix>transpose(::mfem::Transpose(divergence)); conststd::shared_ptr<const::mfem::SparseMatrix>schur(::mfem::Mult(weighted,*transpose)); for(intindex=0;index<schur->NumNonZeroElems();++index) { if(!std::isfinite(schur->GetData()[index])) { returndetail::failure<PRECONDITIONER_NONFINITE_VALUE>("ThegravitySchurproductoverflowed.Rescalethefieldcoordinatesbeforepreparingitsinverse."); } } returnschur; } }//namespaceserif::solver::preconditioner::backend::mfem