Section 3: library functions
NAME strsna.f – SYNOPSIS Functions/Subroutines subroutine strsna (JOB, HOWMNY, SELECT, N, T, LDT, VL, LDVL, VR, LDVR, S, SEP, MM, M, WORK, LDWORK, IWORK, INFO) STRSNA Function/Subroutine Documentation subroutine strsna (characterJOB, characterHOWMNY, logical, dimension( * )SELECT, integerN, real, dimension( ldt, * )T, integerLDT, real, dimension( ldvl, * )VL, integerLDVL, real, dimension( ldvr, * )VR, integerLDVR,…
NAME strsm.f – SYNOPSIS Functions/Subroutines subroutine strsm (SIDE, UPLO, TRANSA, DIAG, M, N, ALPHA, A, LDA, B, LDB) STRSM Function/Subroutine Documentation subroutine strsm (characterSIDE, characterUPLO, characterTRANSA, characterDIAG, integerM, integerN, realALPHA, real, dimension(lda,*)A, integerLDA, real, dimension(ldb,*)B, integerLDB) STRSM Purpose: STRSM solves one of the matrix equations op( A )*X = alpha*B, or X*op( A ) =…
NAME strsen.f – SYNOPSIS Functions/Subroutines subroutine strsen (JOB, COMPQ, SELECT, N, T, LDT, Q, LDQ, WR, WI, M, S, SEP, WORK, LWORK, IWORK, LIWORK, INFO) STRSEN Function/Subroutine Documentation subroutine strsen (characterJOB, characterCOMPQ, logical, dimension( * )SELECT, integerN, real, dimension( ldt, * )T, integerLDT, real, dimension( ldq, * )Q, integerLDQ, real, dimension( * )WR, real, dimension(…
NAME strrfs.f – SYNOPSIS Functions/Subroutines subroutine strrfs (UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO) STRRFS Function/Subroutine Documentation subroutine strrfs (characterUPLO, characterTRANS, characterDIAG, integerN, integerNRHS, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, * )B, integerLDB, real, dimension( ldx, * )X, integerLDX, real, dimension( * )FERR,…
NAME stptri.f – SYNOPSIS Functions/Subroutines subroutine stptri (UPLO, DIAG, N, AP, INFO) STPTRI Function/Subroutine Documentation subroutine stptri (characterUPLO, characterDIAG, integerN, real, dimension( * )AP, integerINFO) STPTRI Purpose: STPTRI computes the inverse of a real upper or lower triangular matrix A stored in packed format. Parameters: UPLO UPLO is CHARACTER*1 = ‘U’: A is upper…
NAME stpsv.f – SYNOPSIS Functions/Subroutines subroutine stpsv (UPLO, TRANS, DIAG, N, AP, X, INCX) STPSV Function/Subroutine Documentation subroutine stpsv (characterUPLO, characterTRANS, characterDIAG, integerN, real, dimension(*)AP, real, dimension(*)X, integerINCX) STPSV Purpose: STPSV solves one of the systems of equations A*x = b, or A**T*x = b, where b and x are n element vectors and A…
NAME stprfs.f – SYNOPSIS Functions/Subroutines subroutine stprfs (UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, FERR, BERR, WORK, IWORK, INFO) STPRFS Function/Subroutine Documentation subroutine stprfs (characterUPLO, characterTRANS, characterDIAG, integerN, integerNRHS, real, dimension( * )AP, real, dimension( ldb, * )B, integerLDB, real, dimension( ldx, * )X, integerLDX, real, dimension( * )FERR, real, dimension( *…
NAME stprfb.f – SYNOPSIS Functions/Subroutines subroutine stprfb (SIDE, TRANS, DIRECT, STOREV, M, N, K, L, V, LDV, T, LDT, A, LDA, B, LDB, WORK, LDWORK) STPRFB applies a real or complex ‘triangular-pentagonal’ blocked reflector to a real or complex matrix, which is composed of two blocks. Function/Subroutine Documentation subroutine stprfb (characterSIDE, characterTRANS, characterDIRECT, characterSTOREV, integerM,…
NAME stpqrt2.f – SYNOPSIS Functions/Subroutines subroutine stpqrt2 (M, N, L, A, LDA, B, LDB, T, LDT, INFO) STPQRT2 computes a QR factorization of a real or complex ‘triangular-pentagonal’ matrix, which is composed of a triangular block and a pentagonal block, using the compact WY representation for Q. Function/Subroutine Documentation subroutine stpqrt2 (integerM, integerN, integerL, real,…
NAME stpqrt.f – SYNOPSIS Functions/Subroutines subroutine stpqrt (M, N, L, NB, A, LDA, B, LDB, T, LDT, WORK, INFO) STPQRT Function/Subroutine Documentation subroutine stpqrt (integerM, integerN, integerL, integerNB, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, * )B, integerLDB, real, dimension( ldt, * )T, integerLDT, real, dimension( * )WORK, integerINFO) STPQRT Purpose: STPQRT computes…
NAME stpmv.f – SYNOPSIS Functions/Subroutines subroutine stpmv (UPLO, TRANS, DIAG, N, AP, X, INCX) STPMV Function/Subroutine Documentation subroutine stpmv (characterUPLO, characterTRANS, characterDIAG, integerN, real, dimension(*)AP, real, dimension(*)X, integerINCX) STPMV Purpose: STPMV performs one of the matrix-vector operations x := A*x, or x := A**T*x, where x is an n element vector and A is an…
NAME stpmqrt.f – SYNOPSIS Functions/Subroutines subroutine stpmqrt (SIDE, TRANS, M, N, K, L, NB, V, LDV, T, LDT, A, LDA, B, LDB, WORK, INFO) STPMQRT Function/Subroutine Documentation subroutine stpmqrt (characterSIDE, characterTRANS, integerM, integerN, integerK, integerL, integerNB, real, dimension( ldv, * )V, integerLDV, real, dimension( ldt, * )T, integerLDT, real, dimension( lda, * )A, integerLDA, real,…
NAME stpcon.f – SYNOPSIS Functions/Subroutines subroutine stpcon (NORM, UPLO, DIAG, N, AP, RCOND, WORK, IWORK, INFO) STPCON Function/Subroutine Documentation subroutine stpcon (characterNORM, characterUPLO, characterDIAG, integerN, real, dimension( * )AP, realRCOND, real, dimension( * )WORK, integer, dimension( * )IWORK, integerINFO) STPCON Purpose: STPCON estimates the reciprocal of the condition number of a packed triangular matrix A,…
NAME stgsyl.f – SYNOPSIS Functions/Subroutines subroutine stgsyl (TRANS, IJOB, M, N, A, LDA, B, LDB, C, LDC, D, LDD, E, LDE, F, LDF, SCALE, DIF, WORK, LWORK, IWORK, INFO) STGSYL Function/Subroutine Documentation subroutine stgsyl (characterTRANS, integerIJOB, integerM, integerN, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, * )B, integerLDB, real, dimension( ldc, * )C,…
NAME stgsy2.f – SYNOPSIS Functions/Subroutines subroutine stgsy2 (TRANS, IJOB, M, N, A, LDA, B, LDB, C, LDC, D, LDD, E, LDE, F, LDF, SCALE, RDSUM, RDSCAL, IWORK, PQ, INFO) STGSY2 solves the generalized Sylvester equation (unblocked algorithm). Function/Subroutine Documentation subroutine stgsy2 (characterTRANS, integerIJOB, integerM, integerN, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, *…
NAME stgsna.f – SYNOPSIS Functions/Subroutines subroutine stgsna (JOB, HOWMNY, SELECT, N, A, LDA, B, LDB, VL, LDVL, VR, LDVR, S, DIF, MM, M, WORK, LWORK, IWORK, INFO) STGSNA Function/Subroutine Documentation subroutine stgsna (characterJOB, characterHOWMNY, logical, dimension( * )SELECT, integerN, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, * )B, integerLDB, real, dimension( ldvl, *…
NAME stgsja.f – SYNOPSIS Functions/Subroutines subroutine stgsja (JOBU, JOBV, JOBQ, M, P, N, K, L, A, LDA, B, LDB, TOLA, TOLB, ALPHA, BETA, U, LDU, V, LDV, Q, LDQ, WORK, NCYCLE, INFO) STGSJA Function/Subroutine Documentation subroutine stgsja (characterJOBU, characterJOBV, characterJOBQ, integerM, integerP, integerN, integerK, integerL, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, *…
NAME stgsen.f – SYNOPSIS Functions/Subroutines subroutine stgsen (IJOB, WANTQ, WANTZ, SELECT, N, A, LDA, B, LDB, ALPHAR, ALPHAI, BETA, Q, LDQ, Z, LDZ, M, PL, PR, DIF, WORK, LWORK, IWORK, LIWORK, INFO) STGSEN Function/Subroutine Documentation subroutine stgsen (integerIJOB, logicalWANTQ, logicalWANTZ, logical, dimension( * )SELECT, integerN, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, *…
NAME stgexc.f – SYNOPSIS Functions/Subroutines subroutine stgexc (WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ, IFST, ILST, WORK, LWORK, INFO) STGEXC Function/Subroutine Documentation subroutine stgexc (logicalWANTQ, logicalWANTZ, integerN, real, dimension( lda, * )A, integerLDA, real, dimension( ldb, * )B, integerLDB, real, dimension( ldq, * )Q, integerLDQ, real, dimension( ldz, * )Z, integerLDZ,…
NAME stgex2.f – SYNOPSIS Functions/Subroutines subroutine stgex2 (WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ, J1, N1, N2, WORK, LWORK, INFO) STGEX2 swaps adjacent diagonal blocks in an upper (quasi) triangular matrix pair by an orthogonal equivalence transformation. Function/Subroutine Documentation subroutine stgex2 (logicalWANTQ, logicalWANTZ, integerN, real, dimension( lda, * )A, integerLDA, real,…