FrontISTR  5.9.0
Large-scale structural analysis program with finit element method
hecmw_precond_SAAMG_coarse_mumps.F90 File Reference

Go to the source code of this file.

Modules

module  hecmw_precond_saamg_coarse_mumps
 Smoothed Aggregation AMG preconditioner : distributed MUMPS coarsest solver.
 

Functions/Subroutines

logical function, public hecmw_precond_saamg_coarse_mumps::hecmw_saamg_cmumps_available ()
 .true. only when compiled with MUMPS; the caller uses the dense coarsest else. More...
 
subroutine, public hecmw_precond_saamg_coarse_mumps::hecmw_saamg_cmumps_setup (cmt, Aloc, my_off, m, naggr_local, symmetric, cm)
 Factor the distributed coarse operator. Aloc = this rank's owned coarse rows (n_loc = naggr_local*m rows, columns localized; global column dof via cmtgnode); my_off = owned coarse-node offset, m = coarse block size. Builds the global lower-triangle distributed COO and runs MUMPS analyze+factor (JOB=4). More...
 
subroutine, public hecmw_precond_saamg_coarse_mumps::hecmw_saamg_cmumps_refresh (cmt, Aloc, my_off, m, naggr_local, cm)
 Numeric refresh: pattern unchanged, only values change. Refill A_loc and run MUMPS numeric factorization (JOB=2, reusing the JOB=1 analysis). More...
 
subroutine, public hecmw_precond_saamg_coarse_mumps::hecmw_saamg_cmumps_solve (cmt, rhs_loc, n_loc, cm, sol_loc)
 Solve A_coarse x = b. rhs_loc/sol_loc are this rank's owned slices (length n_loc, local owned order = global order on this rank). Gathers RHS to the host, runs MUMPS solve (JOB=3), scatters the owned solution slice back. More...
 
subroutine, public hecmw_precond_saamg_coarse_mumps::hecmw_saamg_cmumps_free (cm)