Home
last modified time | relevance | path

Searched refs:ICCOL (Results 1 – 25 of 74) sorted by relevance

123

/dports/math/scalapack/scalapack-2.1.0/PBLAS/SRC/PBBLAS/
H A Dpbctran.f235 ELSE IF( ICCOL.LT.-1 .OR. ICCOL.GE.NPCOL .OR.
446 JCCOL = ICCOL
447 IF( ICCOL.EQ.-1 ) JCCOL = IACOL
457 $ ( ICCOL.EQ.MYCOL .OR. ICCOL.EQ.-1 ) ) THEN
512 IF( ICCOL.EQ.-1 ) THEN
531 IF( LCMP.EQ.1.AND.(ICCOL.EQ.-1.OR.ICCOL.EQ.MYCOL) ) THEN
555 IF( ICCOL.EQ.-1 ) THEN
571 IF( MYCOL.NE.ICCOL )
573 ELSE IF( MYCOL.EQ.ICCOL ) THEN
586 IF( MYCOL.NE.ICCOL )
[all …]
H A Dpbdtran.f235 ELSE IF( ICCOL.LT.-1 .OR. ICCOL.GE.NPCOL .OR.
446 JCCOL = ICCOL
447 IF( ICCOL.EQ.-1 ) JCCOL = IACOL
457 $ ( ICCOL.EQ.MYCOL .OR. ICCOL.EQ.-1 ) ) THEN
512 IF( ICCOL.EQ.-1 ) THEN
531 IF( LCMP.EQ.1.AND.(ICCOL.EQ.-1.OR.ICCOL.EQ.MYCOL) ) THEN
555 IF( ICCOL.EQ.-1 ) THEN
571 IF( MYCOL.NE.ICCOL )
573 ELSE IF( MYCOL.EQ.ICCOL ) THEN
586 IF( MYCOL.NE.ICCOL )
[all …]
H A Dpbstran.f234 ELSE IF( ICCOL.LT.-1 .OR. ICCOL.GE.NPCOL .OR.
445 JCCOL = ICCOL
446 IF( ICCOL.EQ.-1 ) JCCOL = IACOL
456 $ ( ICCOL.EQ.MYCOL .OR. ICCOL.EQ.-1 ) ) THEN
511 IF( ICCOL.EQ.-1 ) THEN
530 IF( LCMP.EQ.1.AND.(ICCOL.EQ.-1.OR.ICCOL.EQ.MYCOL) ) THEN
554 IF( ICCOL.EQ.-1 ) THEN
570 IF( MYCOL.NE.ICCOL )
572 ELSE IF( MYCOL.EQ.ICCOL ) THEN
585 IF( MYCOL.NE.ICCOL )
[all …]
H A Dpbztran.f235 ELSE IF( ICCOL.LT.-1 .OR. ICCOL.GE.NPCOL .OR.
446 JCCOL = ICCOL
447 IF( ICCOL.EQ.-1 ) JCCOL = IACOL
457 $ ( ICCOL.EQ.MYCOL .OR. ICCOL.EQ.-1 ) ) THEN
512 IF( ICCOL.EQ.-1 ) THEN
531 IF( LCMP.EQ.1.AND.(ICCOL.EQ.-1.OR.ICCOL.EQ.MYCOL) ) THEN
555 IF( ICCOL.EQ.-1 ) THEN
571 IF( MYCOL.NE.ICCOL )
573 ELSE IF( MYCOL.EQ.ICCOL ) THEN
586 IF( MYCOL.NE.ICCOL )
[all …]
/dports/math/scalapack/scalapack-2.1.0/SRC/
H A Dpclarfc.f276 $ ICROW, ICCOL )
298 IF( MYCOL.EQ.ICCOL )
333 IF( MYCOL.EQ.ICCOL ) THEN
377 IF( IVCOL.EQ.ICCOL ) THEN
381 IF( MYCOL.EQ.ICCOL ) THEN
418 $ ICCOL )
420 ELSE IF( MYCOL.EQ.ICCOL ) THEN
636 $ ICCOL )
690 $ ICCOL )
744 $ ICCOL )
[all …]
H A Dpdlarf.f275 $ ICROW, ICCOL )
297 IF( MYCOL.EQ.ICCOL )
332 IF( MYCOL.EQ.ICCOL ) THEN
375 IF( IVCOL.EQ.ICCOL ) THEN
379 IF( MYCOL.EQ.ICCOL ) THEN
416 $ ICCOL )
418 ELSE IF( MYCOL.EQ.ICCOL ) THEN
638 $ ICCOL )
691 $ ICCOL )
746 $ ICCOL )
[all …]
H A Dpslarf.f275 $ ICROW, ICCOL )
297 IF( MYCOL.EQ.ICCOL )
332 IF( MYCOL.EQ.ICCOL ) THEN
375 IF( IVCOL.EQ.ICCOL ) THEN
379 IF( MYCOL.EQ.ICCOL ) THEN
416 $ ICCOL )
418 ELSE IF( MYCOL.EQ.ICCOL ) THEN
638 $ ICCOL )
691 $ ICCOL )
746 $ ICCOL )
[all …]
H A Dpclarf.f276 $ ICROW, ICCOL )
298 IF( MYCOL.EQ.ICCOL )
333 IF( MYCOL.EQ.ICCOL ) THEN
376 IF( IVCOL.EQ.ICCOL ) THEN
380 IF( MYCOL.EQ.ICCOL ) THEN
417 $ ICCOL )
419 ELSE IF( MYCOL.EQ.ICCOL ) THEN
640 $ ICCOL )
693 $ ICCOL )
748 $ ICCOL )
[all …]
H A Dpzlarf.f276 $ ICROW, ICCOL )
298 IF( MYCOL.EQ.ICCOL )
333 IF( MYCOL.EQ.ICCOL ) THEN
376 IF( IVCOL.EQ.ICCOL ) THEN
380 IF( MYCOL.EQ.ICCOL ) THEN
417 $ ICCOL )
419 ELSE IF( MYCOL.EQ.ICCOL ) THEN
640 $ ICCOL )
693 $ ICCOL )
748 $ ICCOL )
[all …]
H A Dpzlarfc.f276 $ ICROW, ICCOL )
298 IF( MYCOL.EQ.ICCOL )
333 IF( MYCOL.EQ.ICCOL ) THEN
377 IF( IVCOL.EQ.ICCOL ) THEN
381 IF( MYCOL.EQ.ICCOL ) THEN
418 $ ICCOL )
420 ELSE IF( MYCOL.EQ.ICCOL ) THEN
636 $ ICCOL )
690 $ ICCOL )
744 $ ICCOL )
[all …]
H A Dpdorm2l.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC,
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
331 $ JCC, ICROW, ICCOL )
355 IF( IACOL.NE.ICCOL ) THEN
357 $ CALL DGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
358 IF( MYCOL.EQ.ICCOL )
362 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpdorm2r.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC,
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
332 $ JCC, ICROW, ICCOL )
356 IF( IACOL.NE.ICCOL ) THEN
358 $ CALL DGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
359 IF( MYCOL.EQ.ICCOL )
363 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpsorm2l.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC, local
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
331 $ JCC, ICROW, ICCOL )
355 IF( IACOL.NE.ICCOL ) THEN
357 $ CALL SGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
358 IF( MYCOL.EQ.ICCOL )
362 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpsorm2r.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC, local
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
332 $ JCC, ICROW, ICCOL )
356 IF( IACOL.NE.ICCOL ) THEN
358 $ CALL SGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
359 IF( MYCOL.EQ.ICCOL )
363 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpzunm2l.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC,
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
331 $ JCC, ICROW, ICCOL )
363 IF( IACOL.NE.ICCOL ) THEN
365 $ CALL ZGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
366 IF( MYCOL.EQ.ICCOL )
370 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpzunm2r.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC, local
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
332 $ JCC, ICROW, ICCOL )
364 IF( IACOL.NE.ICCOL ) THEN
366 $ CALL ZGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
367 IF( MYCOL.EQ.ICCOL )
371 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpcunm2l.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC,
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
331 $ JCC, ICROW, ICCOL )
363 IF( IACOL.NE.ICCOL ) THEN
365 $ CALL CGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
366 IF( MYCOL.EQ.ICCOL )
370 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpcunm2r.f220 INTEGER IACOL, IAROW, ICCOL, ICOFFC, ICROW, ICTXT, ICC,
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
332 $ JCC, ICROW, ICCOL )
364 IF( IACOL.NE.ICCOL ) THEN
366 $ CALL CGESD2D( ICTXT, 1, 1, AJJ, 1, MYROW, ICCOL )
367 IF( MYCOL.EQ.ICCOL )
371 IF( MYCOL.EQ.ICCOL ) THEN
H A Dpsorml2.f220 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA, local
272 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
275 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
284 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL,
305 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpdorml2.f220 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA,
272 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
275 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
284 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL,
305 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpcunml2.f220 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA,
273 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
276 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
285 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL,
306 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpzunml2.f220 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA, local
273 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
276 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
285 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL,
306 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpdormr3.f223 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA, local
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
305 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpsormr2.f220 INTEGER I, I1, I2, I3, IACOL, ICCOL, ICOFFA, ICOFFC, local
271 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
274 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
300 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN
H A Dpsormr3.f223 INTEGER I, I1, I2, I3, IACOL, ICC, ICCOL, ICOFFA, local
274 ICCOL = INDXG2P( JC, DESCC( NB_ ), MYCOL, DESCC( CSRC_ ),
277 NQC0 = NUMROC( N+ICOFFC, DESCC( NB_ ), MYCOL, ICCOL, NPCOL )
305 ELSE IF( .NOT.LEFT .AND. IACOL.NE.ICCOL ) THEN

123