Home
last modified time | relevance | path

Searched refs:APPLYQ (Results 1 – 25 of 58) sorted by relevance

123

/dports/math/scalapack/scalapack-2.1.0/SRC/
H A Dpdormbr.f325 APPLYQ = LSAME( VECT, 'Q' )
333 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
350 IF( APPLYQ ) THEN
357 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
374 IF( APPLYQ ) THEN
400 IF( APPLYQ ) THEN
446 ELSE IF( APPLYQ .AND. .NOT.LEFT .AND.
465 ELSE IF( APPLYQ .AND. LEFT .AND.
482 IF( APPLYQ ) THEN
508 IF( APPLYQ ) THEN
[all …]
H A Dpcunmbr.f325 APPLYQ = LSAME( VECT, 'Q' )
333 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
350 IF( APPLYQ ) THEN
357 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
374 IF( APPLYQ ) THEN
400 IF( APPLYQ ) THEN
446 ELSE IF( APPLYQ .AND. .NOT.LEFT .AND.
465 ELSE IF( APPLYQ .AND. LEFT .AND.
482 IF( APPLYQ ) THEN
508 IF( APPLYQ ) THEN
[all …]
H A Dpsormbr.f325 APPLYQ = LSAME( VECT, 'Q' )
333 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
350 IF( APPLYQ ) THEN
357 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
374 IF( APPLYQ ) THEN
400 IF( APPLYQ ) THEN
446 ELSE IF( APPLYQ .AND. .NOT.LEFT .AND.
465 ELSE IF( APPLYQ .AND. LEFT .AND.
482 IF( APPLYQ ) THEN
508 IF( APPLYQ ) THEN
[all …]
H A Dpzunmbr.f325 APPLYQ = LSAME( VECT, 'Q' )
333 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
350 IF( APPLYQ ) THEN
357 IF( ( APPLYQ .AND. NQ.GE.K ) .OR.
374 IF( APPLYQ ) THEN
400 IF( APPLYQ ) THEN
446 ELSE IF( APPLYQ .AND. .NOT.LEFT .AND.
465 ELSE IF( APPLYQ .AND. LEFT .AND.
482 IF( APPLYQ ) THEN
508 IF( APPLYQ ) THEN
[all …]
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
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
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 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
/dports/math/xlapack/lapack-3.10.0/SRC/
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 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 Dsormbr.f213 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
233 APPLYQ = LSAME( VECT, 'Q' )
247 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
259 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
260 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
270 IF( APPLYQ ) THEN
304 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
/dports/math/blas/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 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
H A Dsormbr.f213 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
233 APPLYQ = LSAME( VECT, 'Q' )
247 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
259 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
260 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
270 IF( APPLYQ ) THEN
304 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
/dports/science/lammps/lammps-stable_29Sep2021/lib/linalg/
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/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/src_f77/
H A Dzunmbr.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
214 IF( APPLYQ ) THEN
/dports/math/lapacke/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
H A Dsormbr.f213 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
233 APPLYQ = LSAME( VECT, 'Q' )
247 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
259 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
260 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
270 IF( APPLYQ ) THEN
304 IF( APPLYQ ) THEN
/dports/math/lapack/lapack-3.10.0/SRC/
H A Dzunmbr.f212 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN local
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
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 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 Dsormbr.f213 LOGICAL APPLYQ, LEFT, LQUERY, NOTRAN
233 APPLYQ = LSAME( VECT, 'Q' )
247 IF( .NOT.APPLYQ .AND. .NOT.LSAME( VECT, 'P' ) ) THEN
259 ELSE IF( ( APPLYQ .AND. LDA.LT.MAX( 1, NQ ) ) .OR.
260 $ ( .NOT.APPLYQ .AND. LDA.LT.MAX( 1, MIN( NQ, K ) ) ) )
270 IF( APPLYQ ) THEN
304 IF( APPLYQ ) THEN

123