Home
last modified time | relevance | path

Searched refs:JJX (Results 1 – 25 of 68) sorted by relevance

123

/dports/math/scalapack/scalapack-2.1.0/SRC/
H A Dpcmax1.f159 $ JJX, LCINDX, LDX, MAXPOS, MYCOL, MYROW, NP, local
195 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
200 AMAX = X( IIX+(JJX-1)*LDX )
220 LCINDX = JJX-1+ICMAX1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
244 LCINDX = JJX-1+ICMAX1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
293 LCINDX = IIX-1+ICMAX1( NP, X( IIX+(JJX-1)*LDX ), 1 )
294 WORK( 1 ) = X( LCINDX + (JJX-1)*LDX )
317 LCINDX = IIX-1+ICMAX1( NP, X( IIX+(JJX-1)*LDX ), 1 )
318 AMAX = X( LCINDX + (JJX-1)*LDX )
H A Dpzmax1.f159 $ JJX, LCINDX, LDX, MAXPOS, MYCOL, MYROW, NP,
194 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
199 AMAX = X( IIX+(JJX-1)*LDX )
219 LCINDX = JJX-1+IZMAX1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
243 LCINDX = JJX-1+IZMAX1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
292 LCINDX = IIX-1+IZMAX1( NP, X( IIX+(JJX-1)*LDX ), 1 )
293 WORK( 1 ) = X( LCINDX + (JJX-1)*LDX )
316 LCINDX = IIX-1+IZMAX1( NP, X( IIX+(JJX-1)*LDX ), 1 )
317 AMAX = X( LCINDX + (JJX-1)*LDX )
H A Dpdzsum1.f152 INTEGER ICOFF, ICTXT, IIX, IROFF, IXCOL, IXROW, JJX,
178 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
183 ASUM = ABS( X( IIX+(JJX-1)*LDX ) )
198 ASUM = DZSUM1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
213 ASUM = DZSUM1( NP, X( IIX+(JJX-1)*LDX ), 1 )
H A Dpscsum1.f152 INTEGER ICOFF, ICTXT, IIX, IROFF, IXCOL, IXROW, JJX, local
178 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
183 ASUM = ABS( X( IIX+(JJX-1)*LDX ) )
198 ASUM = SCSUM1( NQ, X( IIX+(JJX-1)*LDX ), LDX )
213 ASUM = SCSUM1( NP, X( IIX+(JJX-1)*LDX ), 1 )
H A Dpclacgv.f119 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL, local
142 $ IIX, JJX, IXROW, IXCOL )
157 IOFFX = IIX+(JJX-1)*LDX
176 IOFFX = IIX+(JJX-1)*LDX
H A Dpdlatrs.f39 INTEGER ICTXT, IIX, IROFF, JJX, MYCOL, MYROW, NP,
68 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
76 CALL DGEBS2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
79 CALL DGEBR2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
H A Dpzlatrs.f39 INTEGER ICTXT, IIX, IROFF, JJX, MYCOL, MYROW, NP, local
68 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
76 CALL ZGEBS2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
79 CALL ZGEBR2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
H A Dpclatrs.f39 INTEGER ICTXT, IIX, IROFF, JJX, MYCOL, MYROW, NP, local
68 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
76 CALL CGEBS2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
79 CALL CGEBR2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
H A Dpslatrs.f39 INTEGER ICTXT, IIX, IROFF, JJX, MYCOL, MYROW, NP, local
68 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
76 CALL SGEBS2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
79 CALL SGEBR2D( ICTXT, 'R', ' ', NP, 1, X( IIX+(JJX-1)*LDX ),
H A Dpzlacgv.f119 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL, local
142 $ IIX, JJX, IXROW, IXCOL )
157 IOFFX = IIX+(JJX-1)*LDX
176 IOFFX = IIX+(JJX-1)*LDX
H A Dpdlassq.f147 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL,
173 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
191 IOFF = IIX + ( JJX - 1 ) * LDX
231 IOFF = IIX + ( JJX - 1 ) * LDX
H A Dpslassq.f147 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL,
173 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
191 IOFF = IIX + ( JJX - 1 ) * LDX
231 IOFF = IIX + ( JJX - 1 ) * LDX
H A Dpclassq.f152 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL,
178 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
196 IOFF = IIX + ( JJX - 1 ) * LDX
245 IOFF = IIX + ( JJX - 1 ) * LDX
H A Dpzlassq.f152 $ IXROW, JJX, LDX, MYCOL, MYROW, NP, NPCOL,
178 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
196 IOFF = IIX + ( JJX - 1 ) * LDX
245 IOFF = IIX + ( JJX - 1 ) * LDX
H A Dpcgesvx.f423 $ IROFFX, IXCOL, IXROW, J, JJA, JJB, JJX,
775 $ JJX, IXROW, IXCOL )
801 DO 80 J = JJX, JJX+NRHSQ-1
807 DO 90 J = JJX, JJX+NRHSQ-1
812 DO 110 J = JJX, JJX+NRHSQ-1
818 DO 120 J = JJX, JJX+NRHSQ-1
H A Dpsgesvx.f422 $ IROFFX, IXCOL, IXROW, J, JJA, JJB, JJX, local
775 $ JJX, IXROW, IXCOL )
800 DO 80 J = JJX, JJX+NRHSQ-1
806 DO 90 J = JJX, JJX+NRHSQ-1
811 DO 110 J = JJX, JJX+NRHSQ-1
817 DO 120 J = JJX, JJX+NRHSQ-1
H A Dpdgesvx.f422 $ IROFFX, IXCOL, IXROW, J, JJA, JJB, JJX, local
775 $ JJX, IXROW, IXCOL )
800 DO 80 J = JJX, JJX+NRHSQ-1
806 DO 90 J = JJX, JJX+NRHSQ-1
811 DO 110 J = JJX, JJX+NRHSQ-1
817 DO 120 J = JJX, JJX+NRHSQ-1
H A Dpzgesvx.f423 $ IROFFX, IXCOL, IXROW, J, JJA, JJB, JJX, local
775 $ JJX, IXROW, IXCOL )
801 DO 80 J = JJX, JJX+NRHSQ-1
807 DO 90 J = JJX, JJX+NRHSQ-1
812 DO 110 J = JJX, JJX+NRHSQ-1
818 DO 120 J = JJX, JJX+NRHSQ-1
H A Dpsposvx.f366 $ IXROW, J, JJA, JJB, JJX, LDB, LDX, LIWMIN, local
642 $ JJX, IXROW, IXCOL )
652 DO 50 J = JJX, JJX+NRHSQ-1
657 DO 60 J = JJX, JJX+NRHSQ-1
H A Dpcposvx.f365 $ IXROW, J, JJA, JJB, JJX, LDB, LDX, LRWMIN, local
641 $ JJX, IXROW, IXCOL )
651 DO 50 J = JJX, JJX+NRHSQ-1
656 DO 60 J = JJX, JJX+NRHSQ-1
H A Dpdposvx.f366 $ IXROW, J, JJA, JJB, JJX, LDB, LDX, LIWMIN,
642 $ JJX, IXROW, IXCOL )
652 DO 50 J = JJX, JJX+NRHSQ-1
657 DO 60 J = JJX, JJX+NRHSQ-1
/dports/math/scalapack/scalapack-2.1.0/TESTING/LIN/
H A Dpclaschk.f161 $ IXCOL, IXROW, J, JBRHS, JJ, JJA, JJX, LDX,
192 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
218 IOFFX = IIX + ( JJX - 1 ) * DESCX( LLD_ )
229 $ IXROW, IXCOL, IBSEED, IIX-1, NP, JJX-1,
315 $ JJX = JJX + JBRHS
H A Dpdlaschk.f160 $ IXCOL, IXROW, J, JBRHS, JJ, JJA, JJX, LDX,
190 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
216 IOFFX = IIX + ( JJX - 1 ) * DESCX( LLD_ )
227 $ IXROW, IXCOL, IBSEED, IIX-1, NP, JJX-1,
312 $ JJX = JJX + JBRHS
H A Dpslaschk.f160 $ IXCOL, IXROW, J, JBRHS, JJ, JJA, JJX, LDX, local
190 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
216 IOFFX = IIX + ( JJX - 1 ) * DESCX( LLD_ )
227 $ IXROW, IXCOL, IBSEED, IIX-1, NP, JJX-1,
312 $ JJX = JJX + JBRHS
H A Dpzlaschk.f161 $ IXCOL, IXROW, J, JBRHS, JJ, JJA, JJX, LDX,
193 CALL INFOG2L( IX, JX, DESCX, NPROW, NPCOL, MYROW, MYCOL, IIX, JJX,
219 IOFFX = IIX + ( JJX - 1 ) * DESCX( LLD_ )
230 $ IXROW, IXCOL, IBSEED, IIX-1, NP, JJX-1,
316 $ JJX = JJX + JBRHS

123