/dports/math/mumps/mumps-5.1.2/src/ |
H A D | cfac_process_blocfacto_LDLT.F | 122 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS, local 241 ALLOCATE(BEGS_BLR_LM(NB_BLR_LM+2)) 245 & BEGS_BLR_LM(1), KEEP8, COMM, IERR, IFLAG, IERROR) 491 call MAX_CLUSTER(BEGS_BLR_LM,NB_BLR_LM+1,MAXI_CLUSTER_LM) 627 & BEGS_BLR_LM, NB_BLR_LM+1, BLR_LM, NPIV1, 914 IF (associated(BEGS_BLR_LM)) DEALLOCATE(BEGS_BLR_LM)
|
H A D | dfac_process_blocfacto_LDLT.F | 122 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS, local 241 ALLOCATE(BEGS_BLR_LM(NB_BLR_LM+2)) 245 & BEGS_BLR_LM(1), KEEP8, COMM, IERR, IFLAG, IERROR) 491 call MAX_CLUSTER(BEGS_BLR_LM,NB_BLR_LM+1,MAXI_CLUSTER_LM) 627 & BEGS_BLR_LM, NB_BLR_LM+1, BLR_LM, NPIV1, 914 IF (associated(BEGS_BLR_LM)) DEALLOCATE(BEGS_BLR_LM)
|
H A D | sfac_process_blocfacto_LDLT.F | 122 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS, local 241 ALLOCATE(BEGS_BLR_LM(NB_BLR_LM+2)) 245 & BEGS_BLR_LM(1), KEEP8, COMM, IERR, IFLAG, IERROR) 491 call MAX_CLUSTER(BEGS_BLR_LM,NB_BLR_LM+1,MAXI_CLUSTER_LM) 627 & BEGS_BLR_LM, NB_BLR_LM+1, BLR_LM, NPIV1, 914 IF (associated(BEGS_BLR_LM)) DEALLOCATE(BEGS_BLR_LM)
|
H A D | zfac_process_blocfacto_LDLT.F | 122 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS, local 241 ALLOCATE(BEGS_BLR_LM(NB_BLR_LM+2)) 245 & BEGS_BLR_LM(1), KEEP8, COMM, IERR, IFLAG, IERROR) 491 call MAX_CLUSTER(BEGS_BLR_LM,NB_BLR_LM+1,MAXI_CLUSTER_LM) 627 & BEGS_BLR_LM, NB_BLR_LM+1, BLR_LM, NPIV1, 914 IF (associated(BEGS_BLR_LM)) DEALLOCATE(BEGS_BLR_LM)
|
H A D | zfac_lr.F | 94 & BEGS_BLR_LM, NB_BLR_LM, BLR_LM, ISHIFT_LM, argument 112 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS local 142 & + int((BEGS_BLR_LM(CURRENT_BLR_LM+J)+ISHIFT_LM-1),8)
|
H A D | cfac_lr.F | 94 & BEGS_BLR_LM, NB_BLR_LM, BLR_LM, ISHIFT_LM, argument 112 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS local 142 & + int((BEGS_BLR_LM(CURRENT_BLR_LM+J)+ISHIFT_LM-1),8)
|
H A D | dfac_lr.F | 94 & BEGS_BLR_LM, NB_BLR_LM, BLR_LM, ISHIFT_LM, argument 112 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS local 142 & + int((BEGS_BLR_LM(CURRENT_BLR_LM+J)+ISHIFT_LM-1),8)
|
H A D | sfac_lr.F | 94 & BEGS_BLR_LM, NB_BLR_LM, BLR_LM, ISHIFT_LM, argument 112 INTEGER, POINTER, DIMENSION(:) :: BEGS_BLR_LM, BEGS_BLR_LS local 142 & + int((BEGS_BLR_LM(CURRENT_BLR_LM+J)+ISHIFT_LM-1),8)
|