/external/eigen/lapack/ |
H A D | clarf.f | 21 * SUBROUTINE CLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) 24 * CHARACTER SIDE 55 *> \param[in] SIDE 57 *> SIDE is CHARACTER*1 77 *> (1 + (M-1)*abs(INCV)) if SIDE = 'L' 78 *> or (1 + (N-1)*abs(INCV)) if SIDE = 'R' 99 *> On exit, C is overwritten by the matrix H * C if SIDE = 'L', 100 *> or C * H if SIDE = 'R'. 112 *> (N) if SIDE = 'L' 113 *> or (M) if SIDE 137 CHARACTER SIDE local in subroutine:CLARF [all...] |
H A D | dlarf.f | 21 * SUBROUTINE DLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) 24 * CHARACTER SIDE 51 *> \param[in] SIDE 53 *> SIDE is CHARACTER*1 73 *> (1 + (M-1)*abs(INCV)) if SIDE = 'L' 74 *> or (1 + (N-1)*abs(INCV)) if SIDE = 'R' 95 *> On exit, C is overwritten by the matrix H * C if SIDE = 'L', 96 *> or C * H if SIDE = 'R'. 108 *> (N) if SIDE = 'L' 109 *> or (M) if SIDE 133 CHARACTER SIDE local in subroutine:DLARF [all...] |
H A D | slarf.f | 21 * SUBROUTINE SLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) 24 * CHARACTER SIDE 51 *> \param[in] SIDE 53 *> SIDE is CHARACTER*1 73 *> (1 + (M-1)*abs(INCV)) if SIDE = 'L' 74 *> or (1 + (N-1)*abs(INCV)) if SIDE = 'R' 95 *> On exit, C is overwritten by the matrix H * C if SIDE = 'L', 96 *> or C * H if SIDE = 'R'. 108 *> (N) if SIDE = 'L' 109 *> or (M) if SIDE 133 CHARACTER SIDE local in subroutine:SLARF [all...] |
H A D | zlarf.f | 21 * SUBROUTINE ZLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) 24 * CHARACTER SIDE 55 *> \param[in] SIDE 57 *> SIDE is CHARACTER*1 77 *> (1 + (M-1)*abs(INCV)) if SIDE = 'L' 78 *> or (1 + (N-1)*abs(INCV)) if SIDE = 'R' 99 *> On exit, C is overwritten by the matrix H * C if SIDE = 'L', 100 *> or C * H if SIDE = 'R'. 112 *> (N) if SIDE = 'L' 113 *> or (M) if SIDE 137 CHARACTER SIDE local in subroutine:ZLARF [all...] |
H A D | clarfb.f | 21 * SUBROUTINE CLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, 25 * CHARACTER DIRECT, SIDE, STOREV, TRANS 46 *> \param[in] SIDE 48 *> SIDE is CHARACTER*1 101 *> (LDV,M) if STOREV = 'R' and SIDE = 'L' 102 *> (LDV,N) if STOREV = 'R' and SIDE = 'R' 110 *> If STOREV = 'C' and SIDE = 'L', LDV >= max(1,M); 111 *> if STOREV = 'C' and SIDE = 'R', LDV >= max(1,N); 150 *> If SIDE = 'L', LDWORK >= max(1,N); 151 *> if SIDE 204 CHARACTER DIRECT, SIDE local in subroutine:CLARFB [all...] |
H A D | dlarfb.f | 21 * SUBROUTINE DLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, 25 * CHARACTER DIRECT, SIDE, STOREV, TRANS 46 *> \param[in] SIDE 48 *> SIDE is CHARACTER*1 101 *> (LDV,M) if STOREV = 'R' and SIDE = 'L' 102 *> (LDV,N) if STOREV = 'R' and SIDE = 'R' 110 *> If STOREV = 'C' and SIDE = 'L', LDV >= max(1,M); 111 *> if STOREV = 'C' and SIDE = 'R', LDV >= max(1,N); 150 *> If SIDE = 'L', LDWORK >= max(1,N); 151 *> if SIDE 204 CHARACTER DIRECT, SIDE local in subroutine:DLARFB [all...] |
H A D | slarfb.f | 21 * SUBROUTINE SLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, 25 * CHARACTER DIRECT, SIDE, STOREV, TRANS 46 *> \param[in] SIDE 48 *> SIDE is CHARACTER*1 101 *> (LDV,M) if STOREV = 'R' and SIDE = 'L' 102 *> (LDV,N) if STOREV = 'R' and SIDE = 'R' 110 *> If STOREV = 'C' and SIDE = 'L', LDV >= max(1,M); 111 *> if STOREV = 'C' and SIDE = 'R', LDV >= max(1,N); 150 *> If SIDE = 'L', LDWORK >= max(1,N); 151 *> if SIDE 204 CHARACTER DIRECT, SIDE local in subroutine:SLARFB [all...] |
H A D | zlarfb.f | 21 * SUBROUTINE ZLARFB( SIDE, TRANS, DIRECT, STOREV, M, N, K, V, LDV, 25 * CHARACTER DIRECT, SIDE, STOREV, TRANS 46 *> \param[in] SIDE 48 *> SIDE is CHARACTER*1 101 *> (LDV,M) if STOREV = 'R' and SIDE = 'L' 102 *> (LDV,N) if STOREV = 'R' and SIDE = 'R' 110 *> If STOREV = 'C' and SIDE = 'L', LDV >= max(1,M); 111 *> if STOREV = 'C' and SIDE = 'R', LDV >= max(1,N); 150 *> If SIDE = 'L', LDWORK >= max(1,N); 151 *> if SIDE 204 CHARACTER DIRECT, SIDE local in subroutine:ZLARFB [all...] |
/external/eigen/blas/ |
H A D | common.h | 46 #define SIDE(X) ( ((X)=='L' || (X)=='l') ? LEFT \ macro 66 return SIDE(*side)!=0xff;
|
H A D | level3_impl.h | 119 if(SIDE(*side)==INVALID) info = 1; 125 else if(*lda<std::max(1,(SIDE(*side)==LEFT)?*m:*n)) info = 9; 130 int code = OP(*opa) | (SIDE(*side) << 2) | (UPLO(*uplo) << 3) | (DIAG(*diag) << 4); 132 if(SIDE(*side)==LEFT) 203 if(SIDE(*side)==INVALID) info = 1; 209 else if(*lda<std::max(1,(SIDE(*side)==LEFT)?*m:*n)) info = 9; 214 int code = OP(*opa) | (SIDE(*side) << 2) | (UPLO(*uplo) << 3) | (DIAG(*diag) << 4); 223 if(SIDE(*side)==LEFT) 248 if(SIDE(*side)==INVALID) info = 1; 252 else if(*lda<std::max(1,(SIDE(*sid [all...] |
/external/cblas/testing/ |
H A D | c_cblat3.f | 795 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:CCHK2 850 SIDE = ICHS( ICS: ICS ) 851 LEFT = SIDE.EQ.'L' 891 SIDES = SIDE 914 $ SIDE, UPLO, M, N, ALPHA, LDA, LDB, 919 CALL CCHEMM( IORDER, SIDE, UPLO, M, N, 923 CALL CCSYMM( IORDER, SIDE, UPLO, M, N, 938 ISAME( 1 ) = SIDES.EQ.SIDE 1017 CALL CPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA, 1046 SUBROUTINE CPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPL 1050 CHARACTER*1 SIDE local in subroutine:CPRCN2 1115 CHARACTER*1 DIAG, DIAGS, SIDE local in subroutine:CCHK3 1401 CHARACTER*1 SIDE local in subroutine:CPRCN3 [all...] |
H A D | c_zblat3.f | 796 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:ZCHK2 851 SIDE = ICHS( ICS: ICS ) 852 LEFT = SIDE.EQ.'L' 892 SIDES = SIDE 915 $ SIDE, UPLO, M, N, ALPHA, LDA, LDB, 920 CALL CZHEMM( IORDER, SIDE, UPLO, M, N, 924 CALL CZSYMM( IORDER, SIDE, UPLO, M, N, 939 ISAME( 1 ) = SIDES.EQ.SIDE 1018 CALL ZPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA, 1047 SUBROUTINE ZPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPL 1051 CHARACTER*1 SIDE local in subroutine:ZPRCN2 1116 CHARACTER*1 DIAG, DIAGS, SIDE local in subroutine:ZCHK3 1402 CHARACTER*1 SIDE local in subroutine:ZPRCN3 [all...] |
H A D | c_dblat3.f | 776 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:DCHK2 831 SIDE = ICHS( ICS: ICS ) 832 LEFT = SIDE.EQ.'L' 872 SIDES = SIDE 895 $ SIDE, UPLO, M, N, ALPHA, LDA, LDB, 899 CALL CDSYMM( IORDER, SIDE, UPLO, M, N, ALPHA, 912 ISAME( 1 ) = SIDES.EQ.SIDE 991 CALL DPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA, 1020 SUBROUTINE DPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, 1024 CHARACTER*1 SIDE, UPL local in subroutine:DPRCN2 1085 CHARACTER*1 DIAG, DIAGS, SIDE local in subroutine:DCHK3 1370 CHARACTER*1 SIDE local in subroutine:DPRCN3 [all...] |
H A D | c_sblat3.f | 780 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:SCHK2 835 SIDE = ICHS( ICS: ICS ) 836 LEFT = SIDE.EQ.'L' 876 SIDES = SIDE 899 $ SIDE, UPLO, M, N, ALPHA, LDA, LDB, 903 CALL CSSYMM( IORDER, SIDE, UPLO, M, N, ALPHA, 916 ISAME( 1 ) = SIDES.EQ.SIDE 995 CALL SPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, ALPHA, LDA, 1024 SUBROUTINE SPRCN2(NOUT, NC, SNAME, IORDER, SIDE, UPLO, M, N, 1028 CHARACTER*1 SIDE, UPL local in subroutine:SPRCN2 1089 CHARACTER*1 DIAG, DIAGS, SIDE local in subroutine:SCHK3 1374 CHARACTER*1 SIDE local in subroutine:SPRCN3 [all...] |
/external/eigen/blas/testing/ |
H A D | cblat3.f | 690 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:CCHK2 745 SIDE = ICHS( ICS: ICS ) 746 LEFT = SIDE.EQ.'L' 786 SIDES = SIDE 808 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE, 813 CALL CHEMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 816 CALL CSYMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 830 ISAME( 1 ) = SIDES.EQ.SIDE 907 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA, 968 CHARACTER*1 DIAG, DIAGS, SIDE, SIDE local in subroutine:CCHK3 [all...] |
H A D | zblat3.f | 691 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:ZCHK2 746 SIDE = ICHS( ICS: ICS ) 747 LEFT = SIDE.EQ.'L' 787 SIDES = SIDE 809 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE, 814 CALL ZHEMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 817 CALL ZSYMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 831 ISAME( 1 ) = SIDES.EQ.SIDE 908 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA, 970 CHARACTER*1 DIAG, DIAGS, SIDE, SIDE local in subroutine:ZCHK3 [all...] |
H A D | dblat3.f | 672 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:DCHK2 727 SIDE = ICHS( ICS: ICS ) 728 LEFT = SIDE.EQ.'L' 768 SIDES = SIDE 790 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE, 794 CALL DSYMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 807 ISAME( 1 ) = SIDES.EQ.SIDE 884 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA, 941 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO, local in subroutine:DCHK3 990 SIDE [all...] |
H A D | sblat3.f | 672 CHARACTER*1 SIDE, SIDES, UPLO, UPLOS local in subroutine:SCHK2 727 SIDE = ICHS( ICS: ICS ) 728 LEFT = SIDE.EQ.'L' 768 SIDES = SIDE 790 $ WRITE( NTRA, FMT = 9995 )NC, SNAME, SIDE, 794 CALL SSYMM( SIDE, UPLO, M, N, ALPHA, AA, LDA, 807 ISAME( 1 ) = SIDES.EQ.SIDE 884 WRITE( NOUT, FMT = 9995 )NC, SNAME, SIDE, UPLO, M, N, ALPHA, LDA, 941 CHARACTER*1 DIAG, DIAGS, SIDE, SIDES, TRANAS, TRANSA, UPLO, local in subroutine:SCHK3 990 SIDE [all...] |