Lines Matching refs:IEND_BLR
88 INTEGER NBLR_ORIG, IBEG_BLR, IEND_BLR local
199 IEND_BLR = 0
264 DO WHILE (IEND_BLR < NASS )
268 IEND_BLR = min(IEND_BLR + NBLR_ORIG, NASS)
270 IEND_BLR = min(BEGS_BLR(CURRENT_BLR+1)-1, NASS)
272 IF ( IEND_BLR - IBEG_BLR + 1 .GT. MAXI_CLUSTER ) THEN
273 MAXI_CLUSTER = IEND_BLR - IBEG_BLR + 1
291 DO WHILE (IEND_BLOCK < IEND_BLR )
293 IEND_BLOCK = min(IEND_BLOCK + NBKJIB_ORIG, IEND_BLR)
312 & PIVOT_OPTION, LR_ACTIVATED, IEND_BLR,
337 LAST_COL = IEND_BLR
357 NELIM = IEND_BLR - NPIV
402 IF ( IEND_BLR .GT. IEND_BLOCK ) THEN
411 LAST_COL = IEND_BLR
414 & NPIV, NFRONT, IEND_BLR, LAST_COL,
434 NELIM = IEND_BLR - NPIV
435 IF (NELIM .EQ. IEND_BLR - IBEG_BLR + 1) THEN
474 NELIM = IEND_BLR - NPIV
506 IF (IEND_BLR .LT. NASS) THEN
507 CALL DMUMPS_FAC_SQ(IBEG_BLR, IEND_BLR,
514 NELIM = IEND_BLR - NPIV
515 IF (NELIM .EQ. IEND_BLR - IBEG_BLR + 1) THEN
519 IF (IEND_BLR.LT.NFRONT) THEN
520 CALL DMUMPS_FAC_SQ(IBEG_BLR, IEND_BLR,