| /petsc/src/vec/is/is/utils/ |
| H A D | isblock.c | 29 PetscHMapI gid1_lid1 = NULL; in ISCompressIndicesGeneral() local
40 PetscCall(PetscHMapICreateWithSize(nkeys / bs, &gid1_lid1)); in ISCompressIndicesGeneral()
62 PetscCall(PetscHMapIClear(gid1_lid1)); in ISCompressIndicesGeneral()
70 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, ival + 1, 0, &tt)); in ISCompressIndicesGeneral()
72 PetscCall(PetscHMapISet(gid1_lid1, ival + 1, isz + 1)); in ISCompressIndicesGeneral()
84 PetscHashIterBegin(gid1_lid1, tpos); in ISCompressIndicesGeneral()
86 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in ISCompressIndicesGeneral()
87 PetscHashIterGetKey(gid1_lid1, tpos, gid1); in ISCompressIndicesGeneral()
88 PetscHashIterGetVal(gid1_lid1, tpos, tt); in ISCompressIndicesGeneral()
92 PetscHashIterNext(gid1_lid1, tpos); in ISCompressIndicesGeneral()
[all …]
|
| /petsc/src/mat/impls/sbaij/mpi/ |
| H A D | mmsbaij.c | 19 PetscHMapI gid1_lid1 = NULL; /* one-based gid to lid table */ in MatSetUpMultiply_MPISBAIJ() local
29 PetscCall(PetscHMapICreateWithSize(mbs, &gid1_lid1)); in MatSetUpMultiply_MPISBAIJ()
33 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, gid1, 0, &data)); in MatSetUpMultiply_MPISBAIJ()
34 if (!data) PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec)); in MatSetUpMultiply_MPISBAIJ()
39 PetscHashIterBegin(gid1_lid1, tpos); in MatSetUpMultiply_MPISBAIJ()
40 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in MatSetUpMultiply_MPISBAIJ()
41 PetscHashIterGetKey(gid1_lid1, tpos, gid); in MatSetUpMultiply_MPISBAIJ()
42 PetscHashIterGetVal(gid1_lid1, tpos, lid); in MatSetUpMultiply_MPISBAIJ()
43 PetscHashIterNext(gid1_lid1, tpos); in MatSetUpMultiply_MPISBAIJ()
49 PetscCall(PetscHMapIClear(gid1_lid1)); in MatSetUpMultiply_MPISBAIJ()
[all …]
|
| /petsc/src/mat/impls/sell/mpi/ |
| H A D | mmsell.c | 82 PetscHMapI gid1_lid1 = NULL; in MatSetUpMultiply_MPISELL() local
95 PetscCall(PetscHMapICreateWithSize(sell->B->rmap->n, &gid1_lid1)); in MatSetUpMultiply_MPISELL()
102 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, gid1, 0, &data)); in MatSetUpMultiply_MPISELL()
104 if (!data) PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec)); in MatSetUpMultiply_MPISELL()
111 PetscHashIterBegin(gid1_lid1, tpos); in MatSetUpMultiply_MPISELL()
112 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in MatSetUpMultiply_MPISELL()
113 PetscHashIterGetKey(gid1_lid1, tpos, gid); in MatSetUpMultiply_MPISELL()
114 PetscHashIterGetVal(gid1_lid1, tpos, lid); in MatSetUpMultiply_MPISELL()
115 PetscHashIterNext(gid1_lid1, tpos); in MatSetUpMultiply_MPISELL()
121 PetscCall(PetscHMapIClear(gid1_lid1)); in MatSetUpMultiply_MPISELL()
[all …]
|
| /petsc/src/mat/impls/baij/mpi/ |
| H A D | mmbaij.c | 16 PetscHMapI gid1_lid1 = NULL; in MatSetUpMultiply_MPIBAIJ() local
26 PetscCall(PetscHMapICreateWithSize(B->mbs, &gid1_lid1)); in MatSetUpMultiply_MPIBAIJ()
30 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, gid1, 0, &data)); in MatSetUpMultiply_MPIBAIJ()
33 PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec)); in MatSetUpMultiply_MPIBAIJ()
39 PetscHashIterBegin(gid1_lid1, tpos); in MatSetUpMultiply_MPIBAIJ()
40 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in MatSetUpMultiply_MPIBAIJ()
41 PetscHashIterGetKey(gid1_lid1, tpos, gid); in MatSetUpMultiply_MPIBAIJ()
42 PetscHashIterGetVal(gid1_lid1, tpos, lid); in MatSetUpMultiply_MPIBAIJ()
43 PetscHashIterNext(gid1_lid1, tpos); in MatSetUpMultiply_MPIBAIJ()
49 PetscCall(PetscHMapIClear(gid1_lid1)); in MatSetUpMultiply_MPIBAIJ()
[all …]
|
| /petsc/src/mat/impls/aij/mpi/ |
| H A D | mmaij.c | 17 PetscHMapI gid1_lid1 = NULL; in MatSetUpMultiply_MPIAIJ() local
29 PetscCall(PetscHMapICreateWithSize(aij->B->rmap->n, &gid1_lid1)); in MatSetUpMultiply_MPIAIJ()
33 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, gid1, 0, &data)); in MatSetUpMultiply_MPIAIJ()
36 PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec)); in MatSetUpMultiply_MPIAIJ()
42 PetscHashIterBegin(gid1_lid1, tpos); in MatSetUpMultiply_MPIAIJ()
43 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in MatSetUpMultiply_MPIAIJ()
44 PetscHashIterGetKey(gid1_lid1, tpos, gid); in MatSetUpMultiply_MPIAIJ()
45 PetscHashIterGetVal(gid1_lid1, tpos, lid); in MatSetUpMultiply_MPIAIJ()
46 PetscHashIterNext(gid1_lid1, tpos); in MatSetUpMultiply_MPIAIJ()
52 PetscCall(PetscHMapIClear(gid1_lid1)); in MatSetUpMultiply_MPIAIJ()
[all …]
|
| /petsc/src/mat/impls/aij/seq/ |
| H A D | aij.c | 3565 PetscHMapI gid1_lid1; in MatSeqAIJCompactOutExtraColumns_SeqAIJ() local
3574 PetscCall(PetscHMapICreateWithSize(mat->rmap->n, &gid1_lid1)); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3578 PetscCall(PetscHMapIGetWithDefault(gid1_lid1, gid1, 0, &data)); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3581 PetscCall(PetscHMapISet(gid1_lid1, gid1, ++ec)); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3586 PetscHashIterBegin(gid1_lid1, tpos); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3587 while (!PetscHashIterAtEnd(gid1_lid1, tpos)) { in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3588 PetscHashIterGetKey(gid1_lid1, tpos, gid); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3589 PetscHashIterGetVal(gid1_lid1, tpos, lid); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3590 PetscHashIterNext(gid1_lid1, tpos); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
3596 PetscCall(PetscHMapIClear(gid1_lid1)); in MatSeqAIJCompactOutExtraColumns_SeqAIJ()
[all …]
|