Home
last modified time | relevance | path

Searched refs:IPANEL (Results 1 – 25 of 40) sorted by relevance

12

/dports/math/mumps/mumps-5.1.2/src/
H A Dsmumps_lr_data_m.F222 INTEGER :: IPANEL local
357 INTEGER, INTENT(IN) :: IPANEL local
367 & "IPANEL=", IPANEL
372 & "IPANEL=", IPANEL
379 & "IPANEL=", IPANEL
394 INTEGER, INTENT(IN) :: IPANEL local
403 & "IPANEL=", IPANEL
410 & "IPANEL=", IPANEL
418 & "IPANEL=", IPANEL
429 & "IPANEL=", IPANEL
[all …]
H A Ddmumps_lr_data_m.F222 INTEGER :: IPANEL local
357 INTEGER, INTENT(IN) :: IPANEL local
367 & "IPANEL=", IPANEL
372 & "IPANEL=", IPANEL
379 & "IPANEL=", IPANEL
394 INTEGER, INTENT(IN) :: IPANEL local
403 & "IPANEL=", IPANEL
410 & "IPANEL=", IPANEL
418 & "IPANEL=", IPANEL
429 & "IPANEL=", IPANEL
[all …]
H A Dzmumps_lr_data_m.F222 INTEGER :: IPANEL local
357 INTEGER, INTENT(IN) :: IPANEL local
367 & "IPANEL=", IPANEL
372 & "IPANEL=", IPANEL
379 & "IPANEL=", IPANEL
394 INTEGER, INTENT(IN) :: IPANEL local
403 & "IPANEL=", IPANEL
410 & "IPANEL=", IPANEL
418 & "IPANEL=", IPANEL
429 & "IPANEL=", IPANEL
[all …]
H A Dcmumps_lr_data_m.F222 INTEGER :: IPANEL local
357 INTEGER, INTENT(IN) :: IPANEL local
367 & "IPANEL=", IPANEL
372 & "IPANEL=", IPANEL
379 & "IPANEL=", IPANEL
394 INTEGER, INTENT(IN) :: IPANEL local
403 & "IPANEL=", IPANEL
410 & "IPANEL=", IPANEL
418 & "IPANEL=", IPANEL
429 & "IPANEL=", IPANEL
[all …]
H A Dcsol_bwd_aux.F199 INTEGER IPANEL, NPANELS local
618 DO IPANEL=NPANELS,1,-1
620 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
621 BEG_PANEL = PANEL_POS(IPANEL)
641 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
642 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
643 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Ddsol_bwd_aux.F197 INTEGER IPANEL, NPANELS local
616 DO IPANEL=NPANELS,1,-1
618 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
619 BEG_PANEL = PANEL_POS(IPANEL)
639 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
640 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
641 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dssol_bwd_aux.F197 INTEGER IPANEL, NPANELS local
616 DO IPANEL=NPANELS,1,-1
618 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
619 BEG_PANEL = PANEL_POS(IPANEL)
639 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
640 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
641 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dzsol_bwd_aux.F199 INTEGER IPANEL, NPANELS local
618 DO IPANEL=NPANELS,1,-1
620 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
621 BEG_PANEL = PANEL_POS(IPANEL)
641 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
642 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
643 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dcsol_bwd.F118 INTEGER NPANELS, IPANEL local
706 DO IPANEL = NPANELS, 1, -1
708 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
709 BEG_PANEL = PANEL_POS(IPANEL)
730 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
731 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
732 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Ddsol_bwd.F116 INTEGER NPANELS, IPANEL local
704 DO IPANEL = NPANELS, 1, -1
706 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
707 BEG_PANEL = PANEL_POS(IPANEL)
728 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
729 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
730 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dssol_bwd.F116 INTEGER NPANELS, IPANEL local
704 DO IPANEL = NPANELS, 1, -1
706 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
707 BEG_PANEL = PANEL_POS(IPANEL)
728 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
729 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
730 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dzsol_bwd.F118 INTEGER NPANELS, IPANEL local
706 DO IPANEL = NPANELS, 1, -1
708 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
709 BEG_PANEL = PANEL_POS(IPANEL)
730 & IW(I_PIVR + IW(I_PIVRPTR+IPANEL-1)-IW(I_PIVRPTR)),
731 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
732 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Ddfac_process_blfac_slave.F97 INTEGER :: NB_BLR_LS, IPANEL, NB_BLR_COL, NPARTSASS_MASTER local
130 & IPANEL, 1,
298 CALL DMUMPS_BLR_RETRIEVE_PANEL_L (IW(IOLDPS+XXF), IPANEL,
324 CALL DMUMPS_BLR_TRY_FREE_PANEL(IW(IOLDPS+XXF), IPANEL,
H A Dzfac_process_blfac_slave.F97 INTEGER :: NB_BLR_LS, IPANEL, NB_BLR_COL, NPARTSASS_MASTER local
130 & IPANEL, 1,
298 CALL ZMUMPS_BLR_RETRIEVE_PANEL_L (IW(IOLDPS+XXF), IPANEL,
324 CALL ZMUMPS_BLR_TRY_FREE_PANEL(IW(IOLDPS+XXF), IPANEL,
H A Dsfac_process_blfac_slave.F97 INTEGER :: NB_BLR_LS, IPANEL, NB_BLR_COL, NPARTSASS_MASTER local
130 & IPANEL, 1,
298 CALL SMUMPS_BLR_RETRIEVE_PANEL_L (IW(IOLDPS+XXF), IPANEL,
324 CALL SMUMPS_BLR_TRY_FREE_PANEL(IW(IOLDPS+XXF), IPANEL,
H A Dcfac_process_blfac_slave.F97 INTEGER :: NB_BLR_LS, IPANEL, NB_BLR_COL, NPARTSASS_MASTER local
130 & IPANEL, 1,
298 CALL CMUMPS_BLR_RETRIEVE_PANEL_L (IW(IOLDPS+XXF), IPANEL,
324 CALL CMUMPS_BLR_TRY_FREE_PANEL(IW(IOLDPS+XXF), IPANEL,
H A Dcsol_fwd_aux.F435 & I_PIVRPTR, I_PIVR, IPANEL local
716 IPANEL = 0
718 IPANEL = IPANEL + 1
728 IF (NPIV.EQ.(IW(I_PIVRPTR+IPANEL-1)-1)) THEN
732 & IW( I_PIVR+ IW(I_PIVRPTR+IPANEL-1)-
734 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
735 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Ddsol_fwd_aux.F433 & I_PIVRPTR, I_PIVR, IPANEL local
714 IPANEL = 0
716 IPANEL = IPANEL + 1
726 IF (NPIV.EQ.(IW(I_PIVRPTR+IPANEL-1)-1)) THEN
730 & IW( I_PIVR+ IW(I_PIVRPTR+IPANEL-1)-
732 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
733 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dssol_fwd_aux.F433 & I_PIVRPTR, I_PIVR, IPANEL local
714 IPANEL = 0
716 IPANEL = IPANEL + 1
726 IF (NPIV.EQ.(IW(I_PIVRPTR+IPANEL-1)-1)) THEN
730 & IW( I_PIVR+ IW(I_PIVRPTR+IPANEL-1)-
732 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
733 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dzsol_fwd_aux.F435 & I_PIVRPTR, I_PIVR, IPANEL local
716 IPANEL = 0
718 IPANEL = IPANEL + 1
728 IF (NPIV.EQ.(IW(I_PIVRPTR+IPANEL-1)-1)) THEN
732 & IW( I_PIVR+ IW(I_PIVRPTR+IPANEL-1)-
734 & NPIV-IW(I_PIVRPTR+IPANEL-1)+1,
735 & IW(I_PIVRPTR+IPANEL-1)-1,
H A Dcfac_process_blocfacto_LDLT.F119 INTEGER :: NPARTSASS_MASTER, IPANEL, NB_ACCESSES_INIT local
158 CALL MPI_UNPACK( BUFR, LBUFR_BYTES, POSITION, IPANEL,
682 & IPANEL,BLR_LS)
750 & SEND_LR, BLR_LS, IPANEL,
824 CALL CMUMPS_BLR_DEC_AND_TRYFREE_L(IW(IOLDPS+XXF),IPANEL,
H A Ddfac_process_blocfacto_LDLT.F119 INTEGER :: NPARTSASS_MASTER, IPANEL, NB_ACCESSES_INIT local
158 CALL MPI_UNPACK( BUFR, LBUFR_BYTES, POSITION, IPANEL,
682 & IPANEL,BLR_LS)
750 & SEND_LR, BLR_LS, IPANEL,
824 CALL DMUMPS_BLR_DEC_AND_TRYFREE_L(IW(IOLDPS+XXF),IPANEL,
H A Dsfac_process_blocfacto_LDLT.F119 INTEGER :: NPARTSASS_MASTER, IPANEL, NB_ACCESSES_INIT local
158 CALL MPI_UNPACK( BUFR, LBUFR_BYTES, POSITION, IPANEL,
682 & IPANEL,BLR_LS)
750 & SEND_LR, BLR_LS, IPANEL,
824 CALL SMUMPS_BLR_DEC_AND_TRYFREE_L(IW(IOLDPS+XXF),IPANEL,
H A Dzfac_process_blocfacto_LDLT.F119 INTEGER :: NPARTSASS_MASTER, IPANEL, NB_ACCESSES_INIT local
158 CALL MPI_UNPACK( BUFR, LBUFR_BYTES, POSITION, IPANEL,
682 & IPANEL,BLR_LS)
750 & SEND_LR, BLR_LS, IPANEL,
824 CALL ZMUMPS_BLR_DEC_AND_TRYFREE_L(IW(IOLDPS+XXF),IPANEL,
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dzmumps_part8.F5241 & I_PIVRPTR, I_PIVR, IPANEL
5393 IPANEL = 0
5395 IPANEL = IPANEL + 1
5906 INTEGER NPANELS, IPANEL
6392 DO IPANEL = NPANELS, 1, -1
6394 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
6417 & IW(I_PIVRPTR+IPANEL-1)-1,
6842 INTEGER IPANEL, NPANELS
7182 DO IPANEL=NPANELS,1,-1
7184 NBJ = PANEL_POS(IPANEL+1)-PANEL_POS(IPANEL)
[all …]

12