Home
last modified time | relevance | path

Searched refs:APPLYQ (Results 26 – 50 of 58) sorted by relevance

123

/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lapack/double/
H A Dzunmbr.f215 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
235 APPLYQ = LSAME( VECT, 'Q' )
252 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
264 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
265 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
276 IF( APPLYQ ) THEN
312 IF( APPLYQ ) THEN
H A Ddormbr.f214 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
234 APPLYQ = LSAME( VECT, 'Q' )
248 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
260 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
261 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
271 IF( APPLYQ ) THEN
305 IF( APPLYQ ) THEN
/dports/math/algae/algae-4.3.6/lapack/
H A Ddormbr.f124 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
144 APPLYQ = LSAME( VECT, 'Q' )
158 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
170 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
171 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
181 IF( APPLYQ ) THEN
215 IF( APPLYQ ) THEN
H A Dzunmbr.f124 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
144 APPLYQ = LSAME( VECT, 'Q' )
158 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
170 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
171 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
181 IF( APPLYQ ) THEN
214 IF( APPLYQ ) THEN
/dports/science/elmerfem/elmerfem-release-9.0/mathlibs/src/lapack/
H A Ddormbr.f124 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
144 APPLYQ = LSAME( VECT, 'Q' )
158 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
170 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
171 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
181 IF( APPLYQ ) THEN
215 IF( APPLYQ ) THEN
H A Dcunmbr.f125 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
145 APPLYQ = LSAME( VECT, 'Q' )
159 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
171 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
172 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
182 IF( APPLYQ ) THEN
215 IF( APPLYQ ) THEN
H A Dzunmbr.f124 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
144 APPLYQ = LSAME( VECT, 'Q' )
158 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
170 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
171 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
181 IF( APPLYQ ) THEN
214 IF( APPLYQ ) THEN
H A Dsormbr.f125 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
145 APPLYQ = LSAME( VECT, 'Q' )
159 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
171 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
172 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
182 IF( APPLYQ ) THEN
216 IF( APPLYQ ) THEN
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lapack/single/
H A Dsormbr.f216 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
236 APPLYQ = LSAME( VECT, 'Q' )
250 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
262 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
263 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
273 IF( APPLYQ ) THEN
307 IF( APPLYQ ) THEN
H A Dcunmbr.f217 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
237 APPLYQ = LSAME( VECT, 'Q' )
254 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
266 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
267 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
278 IF( APPLYQ ) THEN
314 IF( APPLYQ ) THEN
/dports/science/nwchem-data/nwchem-7.0.2-release/src/lapack/double/
H A Dzunmbr.f215 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
235 APPLYQ = LSAME( VECT, 'Q' )
252 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
264 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
265 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
276 IF( APPLYQ ) THEN
312 IF( APPLYQ ) THEN
H A Ddormbr.f214 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
234 APPLYQ = LSAME( VECT, 'Q' )
248 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
260 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
261 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
271 IF( APPLYQ ) THEN
305 IF( APPLYQ ) THEN
/dports/math/openblas/OpenBLAS-0.3.18/lapack-netlib/SRC/
H A Dcunmbr.f217 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
237 APPLYQ = LSAME( VECT, 'Q' )
254 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
266 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
267 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
278 IF( APPLYQ ) THEN
314 IF( APPLYQ ) THEN
H A Dsormbr.f216 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
236 APPLYQ = LSAME( VECT, 'Q' )
250 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
262 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
263 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
273 IF( APPLYQ ) THEN
307 IF( APPLYQ ) THEN
H A Ddormbr.f214 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
234 APPLYQ = LSAME( VECT, 'Q' )
248 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
260 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
261 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
271 IF( APPLYQ ) THEN
305 IF( APPLYQ ) THEN
H A Dzunmbr.f215 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
235 APPLYQ = LSAME( VECT, 'Q' )
252 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
264 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
265 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
276 IF( APPLYQ ) THEN
312 IF( APPLYQ ) THEN
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Dsormbr.f125 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
145 APPLYQ = LSAME( VECT, 'Q' )
159 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
171 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
172 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
182 IF( APPLYQ ) THEN
216 IF( APPLYQ ) THEN
H A Dcunmbr.f125 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
145 APPLYQ = LSAME( VECT, 'Q' )
159 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
171 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
172 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
182 IF( APPLYQ ) THEN
215 IF( APPLYQ ) THEN
H A Ddormbr.f124 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
144 APPLYQ = LSAME( VECT, 'Q' )
158 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
170 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
171 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
181 IF( APPLYQ ) THEN
215 IF( APPLYQ ) THEN
/dports/science/elk/elk-7.2.42/src/LAPACK/
H A Dzunmbr.f215 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
235 APPLYQ = LSAME( VECT, 'Q' )
252 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
264 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
265 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
276 IF( APPLYQ ) THEN
312 IF( APPLYQ ) THEN
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/lapack/single/
H A Dsormbr.f216 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
236 APPLYQ = LSAME( VECT, 'Q' )
250 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
262 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
263 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
273 IF( APPLYQ ) THEN
307 IF( APPLYQ ) THEN
H A Dcunmbr.f217 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
237 APPLYQ = LSAME( VECT, 'Q' )
254 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
266 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
267 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
278 IF( APPLYQ ) THEN
314 IF( APPLYQ ) THEN
/dports/math/cblas/lapack-3.10.0/SRC/
H A Dcunmbr.f214 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
234 APPLYQ = LSAME( VECT, 'Q' )
248 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
260 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
261 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
272 IF( APPLYQ ) THEN
308 IF( APPLYQ ) THEN
H A Ddormbr.f211 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
231 APPLYQ = LSAME( VECT, 'Q' )
245 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
257 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
258 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
268 IF( APPLYQ ) THEN
302 IF( APPLYQ ) THEN
H A Dzunmbr.f212 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
232 APPLYQ = LSAME( VECT, 'Q' )
246 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
258 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
259 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
270 IF( APPLYQ ) THEN
306 IF( APPLYQ ) THEN

123