BCRS_ Derived Type

type, public :: BCRS_

Components

Type	Visibility	Attributes		Name		Initial
type(CRS_),	public,	allocatable	::	CRS(:,:)

Type-Bound Procedures

procedure, public :: set => setBCRS

public subroutine setBCRS(this, block_position, CRS)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(inout)			::	this
integer(kind=int32)				::	block_position(1:2)
type(CRS_),	intent(in)			::	CRS

procedure, public :: add => addBCRS

public subroutine addBCRS(this, block_position, CRS)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(inout)			::	this
integer(kind=int32)				::	block_position(1:2)
type(CRS_),	intent(in)			::	CRS

procedure, public :: showShape => showShapeBCRS

public subroutine showShapeBCRS(this)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this

procedure, public :: shape => shapeBCRS

public function shapeBCRS(this) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this

Return Value integer(kind=int32), (1:2)

procedure, public :: row_range => row_range_BCRS

public function row_range_BCRS(this, box_row, box_col) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this
integer(kind=int32),	intent(in)			::	box_row
integer(kind=int32),	intent(in)			::	box_col

Return Value integer(kind=int32), (1:2)

procedure, public :: col_range => col_range_BCRS

public function col_range_BCRS(this, box_row, box_col) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this
integer(kind=int32),	intent(in)			::	box_row
integer(kind=int32),	intent(in)			::	box_col

Return Value integer(kind=int32), (1:2)

procedure, public :: matmul => matmulBCRS

public function matmulBCRS(this, vec) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this
real(kind=real64),	intent(in)			::	vec(:)

Return Value real(kind=real64), allocatable, (:)

procedure, public :: to_dense => to_dense_BCRS

public function to_dense_BCRS(this) result(ret)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this

Return Value real(kind=real64), allocatable, (:,:)

procedure, public :: exp => expBCRS

public function expBCRS(this, vec, max_itr, fix_idx) result(b)

Arguments

Type	Intent	Optional	Attributes		Name
class(BCRS_),	intent(in)			::	this
real(kind=real64),	intent(in)			::	vec(:)
integer(kind=int32),	intent(in),	optional		::	max_itr
integer(kind=int32),	intent(in),	optional		::	fix_idx(:)

Return Value real(kind=real64), allocatable, (:)