/external/eigen/blas/ |
chpr.f | 1 SUBROUTINE CHPR(UPLO,N,ALPHA,X,INCX,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 59 * Before entry with UPLO = 'U' or 'u', the array AP must 66 * Before entry with UPLO = 'L' or 'l', the array AP must 112 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
dspr.f | 1 SUBROUTINE DSPR(UPLO,N,ALPHA,X,INCX,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 59 * Before entry with UPLO = 'U' or 'u', the array AP must 66 * Before entry with UPLO = 'L' or 'l', the array AP must 106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
sspr.f | 1 SUBROUTINE SSPR(UPLO,N,ALPHA,X,INCX,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 59 * Before entry with UPLO = 'U' or 'u', the array AP must 66 * Before entry with UPLO = 'L' or 'l', the array AP must 106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
zhpr.f | 1 SUBROUTINE ZHPR(UPLO,N,ALPHA,X,INCX,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 59 * Before entry with UPLO = 'U' or 'u', the array AP must 66 * Before entry with UPLO = 'L' or 'l', the array AP must 112 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
chbmv.f | 1 SUBROUTINE CHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 52 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 70 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 ) 160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
chpmv.f | 1 SUBROUTINE CHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 48 * Before entry with UPLO = 'U' or 'u', the array AP must 53 * Before entry with UPLO = 'L' or 'l', the array AP must 126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
chpr2.f | 1 SUBROUTINE CHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 70 * Before entry with UPLO = 'U' or 'u', the array AP must 77 * Before entry with UPLO = 'L' or 'l', the array AP must 123 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
common.h | 47 #define UPLO(X) ( ((X)=='U' || (X)=='u') ? UP \ 66 inline bool check_uplo(const char* uplo) 68 return UPLO(*uplo)!=0xff;
|
dsbmv.f | 1 SUBROUTINE DSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 52 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 70 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 ) 154 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
dspmv.f | 1 SUBROUTINE DSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 48 * Before entry with UPLO = 'U' or 'u', the array AP must 53 * Before entry with UPLO = 'L' or 'l', the array AP must 119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
dspr2.f | 1 SUBROUTINE DSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 70 * Before entry with UPLO = 'U' or 'u', the array AP must 77 * Before entry with UPLO = 'L' or 'l', the array AP must 117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
dtbmv.f | 1 SUBROUTINE DTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 62 * On entry with UPLO = 'U' or 'u', K specifies the number of 64 * On entry with UPLO = 'L' or 'l', K specifies the number of 70 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 88 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 [all...] |
dtpmv.f | 1 SUBROUTINE DTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 63 * Before entry with UPLO = 'U' or 'u', the array AP must 68 * Before entry with UPLO = 'L' or 'l', the array AP must 121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
dtpsv.f | 1 SUBROUTINE DTPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 26 * UPLO - CHARACTER*1. 27 * On entry, UPLO specifies whether the matrix is an upper or 30 * UPLO = 'U' or 'u' A is an upper triangular matrix. 32 * UPLO = 'L' or 'l' A is a lower triangular matrix. 66 * Before entry with UPLO = 'U' or 'u', the array AP must 71 * Before entry with UPLO = 'L' or 'l', the array AP must 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
ssbmv.f | 1 SUBROUTINE SSBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 52 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 70 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 ) 156 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
sspmv.f | 1 SUBROUTINE SSPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 48 * Before entry with UPLO = 'U' or 'u', the array AP must 53 * Before entry with UPLO = 'L' or 'l', the array AP must 119 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
sspr2.f | 1 SUBROUTINE SSPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 70 * Before entry with UPLO = 'U' or 'u', the array AP must 77 * Before entry with UPLO = 'L' or 'l', the array AP must 117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
stbmv.f | 1 SUBROUTINE STBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 62 * On entry with UPLO = 'U' or 'u', K specifies the number of 64 * On entry with UPLO = 'L' or 'l', K specifies the number of 70 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 88 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 [all...] |
stpmv.f | 1 SUBROUTINE STPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 63 * Before entry with UPLO = 'U' or 'u', the array AP must 68 * Before entry with UPLO = 'L' or 'l', the array AP must 121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
stpsv.f | 1 SUBROUTINE STPSV(UPLO,TRANS,DIAG,N,AP,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 26 * UPLO - CHARACTER*1. 27 * On entry, UPLO specifies whether the matrix is an upper or 30 * UPLO = 'U' or 'u' A is an upper triangular matrix. 32 * UPLO = 'L' or 'l' A is a lower triangular matrix. 66 * Before entry with UPLO = 'U' or 'u', the array AP must 71 * Before entry with UPLO = 'L' or 'l', the array AP must 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
zhbmv.f | 1 SUBROUTINE ZHBMV(UPLO,N,K,ALPHA,A,LDA,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 52 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 70 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 ) 160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
zhpmv.f | 1 SUBROUTINE ZHPMV(UPLO,N,ALPHA,AP,X,INCX,BETA,Y,INCY) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 48 * Before entry with UPLO = 'U' or 'u', the array AP must 53 * Before entry with UPLO = 'L' or 'l', the array AP must 126 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
zhpr2.f | 1 SUBROUTINE ZHPR2(UPLO,N,ALPHA,X,INCX,Y,INCY,AP) 5 CHARACTER UPLO 24 * UPLO - CHARACTER*1. 25 * On entry, UPLO specifies whether the upper or lower 29 * UPLO = 'U' or 'u' The upper triangular part of A is 32 * UPLO = 'L' or 'l' The lower triangular part of A is 70 * Before entry with UPLO = 'U' or 'u', the array AP must 77 * Before entry with UPLO = 'L' or 'l', the array AP must 123 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |
ctbmv.f | 1 SUBROUTINE CTBMV(UPLO,TRANS,DIAG,N,K,A,LDA,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 62 * On entry with UPLO = 'U' or 'u', K specifies the number of 64 * On entry with UPLO = 'L' or 'l', K specifies the number of 70 * Before entry with UPLO = 'U' or 'u', the leading ( k + 1 ) 88 * Before entry with UPLO = 'L' or 'l', the leading ( k + 1 [all...] |
ctpmv.f | 1 SUBROUTINE CTPMV(UPLO,TRANS,DIAG,N,AP,X,INCX) 4 CHARACTER DIAG,TRANS,UPLO 23 * UPLO - CHARACTER*1. 24 * On entry, UPLO specifies whether the matrix is an upper or 27 * UPLO = 'U' or 'u' A is an upper triangular matrix. 29 * UPLO = 'L' or 'l' A is a lower triangular matrix. 63 * Before entry with UPLO = 'U' or 'u', the array AP must 68 * Before entry with UPLO = 'L' or 'l', the array AP must 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THE [all...] |