/dports/math/mumps/mumps-5.1.2/src/ |
H A D | zfac_process_contrib_type3.F | 62 INTEGER NSUPROW, NSUPCOL, BBPCBP local 70 & NSUPROW, 1, MPI_INTEGER, COMM, IERR ) 95 & - NSUPROW .OR. NSUBSET_ROW - NSUPROW.EQ.0 .OR. 124 & NSUBSET_ROW - NSUPROW .OR. 125 & NSUBSET_ROW - NSUPROW.EQ.0 .OR. 163 & (min(NSUPROW, NSUPCOL) .GT. 0) 165 LREQI = NSUPROW+NSUPCOL 166 LREQA = int(NSUPROW,8) * int(NSUPCOL,8) 187 CALL ZMUMPS_ASS_ROOT( NSUPROW, NSUPCOL, 189 & IW( IWPOSCB + NSUPROW + 1 ), NSUPCOL,
|
H A D | cfac_process_contrib_type3.F | 62 INTEGER NSUPROW, NSUPCOL, BBPCBP local 70 & NSUPROW, 1, MPI_INTEGER, COMM, IERR ) 95 & - NSUPROW .OR. NSUBSET_ROW - NSUPROW.EQ.0 .OR. 124 & NSUBSET_ROW - NSUPROW .OR. 125 & NSUBSET_ROW - NSUPROW.EQ.0 .OR. 163 & (min(NSUPROW, NSUPCOL) .GT. 0) 165 LREQI = NSUPROW+NSUPCOL 166 LREQA = int(NSUPROW,8) * int(NSUPCOL,8) 187 CALL CMUMPS_ASS_ROOT( NSUPROW, NSUPCOL, 189 & IW( IWPOSCB + NSUPROW + 1 ), NSUPCOL,
|
H A D | dfac_process_contrib_type3.F | 62 INTEGER NSUPROW, NSUPCOL, BBPCBP local 70 & NSUPROW, 1, MPI_INTEGER, COMM, IERR ) 95 & - NSUPROW .OR. NSUBSET_ROW - NSUPROW.EQ.0 .OR. 124 & NSUBSET_ROW - NSUPROW .OR. 125 & NSUBSET_ROW - NSUPROW.EQ.0 .OR. 163 & (min(NSUPROW, NSUPCOL) .GT. 0) 165 LREQI = NSUPROW+NSUPCOL 166 LREQA = int(NSUPROW,8) * int(NSUPCOL,8) 187 CALL DMUMPS_ASS_ROOT( NSUPROW, NSUPCOL, 189 & IW( IWPOSCB + NSUPROW + 1 ), NSUPCOL,
|
H A D | sfac_process_contrib_type3.F | 62 INTEGER NSUPROW, NSUPCOL, BBPCBP local 70 & NSUPROW, 1, MPI_INTEGER, COMM, IERR ) 95 & - NSUPROW .OR. NSUBSET_ROW - NSUPROW.EQ.0 .OR. 124 & NSUBSET_ROW - NSUPROW .OR. 125 & NSUBSET_ROW - NSUPROW.EQ.0 .OR. 163 & (min(NSUPROW, NSUPCOL) .GT. 0) 165 LREQI = NSUPROW+NSUPCOL 166 LREQA = int(NSUPROW,8) * int(NSUPCOL,8) 187 CALL SMUMPS_ASS_ROOT( NSUPROW, NSUPCOL, 189 & IW( IWPOSCB + NSUPROW + 1 ), NSUPCOL,
|
H A D | ztype3_root.F | 119 INTEGER, ALLOCATABLE, DIMENSION(:) :: NSUPROW, NSUPCOL local 160 ALLOCATE(NSUPROW(root%NPROW + 1 ), stat=allocok) 180 NSUPROW = 0 235 NSUPROW(IROW+1) = NSUPROW(IROW+1)+1 416 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 444 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 491 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 587 & NSUBSET_ROW, NSUBSET_COL, NSUPROW, NSUPCOL, argument 598 INTEGER NSUPROW, NSUPCOL local 640 DO ISUB = 1, NSUBSET_ROW - NSUPROW [all …]
|
H A D | dtype3_root.F | 119 INTEGER, ALLOCATABLE, DIMENSION(:) :: NSUPROW, NSUPCOL local 160 ALLOCATE(NSUPROW(root%NPROW + 1 ), stat=allocok) 180 NSUPROW = 0 235 NSUPROW(IROW+1) = NSUPROW(IROW+1)+1 416 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 444 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 491 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 587 & NSUBSET_ROW, NSUBSET_COL, NSUPROW, NSUPCOL, argument 598 INTEGER NSUPROW, NSUPCOL local 640 DO ISUB = 1, NSUBSET_ROW - NSUPROW [all …]
|
H A D | stype3_root.F | 119 INTEGER, ALLOCATABLE, DIMENSION(:) :: NSUPROW, NSUPCOL local 160 ALLOCATE(NSUPROW(root%NPROW + 1 ), stat=allocok) 180 NSUPROW = 0 235 NSUPROW(IROW+1) = NSUPROW(IROW+1)+1 416 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 444 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 491 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 587 & NSUBSET_ROW, NSUBSET_COL, NSUPROW, NSUPCOL, argument 598 INTEGER NSUPROW, NSUPCOL local 640 DO ISUB = 1, NSUBSET_ROW - NSUPROW [all …]
|
H A D | ctype3_root.F | 119 INTEGER, ALLOCATABLE, DIMENSION(:) :: NSUPROW, NSUPCOL local 160 ALLOCATE(NSUPROW(root%NPROW + 1 ), stat=allocok) 180 NSUPROW = 0 235 NSUPROW(IROW+1) = NSUPROW(IROW+1)+1 416 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 444 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 491 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 587 & NSUBSET_ROW, NSUBSET_COL, NSUPROW, NSUPCOL, argument 598 INTEGER NSUPROW, NSUPCOL local 640 DO ISUB = 1, NSUBSET_ROW - NSUPROW [all …]
|
H A D | zmumps_comm_buffer.F | 1964 & NSUPROW, NSUPCOL, argument 1978 INTEGER NSUPROW, NSUPCOL local 2013 & min(NSUPROW,NSUPCOL) .GT.0) THEN 2014 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 2019 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 2032 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 2098 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 2118 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 2119 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 2141 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | cmumps_comm_buffer.F | 1964 & NSUPROW, NSUPCOL, argument 1978 INTEGER NSUPROW, NSUPCOL local 2013 & min(NSUPROW,NSUPCOL) .GT.0) THEN 2014 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 2019 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 2032 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 2098 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 2118 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 2119 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 2141 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | dmumps_comm_buffer.F | 1964 & NSUPROW, NSUPCOL, argument 1978 INTEGER NSUPROW, NSUPCOL local 2013 & min(NSUPROW,NSUPCOL) .GT.0) THEN 2014 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 2019 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 2032 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 2098 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 2118 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 2119 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 2141 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | smumps_comm_buffer.F | 1964 & NSUPROW, NSUPCOL, argument 1978 INTEGER NSUPROW, NSUPCOL local 2013 & min(NSUPROW,NSUPCOL) .GT.0) THEN 2014 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 2019 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 2032 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 2098 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 2118 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 2119 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 2141 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | zmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | dmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | cmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | smumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | zmumps_part6.F | 3293 INTEGER, ALLOCATABLE, DIMENSION(:) :: NSUPROW, NSUPCOL 3323 ALLOCATE(NSUPROW(root%NPROW + 1 ), stat=allocok) 3343 NSUPROW = 0 3398 NSUPROW(IROW+1) = NSUPROW(IROW+1)+1 3568 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 3596 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 3643 & NSUPROW(IROW+1), NSUPCOL(JCOL+1), 3700 & NSUBSET_ROW, NSUBSET_COL, NSUPROW, NSUPCOL, 3711 INTEGER NSUPROW, NSUPCOL 3753 DO ISUB = 1, NSUBSET_ROW - NSUPROW [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | cmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | smumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | zmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | dmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, 1749 INTEGER NSUPROW, NSUPCOL 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | cmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, argument 1749 INTEGER NSUPROW, NSUPCOL local 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | zmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, argument 1749 INTEGER NSUPROW, NSUPCOL local 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | dmumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, argument 1749 INTEGER NSUPROW, NSUPCOL local 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|
H A D | smumps_comm_buffer.F | 1735 & NSUPROW, NSUPCOL, argument 1749 INTEGER NSUPROW, NSUPCOL local 1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN 1785 CALL MPI_PACK_SIZE(NSUPROW, MPI_INTEGER, COMM, 1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL, 1803 NSUBSET_ROW_EFF = NSUBSET_ROW - NSUPROW 1869 CALL MPI_PACK( NSUPROW, 1, MPI_INTEGER, 1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN 1890 DO ISUB = NSUBSET_ROW-NSUPROW+1, NSUBSET_ROW 1912 DO JSUB = NSUBSET_ROW - NSUPROW+1, NSUBSET_ROW [all …]
|