solve_static_system Interface

public interface solve_static_system

Contents


Module Procedures

private pure function solve_static_system_dense(K, F) result(rst)

Solves the static system .

Arguments

Type IntentOptional Attributes Name
real(kind=real64), intent(in), dimension(:,:) :: K

The N-by-N stiffness matrix.

real(kind=real64), intent(in), dimension(:) :: F

The N-element external forcing vector.

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

The N-element solution vector.

private pure function solve_static_system_csr(K, F) result(rst)

Solves the static system .

Arguments

Type IntentOptional Attributes Name
type(csr_matrix), intent(in) :: K

The N-by-N stiffness matrix.

real(kind=real64), intent(in), dimension(:) :: F

The N-element external forcing vector.

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

The N-element solution vector.