/dports/math/mumps/mumps-5.1.2/src/ |
H A D | cfac_process_rtnelind.F | 14 & INODE, NELIM, NSLAVES, ROW_LIST, argument 30 INTEGER INODE, NELIM, NSLAVES local 64 KEEP(42) = KEEP(42) + NELIM 67 IF (NELIM.EQ.0) THEN 73 IF (NELIM.EQ.0) THEN 79 IF (NELIM.EQ.0) THEN 82 NOINT = 6 + NSLAVES + NELIM + NELIM + KEEP(IXSZ) 101 IW( IWPOSCB + 2+KEEP(IXSZ) ) = NELIM 111 IW(DEB_ROW : DEB_ROW+NELIM -1) = ROW_LIST(1:NELIM) 112 DEB_COL = DEB_ROW + NELIM [all …]
|
H A D | dfac_process_rtnelind.F | 14 & INODE, NELIM, NSLAVES, ROW_LIST, argument 30 INTEGER INODE, NELIM, NSLAVES local 64 KEEP(42) = KEEP(42) + NELIM 67 IF (NELIM.EQ.0) THEN 73 IF (NELIM.EQ.0) THEN 79 IF (NELIM.EQ.0) THEN 82 NOINT = 6 + NSLAVES + NELIM + NELIM + KEEP(IXSZ) 101 IW( IWPOSCB + 2+KEEP(IXSZ) ) = NELIM 111 IW(DEB_ROW : DEB_ROW+NELIM -1) = ROW_LIST(1:NELIM) 112 DEB_COL = DEB_ROW + NELIM [all …]
|
H A D | zfac_process_rtnelind.F | 14 & INODE, NELIM, NSLAVES, ROW_LIST, argument 30 INTEGER INODE, NELIM, NSLAVES local 64 KEEP(42) = KEEP(42) + NELIM 67 IF (NELIM.EQ.0) THEN 73 IF (NELIM.EQ.0) THEN 79 IF (NELIM.EQ.0) THEN 82 NOINT = 6 + NSLAVES + NELIM + NELIM + KEEP(IXSZ) 101 IW( IWPOSCB + 2+KEEP(IXSZ) ) = NELIM 111 IW(DEB_ROW : DEB_ROW+NELIM -1) = ROW_LIST(1:NELIM) 112 DEB_COL = DEB_ROW + NELIM [all …]
|
H A D | sfac_process_rtnelind.F | 14 & INODE, NELIM, NSLAVES, ROW_LIST, argument 30 INTEGER INODE, NELIM, NSLAVES local 64 KEEP(42) = KEEP(42) + NELIM 67 IF (NELIM.EQ.0) THEN 73 IF (NELIM.EQ.0) THEN 79 IF (NELIM.EQ.0) THEN 82 NOINT = 6 + NSLAVES + NELIM + NELIM + KEEP(IXSZ) 101 IW( IWPOSCB + 2+KEEP(IXSZ) ) = NELIM 111 IW(DEB_ROW : DEB_ROW+NELIM -1) = ROW_LIST(1:NELIM) 112 DEB_COL = DEB_ROW + NELIM [all …]
|
H A D | dmumps_load.F | 2037 NELIM = NELIM + 1 2049 COST = dble( NELIM ) * dble( NELIM ) 4499 B=dble(NELIM)*dble(NELIM+2*ACC+1) 4886 NELIM = NELIM + 1 4898 COST = dble(NELIM) * dble(NELIM) 4991 NELIM = NELIM + 1 5193 NELIM = NELIM + 1 5200 CALL MUMPS_GET_FLOPS_COST(NFRONT,NELIM,NELIM, 5223 NELIM = NELIM + 1 5227 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | cmumps_load.F | 2037 NELIM = NELIM + 1 2049 COST = dble( NELIM ) * dble( NELIM ) 4499 B=dble(NELIM)*dble(NELIM+2*ACC+1) 4886 NELIM = NELIM + 1 4898 COST = dble(NELIM) * dble(NELIM) 4991 NELIM = NELIM + 1 5193 NELIM = NELIM + 1 5200 CALL MUMPS_GET_FLOPS_COST(NFRONT,NELIM,NELIM, 5223 NELIM = NELIM + 1 5227 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | zmumps_load.F | 2037 NELIM = NELIM + 1 2049 COST = dble( NELIM ) * dble( NELIM ) 4499 B=dble(NELIM)*dble(NELIM+2*ACC+1) 4886 NELIM = NELIM + 1 4898 COST = dble(NELIM) * dble(NELIM) 4991 NELIM = NELIM + 1 5193 NELIM = NELIM + 1 5200 CALL MUMPS_GET_FLOPS_COST(NFRONT,NELIM,NELIM, 5223 NELIM = NELIM + 1 5227 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | smumps_load.F | 2037 NELIM = NELIM + 1 2049 COST = dble( NELIM ) * dble( NELIM ) 4499 B=dble(NELIM)*dble(NELIM+2*ACC+1) 4886 NELIM = NELIM + 1 4898 COST = dble(NELIM) * dble(NELIM) 4991 NELIM = NELIM + 1 5193 NELIM = NELIM + 1 5200 CALL MUMPS_GET_FLOPS_COST(NFRONT,NELIM,NELIM, 5223 NELIM = NELIM + 1 5227 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | dana_dist_m.F | 199 NELIM = 0 201 100 NELIM = NELIM + 1 309 SBUFS = max(SBUFS, NELIM*LKJIB+NELIM+6) 315 SBUFR = max( SBUFR, NELIM*LKJIB+NELIM+6 ) 334 & EXTRA_PERM_INFO_OOC*(2+NELIM + NELIM/PANEL_SIZE+1) 336 NRLADU_CURRENT = int(NELIM,8)*int(2*NFR-NELIM,8) 480 & (int(NELIM,8)*int(NELIM+1,8))/2_8 484 & NELIM, NELIM, 0, 488 & NELIM, NELIM,KEEP(50), 493 & NELIM, NELIM,KEEP(50), [all …]
|
H A D | cana_dist_m.F | 199 NELIM = 0 201 100 NELIM = NELIM + 1 309 SBUFS = max(SBUFS, NELIM*LKJIB+NELIM+6) 315 SBUFR = max( SBUFR, NELIM*LKJIB+NELIM+6 ) 334 & EXTRA_PERM_INFO_OOC*(2+NELIM + NELIM/PANEL_SIZE+1) 336 NRLADU_CURRENT = int(NELIM,8)*int(2*NFR-NELIM,8) 480 & (int(NELIM,8)*int(NELIM+1,8))/2_8 484 & NELIM, NELIM, 0, 488 & NELIM, NELIM,KEEP(50), 493 & NELIM, NELIM,KEEP(50), [all …]
|
H A D | zana_dist_m.F | 199 NELIM = 0 201 100 NELIM = NELIM + 1 309 SBUFS = max(SBUFS, NELIM*LKJIB+NELIM+6) 315 SBUFR = max( SBUFR, NELIM*LKJIB+NELIM+6 ) 334 & EXTRA_PERM_INFO_OOC*(2+NELIM + NELIM/PANEL_SIZE+1) 336 NRLADU_CURRENT = int(NELIM,8)*int(2*NFR-NELIM,8) 480 & (int(NELIM,8)*int(NELIM+1,8))/2_8 484 & NELIM, NELIM, 0, 488 & NELIM, NELIM,KEEP(50), 493 & NELIM, NELIM,KEEP(50), [all …]
|
H A D | sana_dist_m.F | 199 NELIM = 0 201 100 NELIM = NELIM + 1 309 SBUFS = max(SBUFS, NELIM*LKJIB+NELIM+6) 315 SBUFR = max( SBUFR, NELIM*LKJIB+NELIM+6 ) 334 & EXTRA_PERM_INFO_OOC*(2+NELIM + NELIM/PANEL_SIZE+1) 336 NRLADU_CURRENT = int(NELIM,8)*int(2*NFR-NELIM,8) 480 & (int(NELIM,8)*int(NELIM+1,8))/2_8 484 & NELIM, NELIM, 0, 488 & NELIM, NELIM,KEEP(50), 493 & NELIM, NELIM,KEEP(50), [all …]
|
H A D | zfac_lr.F | 23 & NELIM, IW2, BLOCK, argument 30 & NELIM, MAXI_CLUSTER, NPIV, NIV local 222 IF (NELIM.NE.0) THEN 232 IERROR = NELIM * KL 244 CALL zgemm('N' , 'T' , NELIM, KL, NL , ONE , 246 & ZERO , TEMP_BLOCK , NELIM) 293 & NELIM, NIV, SYM local 328 IF (NELIM.NE.0) THEN 338 IERROR = NELIM * KL 352 & ZERO , TEMP_BLOCK , NELIM) [all …]
|
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/ |
H A D | cmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | zmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | dmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | smumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
/dports/math/coinmumps/MUMPS_4.10.0/src/ |
H A D | zmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | cmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | dmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | smumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
/dports/math/mumps4/MUMPS_4.10.0/src/ |
H A D | cmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | dmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | smumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|
H A D | zmumps_load.F | 1999 NELIM = NELIM + 1 2011 COST = dble( NELIM ) * dble( NELIM ) 2806 CALL MUMPS_511(NFRONT,NELIM,NELIM,K50, 4971 NELIM = NELIM + 1 4983 COST = dble(NELIM) * dble(NELIM) 5073 NELIM = NELIM + 1 5261 NELIM = NELIM + 1 5268 CALL MUMPS_511(NFRONT,NELIM,NELIM, 5291 NELIM = NELIM + 1 5295 COST_CB=COST_CB+((NFR-NELIM)*(NFR-NELIM)) [all …]
|