Home
last modified time | relevance | path

Searched refs:NSUPCOL (Results 1 – 25 of 48) sorted by relevance

12

/dports/math/mumps/mumps-5.1.2/src/
H A Dzfac_process_contrib_type3.F62 INTEGER NSUPROW, NSUPCOL, BBPCBP local
74 & NSUPCOL, 1, MPI_INTEGER, COMM, IERR )
85 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
89 NSUPCOL_EFF = NSUPCOL
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 Dcfac_process_contrib_type3.F62 INTEGER NSUPROW, NSUPCOL, BBPCBP local
74 & NSUPCOL, 1, MPI_INTEGER, COMM, IERR )
85 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
89 NSUPCOL_EFF = NSUPCOL
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 Ddfac_process_contrib_type3.F62 INTEGER NSUPROW, NSUPCOL, BBPCBP local
74 & NSUPCOL, 1, MPI_INTEGER, COMM, IERR )
85 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
89 NSUPCOL_EFF = NSUPCOL
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 Dsfac_process_contrib_type3.F62 INTEGER NSUPROW, NSUPCOL, BBPCBP local
74 & NSUPCOL, 1, MPI_INTEGER, COMM, IERR )
85 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
89 NSUPCOL_EFF = NSUPCOL
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 Dztype3_root.F18 INTEGER NCOL_SON, NROW_SON, NSUPCOL local
29 DO J = 1, NCOL_SON-NSUPCOL
33 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
181 NSUPCOL = 0
191 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
206 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
225 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
598 INTEGER NSUPROW, NSUPCOL local
617 DO JSUB = 1, NSUBSET_COL-NSUPCOL
647 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Ddtype3_root.F18 INTEGER NCOL_SON, NROW_SON, NSUPCOL local
29 DO J = 1, NCOL_SON-NSUPCOL
33 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
181 NSUPCOL = 0
191 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
206 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
225 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
598 INTEGER NSUPROW, NSUPCOL local
617 DO JSUB = 1, NSUBSET_COL-NSUPCOL
647 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Dstype3_root.F18 INTEGER NCOL_SON, NROW_SON, NSUPCOL local
29 DO J = 1, NCOL_SON-NSUPCOL
33 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
181 NSUPCOL = 0
191 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
206 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
225 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
598 INTEGER NSUPROW, NSUPCOL local
617 DO JSUB = 1, NSUBSET_COL-NSUPCOL
647 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Dctype3_root.F18 INTEGER NCOL_SON, NROW_SON, NSUPCOL local
29 DO J = 1, NCOL_SON-NSUPCOL
33 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
181 NSUPCOL = 0
191 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
206 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
225 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
598 INTEGER NSUPROW, NSUPCOL local
617 DO JSUB = 1, NSUBSET_COL-NSUPCOL
647 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dzmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Ddmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dcmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dsmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dzmumps_part6.F3194 INTEGER NCOL_SON, NROW_SON, NSUPCOL
3205 DO J = 1, NCOL_SON-NSUPCOL
3209 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
3344 NSUPCOL = 0
3354 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3369 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3388 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3711 INTEGER NSUPROW, NSUPCOL
3730 DO JSUB = 1, NSUBSET_COL-NSUPCOL
3760 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Dsmumps_part6.F3212 INTEGER NCOL_SON, NROW_SON, NSUPCOL
3223 DO J = 1, NCOL_SON-NSUPCOL
3227 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
3362 NSUPCOL = 0
3372 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3387 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3406 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3729 INTEGER NSUPROW, NSUPCOL
3748 DO JSUB = 1, NSUBSET_COL-NSUPCOL
3778 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Dcmumps_part6.F3194 INTEGER NCOL_SON, NROW_SON, NSUPCOL
3205 DO J = 1, NCOL_SON-NSUPCOL
3209 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
3344 NSUPCOL = 0
3354 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3369 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3388 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3711 INTEGER NSUPROW, NSUPCOL
3730 DO JSUB = 1, NSUBSET_COL-NSUPCOL
3760 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
H A Ddmumps_part6.F3212 INTEGER NCOL_SON, NROW_SON, NSUPCOL
3223 DO J = 1, NCOL_SON-NSUPCOL
3227 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
3362 NSUPCOL = 0
3372 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3387 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3406 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3729 INTEGER NSUPROW, NSUPCOL
3748 DO JSUB = 1, NSUBSET_COL-NSUPCOL
3778 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dcmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dsmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dzmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Ddmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL,
1749 INTEGER NSUPROW, NSUPCOL
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Ddmumps_part6.F3212 INTEGER NCOL_SON, NROW_SON, NSUPCOL
3223 DO J = 1, NCOL_SON-NSUPCOL
3227 DO J = NCOL_SON-NSUPCOL+1, NCOL_SON
3362 NSUPCOL = 0
3372 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3387 & NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3406 NSUPCOL(JCOL+1) = NSUPCOL(JCOL+1) + 1
3729 INTEGER NSUPROW, NSUPCOL
3748 DO JSUB = 1, NSUBSET_COL-NSUPCOL
3778 DO JSUB = 1, NSUBSET_COL -NSUPCOL
[all …]
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Dcmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL, argument
1749 INTEGER NSUPROW, NSUPCOL local
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dzmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL, argument
1749 INTEGER NSUPROW, NSUPCOL local
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Ddmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL, argument
1749 INTEGER NSUPROW, NSUPCOL local
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]
H A Dsmumps_comm_buffer.F1735 & NSUPROW, NSUPCOL, argument
1749 INTEGER NSUPROW, NSUPCOL local
1784 & min(NSUPROW,NSUPCOL) .GT.0) THEN
1787 CALL MPI_PACK_SIZE(NSUPCOL, MPI_INTEGER, COMM,
1790 CALL MPI_PACK_SIZE(NSUPROW*NSUPCOL,
1797 NSUBSET_COL_EFF = NSUBSET_COL - NSUPCOL
1801 NSUPCOL_EFF = NSUPCOL
1875 CALL MPI_PACK( NSUPCOL, 1, MPI_INTEGER,
1889 & min(NSUPROW, NSUPCOL) .GT. 0) THEN
1900 DO ISUB = NSUBSET_COL-NSUPCOL+1, NSUBSET_COL
[all …]

12