Lines Matching refs:IRHS_SPARSE_COPY
102 INTEGER, DIMENSION(:), POINTER :: IRHS_SPARSE_COPY
192 IRHS_SPARSE_COPY => IDUMMY_TARGET
1362 & int(size(IRHS_SPARSE_COPY),8)*K34_8
1363 DEALLOCATE(IRHS_SPARSE_COPY)
1365 NULLIFY(IRHS_SPARSE_COPY)
1532 ALLOCATE(IRHS_SPARSE_COPY(NZ_THIS_BLOCK),stat=allocok)
1544 ALLOCATE(IRHS_SPARSE_COPY(NZ_THIS_BLOCK), stat=allocok)
1557 IRHS_SPARSE_COPY(IPOS:IPOS+COLSIZE-1) =
1563 IRHS_SPARSE_COPY = id%IRHS_SPARSE(id%IRHS_PTR(JBEG_RHS):
1567 IRHS_SPARSE_COPY
1642 JPERM = UNS_PERM_INV(IRHS_SPARSE_COPY(IPOS+K-1))
1643 IRHS_SPARSE_COPY(IPOS+K-1) = JPERM
1717 I=IRHS_SPARSE_COPY(IZ)
1723 I=IRHS_SPARSE_COPY(IZ)
1819 ALLOCATE(IRHS_SPARSE_COPY(NZ_THIS_BLOCK),stat=allocok)
1849 CALL MPI_BCAST(IRHS_SPARSE_COPY(1),
1902 I=IRHS_SPARSE_COPY(IZ)
1942 ALLOCATE(IRHS_SPARSE_COPY(NZ_THIS_BLOCK),stat=allocok)
1957 IRHS_SPARSE_COPY(II) = PERM_PIV_LIST(I)
1959 IRHS_SPARSE_COPY(II) = id%PIVNUL_LIST(I)
1969 CALL MPI_BCAST(IRHS_SPARSE_COPY(1),
2156 & JBEG_RHS , id%Step2node(1), id%KEEP(28), IRHS_SPARSE_COPY(1),
2268 & IRHS_SPARSE_COPY(1), size(IRHS_SPARSE_COPY),
2291 & IRHS_SPARSE_COPY(1), size(IRHS_SPARSE_COPY),
2310 IF (IRHS_SPARSE_COPY(IZ2).EQ.I) EXIT
2327 IF (IRHS_SPARSE_COPY(IZ2).EQ.I) EXIT
3040 & int(size(IRHS_SPARSE_COPY),8)*K34_8
3041 DEALLOCATE(IRHS_SPARSE_COPY)
3043 NULLIFY(IRHS_SPARSE_COPY)
4219 & IRHS_SPARSE_COPY, LIRHS_SPARSE_COPY,
4234 INTEGER :: IRHS_SPARSE_COPY(LIRHS_SPARSE_COPY),
4261 I = IRHS_SPARSE_COPY(IZ)
4281 I = IRHS_SPARSE_COPY(IZ)
4305 N2RECV =size(IRHS_SPARSE_COPY)
4313 I = IRHS_SPARSE_COPY(IZ)
4321 IRHS_SPARSE_COPY( IRHS_PTR_COPY(J) + K) =
4348 IRHS_SPARSE_COPY(IZ) = I