/dports/math/mumps/mumps-5.1.2/src/ |
H A D | csol_fwd_aux.F | 88 NRHS_B = JBFIN-JBDEB+1 447 JBFIN = NRHS 453 & JBDEB, JBFIN 457 & JBFIN.LT.1 .OR. JBFIN.GT.NRHS ) THEN 459 & JBDEB, JBFIN 511 DO K=JBDEB,JBFIN 526 DO K=JBDEB,JBFIN 589 DO K=JBDEB, JBFIN 644 DO K=JBDEB, JBFIN 893 DO K=JBDEB,JBFIN [all …]
|
H A D | dsol_fwd_aux.F | 88 NRHS_B = JBFIN-JBDEB+1 445 JBFIN = NRHS 451 & JBDEB, JBFIN 455 & JBFIN.LT.1 .OR. JBFIN.GT.NRHS ) THEN 457 & JBDEB, JBFIN 509 DO K=JBDEB,JBFIN 524 DO K=JBDEB,JBFIN 587 DO K=JBDEB, JBFIN 642 DO K=JBDEB, JBFIN 891 DO K=JBDEB,JBFIN [all …]
|
H A D | ssol_fwd_aux.F | 88 NRHS_B = JBFIN-JBDEB+1 445 JBFIN = NRHS 451 & JBDEB, JBFIN 455 & JBFIN.LT.1 .OR. JBFIN.GT.NRHS ) THEN 457 & JBDEB, JBFIN 509 DO K=JBDEB,JBFIN 524 DO K=JBDEB,JBFIN 587 DO K=JBDEB, JBFIN 642 DO K=JBDEB, JBFIN 891 DO K=JBDEB,JBFIN [all …]
|
H A D | zsol_fwd_aux.F | 88 NRHS_B = JBFIN-JBDEB+1 447 JBFIN = NRHS 453 & JBDEB, JBFIN 457 & JBFIN.LT.1 .OR. JBFIN.GT.NRHS ) THEN 459 & JBDEB, JBFIN 511 DO K=JBDEB,JBFIN 526 DO K=JBDEB,JBFIN 589 DO K=JBDEB, JBFIN 644 DO K=JBDEB, JBFIN 893 DO K=JBDEB,JBFIN [all …]
|
H A D | csol_bwd_aux.F | 180 INTEGER JBDEB, JBFIN, NRHS_B, allocok local 219 & JBFIN, 1, MPI_INTEGER, COMM, IERR ) 223 NRHS_B = JBFIN-JBDEB+1 249 DO K=JBDEB,JBFIN 305 NRHS_B = JBFIN-JBDEB+1 339 DO K=JBDEB, JBFIN 432 NRHS_B = JBFIN-JBDEB+1 453 DO K=JBDEB, JBFIN 544 DO K=JBDEB, JBFIN 572 DO K=JBDEB, JBFIN [all …]
|
H A D | dsol_bwd_aux.F | 180 INTEGER JBDEB, JBFIN, NRHS_B, allocok local 217 & JBFIN, 1, MPI_INTEGER, COMM, IERR ) 221 NRHS_B = JBFIN-JBDEB+1 247 DO K=JBDEB,JBFIN 303 NRHS_B = JBFIN-JBDEB+1 337 DO K=JBDEB, JBFIN 430 NRHS_B = JBFIN-JBDEB+1 451 DO K=JBDEB, JBFIN 542 DO K=JBDEB, JBFIN 570 DO K=JBDEB, JBFIN [all …]
|
H A D | ssol_bwd_aux.F | 180 INTEGER JBDEB, JBFIN, NRHS_B, allocok local 217 & JBFIN, 1, MPI_INTEGER, COMM, IERR ) 221 NRHS_B = JBFIN-JBDEB+1 247 DO K=JBDEB,JBFIN 303 NRHS_B = JBFIN-JBDEB+1 337 DO K=JBDEB, JBFIN 430 NRHS_B = JBFIN-JBDEB+1 451 DO K=JBDEB, JBFIN 542 DO K=JBDEB, JBFIN 570 DO K=JBDEB, JBFIN [all …]
|
H A D | zsol_bwd_aux.F | 180 INTEGER JBDEB, JBFIN, NRHS_B, allocok local 219 & JBFIN, 1, MPI_INTEGER, COMM, IERR ) 223 NRHS_B = JBFIN-JBDEB+1 249 DO K=JBDEB,JBFIN 305 NRHS_B = JBFIN-JBDEB+1 339 DO K=JBDEB, JBFIN 432 NRHS_B = JBFIN-JBDEB+1 453 DO K=JBDEB, JBFIN 544 DO K=JBDEB, JBFIN 572 DO K=JBDEB, JBFIN [all …]
|
H A D | csol_bwd.F | 88 INTEGER JBDEB, JBFIN, NRHS_B local 209 NRHS_B = JBFIN-JBDEB+1 212 JBFIN = NRHS 233 DO K=JBDEB, JBFIN 426 DO K=JBDEB, JBFIN 448 DO K=JBDEB, JBFIN 600 DO K=JBDEB, JBFIN 643 DO K=JBDEB, JBFIN 665 DO K=JBDEB, JBFIN 1028 DO K=JBDEB, JBFIN [all …]
|
H A D | dsol_bwd.F | 88 INTEGER JBDEB, JBFIN, NRHS_B local 207 NRHS_B = JBFIN-JBDEB+1 210 JBFIN = NRHS 231 DO K=JBDEB, JBFIN 424 DO K=JBDEB, JBFIN 446 DO K=JBDEB, JBFIN 598 DO K=JBDEB, JBFIN 641 DO K=JBDEB, JBFIN 663 DO K=JBDEB, JBFIN 1026 DO K=JBDEB, JBFIN [all …]
|
H A D | ssol_bwd.F | 88 INTEGER JBDEB, JBFIN, NRHS_B local 207 NRHS_B = JBFIN-JBDEB+1 210 JBFIN = NRHS 231 DO K=JBDEB, JBFIN 424 DO K=JBDEB, JBFIN 446 DO K=JBDEB, JBFIN 598 DO K=JBDEB, JBFIN 641 DO K=JBDEB, JBFIN 663 DO K=JBDEB, JBFIN 1026 DO K=JBDEB, JBFIN [all …]
|
H A D | zsol_bwd.F | 88 INTEGER JBDEB, JBFIN, NRHS_B local 209 NRHS_B = JBFIN-JBDEB+1 212 JBFIN = NRHS 233 DO K=JBDEB, JBFIN 426 DO K=JBDEB, JBFIN 448 DO K=JBDEB, JBFIN 600 DO K=JBDEB, JBFIN 643 DO K=JBDEB, JBFIN 665 DO K=JBDEB, JBFIN 1028 DO K=JBDEB, JBFIN [all …]
|
H A D | csol_aux.F | 990 SUBROUTINE CMUMPS_SOL_CPY_FS2RHSCOMP( JBDEB, JBFIN, NBROWS, argument 993 INTEGER :: JBDEB, JBFIN, NBROWS local 1003 COMPLEX :: W(LD_W*(JBFIN-JBDEB+1)) 1010 DO K = JBDEB, JBFIN 1020 DO K = JBDEB, JBFIN 1030 SUBROUTINE CMUMPS_SOL_BWD_GTHR( JBDEB, JBFIN, J1, J2, argument 1033 INTEGER, INTENT(IN) :: JBDEB, JBFIN, J1, J2 local 1043 COMPLEX :: W(LD_W*(JBFIN-JBDEB+1)) 1053 DO K=JBDEB, JBFIN 1062 DO K=JBDEB, JBFIN
|
H A D | ssol_aux.F | 989 SUBROUTINE SMUMPS_SOL_CPY_FS2RHSCOMP( JBDEB, JBFIN, NBROWS, argument 992 INTEGER :: JBDEB, JBFIN, NBROWS local 1002 REAL :: W(LD_W*(JBFIN-JBDEB+1)) 1009 DO K = JBDEB, JBFIN 1019 DO K = JBDEB, JBFIN 1029 SUBROUTINE SMUMPS_SOL_BWD_GTHR( JBDEB, JBFIN, J1, J2, argument 1032 INTEGER, INTENT(IN) :: JBDEB, JBFIN, J1, J2 local 1042 REAL :: W(LD_W*(JBFIN-JBDEB+1)) 1052 DO K=JBDEB, JBFIN 1061 DO K=JBDEB, JBFIN
|
H A D | dsol_aux.F | 989 SUBROUTINE DMUMPS_SOL_CPY_FS2RHSCOMP( JBDEB, JBFIN, NBROWS, argument 992 INTEGER :: JBDEB, JBFIN, NBROWS local 1002 DOUBLE PRECISION :: W(LD_W*(JBFIN-JBDEB+1)) 1009 DO K = JBDEB, JBFIN 1019 DO K = JBDEB, JBFIN 1029 SUBROUTINE DMUMPS_SOL_BWD_GTHR( JBDEB, JBFIN, J1, J2, argument 1032 INTEGER, INTENT(IN) :: JBDEB, JBFIN, J1, J2 local 1042 DOUBLE PRECISION :: W(LD_W*(JBFIN-JBDEB+1)) 1052 DO K=JBDEB, JBFIN 1061 DO K=JBDEB, JBFIN
|
H A D | zsol_aux.F | 990 SUBROUTINE ZMUMPS_SOL_CPY_FS2RHSCOMP( JBDEB, JBFIN, NBROWS, argument 993 INTEGER :: JBDEB, JBFIN, NBROWS local 1003 COMPLEX(kind=8) :: W(LD_W*(JBFIN-JBDEB+1)) 1010 DO K = JBDEB, JBFIN 1020 DO K = JBDEB, JBFIN 1030 SUBROUTINE ZMUMPS_SOL_BWD_GTHR( JBDEB, JBFIN, J1, J2, argument 1033 INTEGER, INTENT(IN) :: JBDEB, JBFIN, J1, J2 local 1043 COMPLEX(kind=8) :: W(LD_W*(JBFIN-JBDEB+1)) 1053 DO K=JBDEB, JBFIN 1062 DO K=JBDEB, JBFIN
|
H A D | zmumps_comm_buffer.F | 412 & JBDEB, JBFIN, argument 417 INTEGER DEST, COMM, IERR, JBDEB, JBFIN local 457 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER, 488 & IW, W, JBDEB, JBFIN, argument 494 INTEGER NRHS_B, NODE1, NODE2, NCB, LONG, JBDEB, JBFIN local 544 CALL MPI_PACK( JBFIN, 1, MPI_INTEGER, 2424 & JBDEB, JBFIN, KEEP, COMM, IERR ) argument 2427 INTEGER, intent(in) :: JBDEB, JBFIN local 2458 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER,
|
H A D | cmumps_comm_buffer.F | 412 & JBDEB, JBFIN, argument 417 INTEGER DEST, COMM, IERR, JBDEB, JBFIN local 457 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER, 488 & IW, W, JBDEB, JBFIN, argument 494 INTEGER NRHS_B, NODE1, NODE2, NCB, LONG, JBDEB, JBFIN local 544 CALL MPI_PACK( JBFIN, 1, MPI_INTEGER, 2424 & JBDEB, JBFIN, KEEP, COMM, IERR ) argument 2427 INTEGER, intent(in) :: JBDEB, JBFIN local 2458 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER,
|
H A D | dmumps_comm_buffer.F | 412 & JBDEB, JBFIN, argument 417 INTEGER DEST, COMM, IERR, JBDEB, JBFIN local 457 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER, 488 & IW, W, JBDEB, JBFIN, argument 494 INTEGER NRHS_B, NODE1, NODE2, NCB, LONG, JBDEB, JBFIN local 544 CALL MPI_PACK( JBFIN, 1, MPI_INTEGER, 2424 & JBDEB, JBFIN, KEEP, COMM, IERR ) argument 2427 INTEGER, intent(in) :: JBDEB, JBFIN local 2458 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER,
|
H A D | smumps_comm_buffer.F | 412 & JBDEB, JBFIN, argument 417 INTEGER DEST, COMM, IERR, JBDEB, JBFIN local 457 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER, 488 & IW, W, JBDEB, JBFIN, argument 494 INTEGER NRHS_B, NODE1, NODE2, NCB, LONG, JBDEB, JBFIN local 544 CALL MPI_PACK( JBFIN, 1, MPI_INTEGER, 2424 & JBDEB, JBFIN, KEEP, COMM, IERR ) argument 2427 INTEGER, intent(in) :: JBDEB, JBFIN local 2458 CALL MPI_PACK( JBFIN , 1, MPI_INTEGER,
|