Searched refs:NB_BLOCKS_PANEL_LM (Results 1 – 4 of 4) sorted by relevance
/dports/math/mumps/mumps-5.1.2/src/ |
H A D | zfac_lr.F | 117 INTEGER :: I, NB_BLOCKS_PANEL_LM, NB_BLOCKS_PANEL_LS, J, MID_RANK local 127 NB_BLOCKS_PANEL_LM = NB_BLR_LM-CURRENT_BLR_LM 135 DO IBIS = 1, (NB_BLOCKS_PANEL_LS*NB_BLOCKS_PANEL_LM) 137 I = (IBIS-1)/NB_BLOCKS_PANEL_LM+1 138 J = IBIS - (I-1)*NB_BLOCKS_PANEL_LM
|
H A D | cfac_lr.F | 117 INTEGER :: I, NB_BLOCKS_PANEL_LM, NB_BLOCKS_PANEL_LS, J, MID_RANK local 127 NB_BLOCKS_PANEL_LM = NB_BLR_LM-CURRENT_BLR_LM 135 DO IBIS = 1, (NB_BLOCKS_PANEL_LS*NB_BLOCKS_PANEL_LM) 137 I = (IBIS-1)/NB_BLOCKS_PANEL_LM+1 138 J = IBIS - (I-1)*NB_BLOCKS_PANEL_LM
|
H A D | dfac_lr.F | 117 INTEGER :: I, NB_BLOCKS_PANEL_LM, NB_BLOCKS_PANEL_LS, J, MID_RANK local 127 NB_BLOCKS_PANEL_LM = NB_BLR_LM-CURRENT_BLR_LM 135 DO IBIS = 1, (NB_BLOCKS_PANEL_LS*NB_BLOCKS_PANEL_LM) 137 I = (IBIS-1)/NB_BLOCKS_PANEL_LM+1 138 J = IBIS - (I-1)*NB_BLOCKS_PANEL_LM
|
H A D | sfac_lr.F | 117 INTEGER :: I, NB_BLOCKS_PANEL_LM, NB_BLOCKS_PANEL_LS, J, MID_RANK local 127 NB_BLOCKS_PANEL_LM = NB_BLR_LM-CURRENT_BLR_LM 135 DO IBIS = 1, (NB_BLOCKS_PANEL_LS*NB_BLOCKS_PANEL_LM) 137 I = (IBIS-1)/NB_BLOCKS_PANEL_LM+1 138 J = IBIS - (I-1)*NB_BLOCKS_PANEL_LM
|