Lines Matching refs:MYROW
233 $ MPC0, MQV, MQV0, MYCOL, MYDIST, MYROW, NBV, local
260 CALL BLACS_GRIDINFO( ICTXT, NPROW, NPCOL, MYROW, MYCOL )
274 CALL INFOG2L( IV, JV, DESCV, NPROW, NPCOL, MYROW, MYCOL, IIV, JJV,
276 CALL INFOG2L( IC, JC, DESCC, NPROW, NPCOL, MYROW, MYCOL, IIC, JJC,
288 MPC = NUMROC( M+IROFFC, DESCC( MB_ ), MYROW, ICROW, NPROW )
292 IF( MYROW.EQ.ICROW )
323 IF( MYROW.EQ.IVROW )
330 $ WORK( IPV ), LV, MYROW, IVCOL )
331 IF( MYROW.EQ.IVROW )
333 $ 'Non unit', K, K, T, NBV, MYROW, IVCOL )
341 MYDIST = MOD( MYROW-IVROW+NPROW, NPROW )
365 CALL INFOG1L( IV+M-K, MBV, NPROW, MYROW, DESCV( RSRC_ ),
367 KP = NUMROC( K+IOFF, MBV, MYROW, ILASTROW, NPROW )
368 IF( MYROW.EQ.ILASTROW )
370 MYDIST = MOD( MYROW-ILASTROW+NPROW, NPROW )
407 IF( MYROW.EQ.IVROW ) THEN
435 NPV0 = NUMROC( N+IROFFV, MBV, MYROW, IVROW, NPROW )
436 IF( MYROW.EQ.IVROW ) THEN
459 IF( MYROW.EQ.IVROW ) THEN
476 MYDIST = MOD( MYROW-IVROW+NPROW, NPROW )
500 CALL INFOG1L( IV+N-K, MBV, NPROW, MYROW,
503 KP = NUMROC( K+IOFF, MBV, MYROW, ILASTROW, NPROW )
504 IF( MYROW.EQ.ILASTROW )
506 MYDIST = MOD( MYROW-ILASTROW+NPROW, NPROW )
553 $ LW, MYROW, IVCOL )
558 IF( MYROW.EQ.IVROW ) THEN
575 $ LW, MYROW, IVCOL )
604 IF( MYROW.EQ.ICROW ) THEN
621 IF( MYROW.EQ.IVROW ) THEN
702 IF( MYROW.EQ.ICROW )
723 IF( MYROW.EQ.IVROW ) THEN
732 $ K, K, T, MBV, MYROW, IVCOL )
768 IF( MYROW.EQ.IVROW ) THEN
855 $ LW, MYROW, IVCOL )
866 $ LW, MYROW, IVCOL )