class_least_squares_procedures Submodule

Uses

- Ancestors:
- class_least_squares
Help
Graph Key

Nodes of different colours represent the following:

Solid arrows point from a submodule to the (sub)module which it is descended from. Dashed arrows point from a module or program unit to modules which it uses. Where possible, edges connecting nodes are given different colours to make them easier to distinguish in large graphs.

Contents

Module Procedures

alloc_least_squares free_least_squares nemo_least_squares_sizeof set_least_squares solve_least_squares

Module Procedures

module procedure alloc_least_squares module subroutine alloc_least_squares(lsr, n, ncd)

Arguments

Type	Intent	Optional	Attributes		Name
type(least_squares),	intent(out),		allocatable	::	lsr(:)
integer,	intent(in)			::	n
integer,	intent(in)			::	ncd

module procedure free_least_squares module subroutine free_least_squares(lsr)

$ deallocate(lsr(i)%A,stat=ierr) $ info(i) = ierr

Arguments

Type	Intent	Optional	Attributes		Name
type(least_squares),			allocatable	::	lsr(:)

module procedure nemo_least_squares_sizeof elemental module function nemo_least_squares_sizeof(lsq)

Arguments

Type	Intent	Optional	Attributes		Name
class(least_squares),	intent(in)			::	lsq

Return Value integer(kind=nemo_int_long_)

module procedure set_least_squares module subroutine set_least_squares(lsr, ncd, desc, c2c, f2b, faces, cell_cntr, face_cntr)

Arguments

Type	Intent	Optional	Attributes		Name
type(least_squares),			allocatable	::	lsr(:)
integer,	intent(in)			::	ncd
type(psb_desc_type),	intent(in)			::	desc
type(connectivity),	intent(in)			::	c2c
type(connectivity),	intent(in)			::	f2b
type(face),	intent(in)			::	faces(:)
type(vector),	intent(in)			::	cell_cntr(:)
type(vector),	intent(in)			::	face_cntr(:)

module procedure solve_least_squares module subroutine solve_least_squares(lsr, rhs)

Arguments

Type	Intent	Optional	Attributes		Name
class(least_squares),	intent(in)			::	lsr
real(kind=psb_dpk_),	intent(inout)			::	rhs(:)