| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
| H A D | ssytri_rook.f | 139 INTEGER INFO, LDA, N
143 REAL A( LDA, * ), WORK( * )
149 REAL ONE, ZERO
154 INTEGER K, KP, KSTEP
155 REAL AK, AKKP1, AKP1, D, T, TEMP
200 10 CONTINUE
208 20 CONTINUE
220 30 CONTINUE
326 40 CONTINUE
336 50 CONTINUE
[all …]
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
| H A D | ssytri_rook.f | 130 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
200 10 CONTINUE
208 20 CONTINUE
220 30 CONTINUE
326 40 CONTINUE
336 50 CONTINUE
448 * End of SSYTRI_ROOK argument
|
| /dports/math/xlapack/lapack-3.10.0/SRC/ |
| H A D | ssytri_rook.f | 128 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
197 10 CONTINUE
205 20 CONTINUE
217 30 CONTINUE
323 40 CONTINUE
333 50 CONTINUE
445 * End of SSYTRI_ROOK argument
|
| /dports/math/blas/lapack-3.10.0/SRC/ |
| H A D | ssytri_rook.f | 128 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
197 10 CONTINUE
205 20 CONTINUE
217 30 CONTINUE
323 40 CONTINUE
333 50 CONTINUE
445 * End of SSYTRI_ROOK argument
|
| /dports/math/lapack/lapack-3.10.0/SRC/ |
| H A D | ssytri_rook.f | 128 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
197 10 CONTINUE
205 20 CONTINUE
217 30 CONTINUE
323 40 CONTINUE
333 50 CONTINUE
445 * End of SSYTRI_ROOK argument
|
| /dports/math/lapacke/lapack-3.10.0/SRC/ |
| H A D | ssytri_rook.f | 128 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
197 10 CONTINUE
205 20 CONTINUE
217 30 CONTINUE
323 40 CONTINUE
333 50 CONTINUE
445 * End of SSYTRI_ROOK argument
|
| /dports/math/cblas/lapack-3.10.0/SRC/ |
| H A D | ssytri_rook.f | 128 SUBROUTINE SSYTRI_ROOK( UPLO, N, A, LDA, IPIV, WORK, INFO ) subroutine
197 10 CONTINUE
205 20 CONTINUE
217 30 CONTINUE
323 40 CONTINUE
333 50 CONTINUE
445 * End of SSYTRI_ROOK argument
|