| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
| H A D | sppsvx.f | 23 * SPPSVX uses the Cholesky factorization A = U**T*U or A = L*L**T to argument
222 REAL ZERO, ONE
226 LOGICAL EQUIL, NOFACT, RCEQU
227 INTEGER I, INFEQU, J local
228 REAL AMAX, ANORM, BIGNUM, SCOND, SMAX, SMIN, SMLNUM
231 LOGICAL LSAME
232 REAL SLAMCH, SLANSP
297 CALL XERBLA( 'SPPSVX', -INFO ) argument
321 20 CONTINUE
322 30 CONTINUE
[all …]
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
| H A D | sppsvx.f | 320 CHARACTER EQUED, FACT, UPLO
321 INTEGER INFO, LDB, LDX, N, NRHS
326 REAL AFP( * ), AP( * ), B( LDB, * ), BERR( * ),
327 $ FERR( * ), S( * ), WORK( * ), X( LDX, * )
333 REAL ZERO, ONE
337 LOGICAL EQUIL, NOFACT, RCEQU
338 INTEGER I, INFEQU, J local
339 REAL AMAX, ANORM, BIGNUM, SCOND, SMAX, SMIN, SMLNUM
343 REAL SLAMCH, SLANSP
433 30 CONTINUE
[all …]
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
| H A D | sppsvx.f | 312 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
409 CALL XERBLA( 'SPPSVX', -INFO ) argument
433 20 CONTINUE
434 30 CONTINUE
492 * End of SPPSVX argument
|
| /dports/math/xlapack/lapack-3.10.0/SRC/ |
| H A D | sppsvx.f | 309 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
405 CALL XERBLA( 'SPPSVX', -INFO ) argument
429 20 CONTINUE
430 30 CONTINUE
488 * End of SPPSVX argument
|
| /dports/math/blas/lapack-3.10.0/SRC/ |
| H A D | sppsvx.f | 309 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
405 CALL XERBLA( 'SPPSVX', -INFO ) argument
429 20 CONTINUE
430 30 CONTINUE
488 * End of SPPSVX argument
|
| /dports/math/lapack/lapack-3.10.0/SRC/ |
| H A D | sppsvx.f | 309 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
405 CALL XERBLA( 'SPPSVX', -INFO ) argument
429 20 CONTINUE
430 30 CONTINUE
488 * End of SPPSVX argument
|
| /dports/math/lapacke/lapack-3.10.0/SRC/ |
| H A D | sppsvx.f | 309 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
405 CALL XERBLA( 'SPPSVX', -INFO ) argument
429 20 CONTINUE
430 30 CONTINUE
488 * End of SPPSVX argument
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
| H A D | sppsvx.f | 1 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
297 CALL XERBLA( 'SPPSVX', -INFO ) argument
321 20 CONTINUE
322 30 CONTINUE
381 * End of SPPSVX argument
|
| /dports/math/cblas/lapack-3.10.0/SRC/ |
| H A D | sppsvx.f | 309 SUBROUTINE SPPSVX( FACT, UPLO, N, NRHS, AP, AFP, EQUED, S, B, LDB, subroutine
405 CALL XERBLA( 'SPPSVX', -INFO ) argument
429 20 CONTINUE
430 30 CONTINUE
488 * End of SPPSVX argument
|