trsyl Interface

public interface trsyl

TRSYL solves the complex Sylvester matrix equation: op(A)X + Xop(B) = scaleC or op(A)X - Xop(B) = scaleC, where op(A) = A or A**H, and A and B are both upper triangular. A is M-by-M and B is N-by-N; the right hand side C and the solution X are M-by-N; and scale is an output scale factor, set <= 1 to avoid overflow in X.


Subroutines

public subroutine ctrsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trana
character(len=1), intent(in) :: tranb
integer(kind=ilp), intent(in) :: isgn
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
complex(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=sp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=sp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=sp), intent(out) :: scale
integer(kind=ilp), intent(out) :: info

public subroutine dtrsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trana
character(len=1), intent(in) :: tranb
integer(kind=ilp), intent(in) :: isgn
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
real(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=dp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=dp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=dp), intent(out) :: scale
integer(kind=ilp), intent(out) :: info

public subroutine strsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trana
character(len=1), intent(in) :: tranb
integer(kind=ilp), intent(in) :: isgn
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
real(kind=sp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
real(kind=sp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
real(kind=sp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=sp), intent(out) :: scale
integer(kind=ilp), intent(out) :: info

public subroutine ztrsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: trana
character(len=1), intent(in) :: tranb
integer(kind=ilp), intent(in) :: isgn
integer(kind=ilp), intent(in) :: m
integer(kind=ilp), intent(in) :: n
complex(kind=dp), intent(in) :: a(lda,*)
integer(kind=ilp), intent(in) :: lda
complex(kind=dp), intent(in) :: b(ldb,*)
integer(kind=ilp), intent(in) :: ldb
complex(kind=dp), intent(inout) :: c(ldc,*)
integer(kind=ilp), intent(in) :: ldc
real(kind=dp), intent(out) :: scale
integer(kind=ilp), intent(out) :: info

Module Procedures

public interface stdlib_ctrsyl()

Arguments

None

public interface stdlib_dtrsyl()

Arguments

None

public interface stdlib_strsyl()

Arguments

None

public interface stdlib_ztrsyl()

Arguments

None