scale_multigrid_solver_base Module Reference

module FElib / Multigrid / Solver base More...

Data Types
type	multigridsolverbase
	Base type for multigrid solver. More...

Functions/Subroutines
subroutine, public	multigridsolverbase_init (this, mesh_hierarchy)
	Initialize a base object for multigrid solver.
subroutine, public	multigridsolverbase_final (this)
	Finalize a base object for multigrid solver.

Detailed Description

module FElib / Multigrid / Solver base

Description

A base module to provide a multigrid solver

Author

Yuta Kawai, Team SCALE

Function/Subroutine Documentation

multigridsolverbase_init()

subroutine, public scale_multigrid_solver_base::multigridsolverbase_init	(	class(multigridsolverbase), intent(inout)	this,
		class(meshhierarchybase), intent(in)	mesh_hierarchy )

Initialize a base object for multigrid solver.

Parameters

[in]

mesh_hierarchy

Object to manage mesh hierarchy

Definition at line 75 of file scale_multigrid_solver_base.F90.

    implicit none
    class(MultiGridSolverBase), intent(inout) :: this
    class(MeshHierarchyBase), intent(in) :: mesh_hierarchy               !< Object to manage mesh hierarchy
    !-------------------------------------------------------------
    
    !-
    this%vcyc_num_max = 10
    return

Referenced by scale_multigrid_solver_base::multigridsolverbase::is_converged(), scale_multigrid_solver_2d::multigridsolver2d_init(), and scale_multigrid_solver_3d::multigridsolver3d_init().

multigridsolverbase_final()

subroutine, public scale_multigrid_solver_base::multigridsolverbase_final

(

class(multigridsolverbase), intent(inout)

this

)

Finalize a base object for multigrid solver.

Definition at line 89 of file scale_multigrid_solver_base.F90.

    implicit none
    class(MultiGridSolverBase), intent(inout) :: this
    !-------------------------------------------------------------
    return

Referenced by scale_multigrid_solver_base::multigridsolverbase::is_converged(), scale_multigrid_solver_2d::multigridsolver2d_init(), and scale_multigrid_solver_3d::multigridsolver3d_init().