/dports/math/mumps/mumps-5.1.2/src/ |
H A D | zsol_driver.F | 103 INTEGER :: NRHS_NONEMPTY local 1055 NRHS_NONEMPTY = 0 1058 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 !ith col in non empty 1060 IF (NRHS_NONEMPTY.LE.0) THEN 1065 & NRHS_NONEMPTY 1069 NRHS_NONEMPTY = id%NRHS 1120 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 1137 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 2289 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 2302 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | csol_driver.F | 103 INTEGER :: NRHS_NONEMPTY local 1055 NRHS_NONEMPTY = 0 1058 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 !ith col in non empty 1060 IF (NRHS_NONEMPTY.LE.0) THEN 1065 & NRHS_NONEMPTY 1069 NRHS_NONEMPTY = id%NRHS 1120 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 1137 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 2289 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 2302 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | dsol_driver.F | 103 INTEGER :: NRHS_NONEMPTY local 1055 NRHS_NONEMPTY = 0 1058 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 !ith col in non empty 1060 IF (NRHS_NONEMPTY.LE.0) THEN 1065 & NRHS_NONEMPTY 1069 NRHS_NONEMPTY = id%NRHS 1120 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 1137 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 2289 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 2302 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | ssol_driver.F | 103 INTEGER :: NRHS_NONEMPTY local 1055 NRHS_NONEMPTY = 0 1058 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 !ith col in non empty 1060 IF (NRHS_NONEMPTY.LE.0) THEN 1065 & NRHS_NONEMPTY 1069 NRHS_NONEMPTY = id%NRHS 1120 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 1137 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 2289 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 2302 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | cmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | smumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | dmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | dmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | zmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | smumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | zmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY local 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | smumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY local 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | cmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY local 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|
H A D | dmumps_part8.F | 97 INTEGER :: NRHS_NONEMPTY local 623 NRHS_NONEMPTY = 0 626 & NRHS_NONEMPTY = NRHS_NONEMPTY+1 628 IF (NRHS_NONEMPTY.LE.0) THEN 631 & NRHS_NONEMPTY 635 NRHS_NONEMPTY = id%NRHS 675 IF (NBRHS .GT. NRHS_NONEMPTY ) NBRHS = NRHS_NONEMPTY 681 CALL MPI_BCAST(NRHS_NONEMPTY,1,MPI_INTEGER,MASTER, 1358 DO WHILE (BEG_RHS.LE.NRHS_NONEMPTY) 1359 NBRHS_EFF = min(NRHS_NONEMPTY-BEG_RHS+1, NBRHS)
|