mfi_trtrs Interface

public interface mfi_trtrs

Generic modern interface for TRTRS. Supports s, d, c, z. See also: strtrs, dtrtrs, ctrtrs, ztrtrs.


Module Procedures

public pure subroutine mfi_strtrs(a, b, uplo, trans, diag, info)

Modern interface for strtrs. See also: mfi_trtrs, f77_trtrs. Solves a triangular linear system with multiple right-hand sides:

Read more…

Arguments

Type IntentOptional Attributes Name
real(kind=REAL32), intent(in) :: a(:,:)
real(kind=REAL32), intent(inout) :: b(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
character(len=1), intent(in), optional :: diag
integer, intent(out), optional :: info

public pure subroutine mfi_dtrtrs(a, b, uplo, trans, diag, info)

Modern interface for dtrtrs. See also: mfi_trtrs, f77_trtrs. Solves a triangular linear system with multiple right-hand sides:

Read more…

Arguments

Type IntentOptional Attributes Name
real(kind=REAL64), intent(in) :: a(:,:)
real(kind=REAL64), intent(inout) :: b(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
character(len=1), intent(in), optional :: diag
integer, intent(out), optional :: info

public pure subroutine mfi_ctrtrs(a, b, uplo, trans, diag, info)

Modern interface for ctrtrs. See also: mfi_trtrs, f77_trtrs. Solves a triangular linear system with multiple right-hand sides:

Read more…

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL32), intent(in) :: a(:,:)
complex(kind=REAL32), intent(inout) :: b(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
character(len=1), intent(in), optional :: diag
integer, intent(out), optional :: info

public pure subroutine mfi_ztrtrs(a, b, uplo, trans, diag, info)

Modern interface for ztrtrs. See also: mfi_trtrs, f77_trtrs. Solves a triangular linear system with multiple right-hand sides:

Read more…

Arguments

Type IntentOptional Attributes Name
complex(kind=REAL64), intent(in) :: a(:,:)
complex(kind=REAL64), intent(inout) :: b(:,:)
character(len=1), intent(in), optional :: uplo
character(len=1), intent(in), optional :: trans
character(len=1), intent(in), optional :: diag
integer, intent(out), optional :: info