/external/eigen/blas/ |
ctbmv.f | 164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 167 + .NOT.LSAME(TRANS,'C')) THEN 169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 171 ELSE IF (N.LT.0) THEN 173 ELSE IF (K.LT.0) THEN 175 ELSE IF (LDA.LT. (K+1)) THEN 177 ELSE IF (INCX.EQ.0) THEN 180 IF (INFO.NE.0) THEN 195 IF (INCX.LE.0) THEN 197 ELSE IF (INCX.NE.1) THEN [all...] |
ztbmv.f | 164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 167 + .NOT.LSAME(TRANS,'C')) THEN 169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 171 ELSE IF (N.LT.0) THEN 173 ELSE IF (K.LT.0) THEN 175 ELSE IF (LDA.LT. (K+1)) THEN 177 ELSE IF (INCX.EQ.0) THEN 180 IF (INFO.NE.0) THEN 195 IF (INCX.LE.0) THEN 197 ELSE IF (INCX.NE.1) THEN [all...] |
ctpmv.f | 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 127 + .NOT.LSAME(TRANS,'C')) THEN 129 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 131 ELSE IF (N.LT.0) THEN 133 ELSE IF (INCX.EQ.0) THEN 136 IF (INFO.NE.0) THEN 151 IF (INCX.LE.0) THEN 153 ELSE IF (INCX.NE.1) THEN 160 IF (LSAME(TRANS,'N')) THEN 164 IF (LSAME(UPLO,'U')) THEN [all...] |
ctpsv.f | 127 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 130 + .NOT.LSAME(TRANS,'C')) THEN 132 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 134 ELSE IF (N.LT.0) THEN 136 ELSE IF (INCX.EQ.0) THEN 139 IF (INFO.NE.0) THEN 154 IF (INCX.LE.0) THEN 156 ELSE IF (INCX.NE.1) THEN 163 IF (LSAME(TRANS,'N')) THEN 167 IF (LSAME(UPLO,'U')) THEN [all...] |
ztpmv.f | 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 127 + .NOT.LSAME(TRANS,'C')) THEN 129 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 131 ELSE IF (N.LT.0) THEN 133 ELSE IF (INCX.EQ.0) THEN 136 IF (INFO.NE.0) THEN 151 IF (INCX.LE.0) THEN 153 ELSE IF (INCX.NE.1) THEN 160 IF (LSAME(TRANS,'N')) THEN 164 IF (LSAME(UPLO,'U')) THEN [all...] |
ztpsv.f | 127 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 130 + .NOT.LSAME(TRANS,'C')) THEN 132 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 134 ELSE IF (N.LT.0) THEN 136 ELSE IF (INCX.EQ.0) THEN 139 IF (INFO.NE.0) THEN 154 IF (INCX.LE.0) THEN 156 ELSE IF (INCX.NE.1) THEN 163 IF (LSAME(TRANS,'N')) THEN 167 IF (LSAME(UPLO,'U')) THEN [all...] |
dtbmv.f | 164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 167 + .NOT.LSAME(TRANS,'C')) THEN 169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 171 ELSE IF (N.LT.0) THEN 173 ELSE IF (K.LT.0) THEN 175 ELSE IF (LDA.LT. (K+1)) THEN 177 ELSE IF (INCX.EQ.0) THEN 180 IF (INFO.NE.0) THEN 194 IF (INCX.LE.0) THEN 196 ELSE IF (INCX.NE.1) THEN [all...] |
stbmv.f | 164 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 167 + .NOT.LSAME(TRANS,'C')) THEN 169 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 171 ELSE IF (N.LT.0) THEN 173 ELSE IF (K.LT.0) THEN 175 ELSE IF (LDA.LT. (K+1)) THEN 177 ELSE IF (INCX.EQ.0) THEN 180 IF (INFO.NE.0) THEN 194 IF (INCX.LE.0) THEN 196 ELSE IF (INCX.NE.1) THEN [all...] |
dspr.f | 106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 108 ELSE IF (N.LT.0) THEN 110 ELSE IF (INCX.EQ.0) THEN 113 IF (INFO.NE.0) THEN 124 IF (INCX.LE.0) THEN 126 ELSE IF (INCX.NE.1) THEN 134 IF (LSAME(UPLO,'U')) THEN 138 IF (INCX.EQ.1) THEN 140 IF (X(J).NE.ZERO) THEN 153 IF (X(JX).NE.ZERO) THEN [all...] |
sspr.f | 106 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 108 ELSE IF (N.LT.0) THEN 110 ELSE IF (INCX.EQ.0) THEN 113 IF (INFO.NE.0) THEN 124 IF (INCX.LE.0) THEN 126 ELSE IF (INCX.NE.1) THEN 134 IF (LSAME(UPLO,'U')) THEN 138 IF (INCX.EQ.1) THEN 140 IF (X(J).NE.ZERO) THEN 153 IF (X(JX).NE.ZERO) THEN [all...] |
dtpmv.f | 121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 124 + .NOT.LSAME(TRANS,'C')) THEN 126 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 128 ELSE IF (N.LT.0) THEN 130 ELSE IF (INCX.EQ.0) THEN 133 IF (INFO.NE.0) THEN 147 IF (INCX.LE.0) THEN 149 ELSE IF (INCX.NE.1) THEN 156 IF (LSAME(TRANS,'N')) THEN 160 IF (LSAME(UPLO,'U')) THEN [all...] |
dtpsv.f | 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 127 + .NOT.LSAME(TRANS,'C')) THEN 129 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 131 ELSE IF (N.LT.0) THEN 133 ELSE IF (INCX.EQ.0) THEN 136 IF (INFO.NE.0) THEN 150 IF (INCX.LE.0) THEN 152 ELSE IF (INCX.NE.1) THEN 159 IF (LSAME(TRANS,'N')) THEN 163 IF (LSAME(UPLO,'U')) THEN [all...] |
stpmv.f | 121 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 124 + .NOT.LSAME(TRANS,'C')) THEN 126 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 128 ELSE IF (N.LT.0) THEN 130 ELSE IF (INCX.EQ.0) THEN 133 IF (INFO.NE.0) THEN 147 IF (INCX.LE.0) THEN 149 ELSE IF (INCX.NE.1) THEN 156 IF (LSAME(TRANS,'N')) THEN 160 IF (LSAME(UPLO,'U')) THEN [all...] |
stpsv.f | 124 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 127 + .NOT.LSAME(TRANS,'C')) THEN 129 ELSE IF (.NOT.LSAME(DIAG,'U') .AND. .NOT.LSAME(DIAG,'N')) THEN 131 ELSE IF (N.LT.0) THEN 133 ELSE IF (INCX.EQ.0) THEN 136 IF (INFO.NE.0) THEN 150 IF (INCX.LE.0) THEN 152 ELSE IF (INCX.NE.1) THEN 159 IF (LSAME(TRANS,'N')) THEN 163 IF (LSAME(UPLO,'U')) THEN [all...] |
chbmv.f | 160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 162 ELSE IF (N.LT.0) THEN 164 ELSE IF (K.LT.0) THEN 166 ELSE IF (LDA.LT. (K+1)) THEN 168 ELSE IF (INCX.EQ.0) THEN 170 ELSE IF (INCY.EQ.0) THEN 173 IF (INFO.NE.0) THEN 184 IF (INCX.GT.0) THEN 189 IF (INCY.GT.0) THEN 200 IF (BETA.NE.ONE) THEN [all...] |
dsbmv.f | 154 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 156 ELSE IF (N.LT.0) THEN 158 ELSE IF (K.LT.0) THEN 160 ELSE IF (LDA.LT. (K+1)) THEN 162 ELSE IF (INCX.EQ.0) THEN 164 ELSE IF (INCY.EQ.0) THEN 167 IF (INFO.NE.0) THEN 178 IF (INCX.GT.0) THEN 183 IF (INCY.GT.0) THEN 194 IF (BETA.NE.ONE) THEN [all...] |
ssbmv.f | 156 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 158 ELSE IF (N.LT.0) THEN 160 ELSE IF (K.LT.0) THEN 162 ELSE IF (LDA.LT. (K+1)) THEN 164 ELSE IF (INCX.EQ.0) THEN 166 ELSE IF (INCY.EQ.0) THEN 169 IF (INFO.NE.0) THEN 180 IF (INCX.GT.0) THEN 185 IF (INCY.GT.0) THEN 196 IF (BETA.NE.ONE) THEN [all...] |
zhbmv.f | 160 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 162 ELSE IF (N.LT.0) THEN 164 ELSE IF (K.LT.0) THEN 166 ELSE IF (LDA.LT. (K+1)) THEN 168 ELSE IF (INCX.EQ.0) THEN 170 ELSE IF (INCY.EQ.0) THEN 173 IF (INFO.NE.0) THEN 184 IF (INCX.GT.0) THEN 189 IF (INCY.GT.0) THEN 200 IF (BETA.NE.ONE) THEN [all...] |
chpr2.f | 123 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 125 ELSE IF (N.LT.0) THEN 127 ELSE IF (INCX.EQ.0) THEN 129 ELSE IF (INCY.EQ.0) THEN 132 IF (INFO.NE.0) THEN 144 IF ((INCX.NE.1) .OR. (INCY.NE.1)) THEN 145 IF (INCX.GT.0) THEN 150 IF (INCY.GT.0) THEN 163 IF (LSAME(UPLO,'U')) THEN 167 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN [all...] |
dspr2.f | 117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 119 ELSE IF (N.LT.0) THEN 121 ELSE IF (INCX.EQ.0) THEN 123 ELSE IF (INCY.EQ.0) THEN 126 IF (INFO.NE.0) THEN 138 IF ((INCX.NE.1) .OR. (INCY.NE.1)) THEN 139 IF (INCX.GT.0) THEN 144 IF (INCY.GT.0) THEN 157 IF (LSAME(UPLO,'U')) THEN 161 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN [all...] |
sspr2.f | 117 IF (.NOT.LSAME(UPLO,'U') .AND. .NOT.LSAME(UPLO,'L')) THEN 119 ELSE IF (N.LT.0) THEN 121 ELSE IF (INCX.EQ.0) THEN 123 ELSE IF (INCY.EQ.0) THEN 126 IF (INFO.NE.0) THEN 138 IF ((INCX.NE.1) .OR. (INCY.NE.1)) THEN 139 IF (INCX.GT.0) THEN 144 IF (INCY.GT.0) THEN 157 IF (LSAME(UPLO,'U')) THEN 161 IF ((INCX.EQ.1) .AND. (INCY.EQ.1)) THEN [all...] |
/external/eigen/blas/testing/ |
cblat2.f | 137 IF( TRACE )THEN 154 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN 160 IF( IDIM( I ).LT.0.OR.IDIM( I ).GT.NMAX )THEN 167 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 173 IF( KB( I ).LT.0 )THEN 180 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 186 IF( INC( I ).EQ.0.OR.ABS( INC( I ) ).GT.INCMAX )THEN 193 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN 200 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN 214 IF( .NOT.TSTERR )THEN [all...] |
zblat2.f | 138 IF( TRACE )THEN 155 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN 161 IF( IDIM( I ).LT.0.OR.IDIM( I ).GT.NMAX )THEN 168 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 174 IF( KB( I ).LT.0 )THEN 181 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 187 IF( INC( I ).EQ.0.OR.ABS( INC( I ) ).GT.INCMAX )THEN 194 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN 201 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN 215 IF( .NOT.TSTERR )THEN [all...] |
dblat2.f | 132 IF( TRACE )THEN 149 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN 155 IF( IDIM( I ).LT.0.OR.IDIM( I ).GT.NMAX )THEN 162 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 168 IF( KB( I ).LT.0 )THEN 175 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 181 IF( INC( I ).EQ.0.OR.ABS( INC( I ) ).GT.INCMAX )THEN 188 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN 195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN 209 IF( .NOT.TSTERR )THEN [all...] |
sblat2.f | 132 IF( TRACE )THEN 149 IF( NIDIM.LT.1.OR.NIDIM.GT.NIDMAX )THEN 155 IF( IDIM( I ).LT.0.OR.IDIM( I ).GT.NMAX )THEN 162 IF( NKB.LT.1.OR.NKB.GT.NKBMAX )THEN 168 IF( KB( I ).LT.0 )THEN 175 IF( NINC.LT.1.OR.NINC.GT.NINMAX )THEN 181 IF( INC( I ).EQ.0.OR.ABS( INC( I ) ).GT.INCMAX )THEN 188 IF( NALF.LT.1.OR.NALF.GT.NALMAX )THEN 195 IF( NBET.LT.1.OR.NBET.GT.NBEMAX )THEN 209 IF( .NOT.TSTERR )THEN [all...] |