f77_tpsv Interface
public interface f77_tpsv
Generic old style interface for TPSV. Supports s, d, c, z. See also: mfi_tpsv, stpsv, dtpsv, ctpsv, ztpsv.
Subroutines
public pure subroutine stpsv(uplo, trans, diag, n, ap, x, incx)
Original interface for STPSV See also: mfi_tpsv, f77_tpsv.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| character(len=1), | intent(in) | :: | trans | |||
| character(len=1), | intent(in) | :: | diag | |||
| integer, | intent(in) | :: | n | |||
| real(kind=REAL32), | intent(in) | :: | ap(*) | |||
| real(kind=REAL32), | intent(inout) | :: | x(*) | |||
| integer, | intent(in) | :: | incx |
public pure subroutine dtpsv(uplo, trans, diag, n, ap, x, incx)
Original interface for DTPSV See also: mfi_tpsv, f77_tpsv.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| character(len=1), | intent(in) | :: | trans | |||
| character(len=1), | intent(in) | :: | diag | |||
| integer, | intent(in) | :: | n | |||
| real(kind=REAL64), | intent(in) | :: | ap(*) | |||
| real(kind=REAL64), | intent(inout) | :: | x(*) | |||
| integer, | intent(in) | :: | incx |
public pure subroutine ctpsv(uplo, trans, diag, n, ap, x, incx)
Original interface for CTPSV See also: mfi_tpsv, f77_tpsv.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| character(len=1), | intent(in) | :: | trans | |||
| character(len=1), | intent(in) | :: | diag | |||
| integer, | intent(in) | :: | n | |||
| complex(kind=REAL32), | intent(in) | :: | ap(*) | |||
| complex(kind=REAL32), | intent(inout) | :: | x(*) | |||
| integer, | intent(in) | :: | incx |
public pure subroutine ztpsv(uplo, trans, diag, n, ap, x, incx)
Original interface for ZTPSV See also: mfi_tpsv, f77_tpsv.
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| character(len=1), | intent(in) | :: | uplo | |||
| character(len=1), | intent(in) | :: | trans | |||
| character(len=1), | intent(in) | :: | diag | |||
| integer, | intent(in) | :: | n | |||
| complex(kind=REAL64), | intent(in) | :: | ap(*) | |||
| complex(kind=REAL64), | intent(inout) | :: | x(*) | |||
| integer, | intent(in) | :: | incx |