| /dports/math/lapacke/lapack-3.10.0/SRC/ |
| H A D | ztgexc.f | 198 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
206 LOGICAL WANTQ, WANTZ
235 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
264 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
281 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ctrexc.f | 142 LOGICAL WANTQ
162 WANTQ = LSAME( COMPQ, 'V' )
163 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
169 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
223 IF( WANTQ ) THEN
|
| /dports/math/lapack/lapack-3.10.0/SRC/ |
| H A D | ctgexc.f | 198 SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
206 LOGICAL WANTQ, WANTZ
235 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
264 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
281 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ztgexc.f | 198 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
206 LOGICAL WANTQ, WANTZ local
235 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
264 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
281 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ctrexc.f | 142 LOGICAL WANTQ
162 WANTQ = LSAME( COMPQ, 'V' )
163 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
169 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
223 IF( WANTQ ) THEN
|
| /dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/ |
| H A D | ctgexc.f | 1 SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
10 LOGICAL WANTQ, WANTZ
145 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
174 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
191 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ztgexc.f | 1 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
10 LOGICAL WANTQ, WANTZ
145 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
174 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
191 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ctrexc.f | 67 LOGICAL WANTQ
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
148 IF( WANTQ ) THEN
|
| H A D | ztrexc.f | 67 LOGICAL WANTQ
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
149 IF( WANTQ ) THEN
|
| /dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/ |
| H A D | ctgexc.f | 200 SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
209 LOGICAL WANTQ, WANTZ local
238 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
267 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
284 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ztgexc.f | 200 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
209 LOGICAL WANTQ, WANTZ local
238 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
267 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
284 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ctrexc.f | 145 LOGICAL WANTQ local
165 WANTQ = LSAME( COMPQ, 'V' )
166 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
172 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
226 IF( WANTQ ) THEN
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/complex16/ |
| H A D | ztgexc.f | 1 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
10 LOGICAL WANTQ, WANTZ
145 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
174 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
191 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| /dports/math/cblas/lapack-3.10.0/SRC/ |
| H A D | ctgexc.f | 198 SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
206 LOGICAL WANTQ, WANTZ
235 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
264 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
281 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ztgexc.f | 198 SUBROUTINE ZTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
206 LOGICAL WANTQ, WANTZ
235 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
264 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
281 CALL ZTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/ |
| H A D | ctgexc.f | 200 SUBROUTINE CTGEXC( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, argument
209 LOGICAL WANTQ, WANTZ
238 ELSE IF( LDQ.LT.1 .OR. WANTQ .AND. ( LDQ.LT.MAX( 1, N ) ) ) THEN
267 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
284 CALL CTGEX2( WANTQ, WANTZ, N, A, LDA, B, LDB, Q, LDQ, Z, LDZ,
|
| H A D | ztrexc.f | 143 LOGICAL WANTQ
163 WANTQ = LSAME( COMPQ, 'V' )
164 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
170 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
225 IF( WANTQ ) THEN
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/ |
| H A D | ztrexc.f | 67 LOGICAL WANTQ
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
149 IF( WANTQ ) THEN
|
| /dports/math/xlapack/lapack-3.10.0/SRC/ |
| H A D | ctrexc.f | 142 LOGICAL WANTQ
162 WANTQ = LSAME( COMPQ, 'V' )
163 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
169 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
223 IF( WANTQ ) THEN
|
| /dports/math/algae/algae-4.3.6/lapack/ |
| H A D | ztrexc.f | 67 LOGICAL WANTQ
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
149 IF( WANTQ ) THEN
|
| /dports/math/blas/lapack-3.10.0/SRC/ |
| H A D | ctrexc.f | 142 LOGICAL WANTQ
162 WANTQ = LSAME( COMPQ, 'V' )
163 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
169 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
223 IF( WANTQ ) THEN
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/ |
| H A D | ctrexc.f | 67 LOGICAL WANTQ
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
148 IF( WANTQ ) THEN
|
| H A D | ztrexc.f | 67 LOGICAL WANTQ local
87 WANTQ = LSAME( COMPQ, 'V' )
88 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
94 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
149 IF( WANTQ ) THEN
|
| /dports/science/nwchem-data/nwchem-7.0.2-release/src/lapack/double/ |
| H A D | ztrexc.f | 143 LOGICAL WANTQ
163 WANTQ = LSAME( COMPQ, 'V' )
164 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
170 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
225 IF( WANTQ ) THEN
|
| /dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lapack/double/ |
| H A D | ztrexc.f | 143 LOGICAL WANTQ
163 WANTQ = LSAME( COMPQ, 'V' )
164 IF( .NOT.LSAME( COMPQ, 'N' ) .AND. .NOT.WANTQ ) THEN
170 ELSE IF( LDQ.LT.1 .OR. ( WANTQ .AND. LDQ.LT.MAX( 1, N ) ) ) THEN
225 IF( WANTQ ) THEN
|