Line data    Source code

       1             : //* This file is part of the MOOSE framework
       2             : //* https://mooseframework.inl.gov
       3             : //*
       4             : //* All rights reserved, see COPYRIGHT for full restrictions
       5             : //* https://github.com/idaholab/moose/blob/master/COPYRIGHT
       6             : //*
       7             : //* Licensed under LGPL 2.1, please see LICENSE for details
       8             : //* https://www.gnu.org/licenses/lgpl-2.1.html
       9             : 
      10             : #ifdef MOOSE_MFEM_ENABLED
      11             : 
      12             : #include "MFEMHypreADS.h"
      13             : 
      14             : registerMooseObject("MooseApp", MFEMHypreADS);
      15             : 
      16             : InputParameters
      17        8664 : MFEMHypreADS::validParams()
      18             : {
      19        8664 :   InputParameters params = MFEMSolverBase::validParams();
      20        8664 :   params.addClassDescription("Hypre auxiliary-space divergence solver and preconditioner for the "
      21             :                              "iterative solution of MFEM equation systems.");
      22        8664 :   params.addParam<UserObjectName>("fespace", "H(div) FESpace to use in HypreADS setup.");
      23        8664 :   params.addParam<int>("print_level", 2, "Set the solver verbosity.");
      24             : 
      25        8664 :   return params;
      26           0 : }
      27             : 
      28          17 : MFEMHypreADS::MFEMHypreADS(const InputParameters & parameters)
      29          17 :   : MFEMSolverBase(parameters), _mfem_fespace(getUserObject<MFEMFESpace>("fespace"))
      30             : {
      31          17 :   constructSolver(parameters);
      32          17 : }
      33             : 
      34             : void
      35          17 : MFEMHypreADS::constructSolver(const InputParameters &)
      36             : {
      37          17 :   auto solver = std::make_unique<mfem::HypreADS>(_mfem_fespace.getFESpace().get());
      38          17 :   solver->SetPrintLevel(getParam<int>("print_level"));
      39             : 
      40          17 :   _solver = std::move(solver);
      41          17 : }
      42             : 
      43             : void
      44          16 : MFEMHypreADS::updateSolver(mfem::ParBilinearForm & a, mfem::Array<int> & tdofs)
      45             : {
      46          16 :   if (_lor)
      47             :   {
      48           8 :     if (!checkSpectralEquivalence(a))
      49           0 :       mooseError("Low-Order-Refined solver requires the FESpace closed_basis to be GaussLobatto "
      50             :                  "and the open-basis to be IntegratedGLL for ND and RT elements.");
      51             : 
      52           8 :     if (_mfem_fespace.getFESpace()->GetMesh()->GetElement(0)->GetGeometryType() !=
      53             :         mfem::Geometry::Type::CUBE)
      54           0 :       mooseError("LOR HypreADS Solver only supports hex meshes.");
      55             : 
      56           8 :     auto lor_solver = new mfem::LORSolver<mfem::HypreADS>(a, tdofs);
      57           8 :     lor_solver->GetSolver().SetPrintLevel(getParam<int>("print_level"));
      58           8 :     _solver.reset(lor_solver);
      59             :   }
      60          16 : }
      61             : 
      62             : #endif