| /petsc/src/mat/graphops/color/impls/minpack/ |
| H A D | setr.c | 11 PetscInt jcol, jp, ir; in MINPACKsetr() local 58 for (ir = 1; ir <= i__1; ++ir) iwa[ir] = 0; in MINPACKsetr() 68 for (ir = 1; ir <= i__1; ++ir) { in MINPACKsetr() 69 ipntr[ir + 1] = ipntr[ir] + iwa[ir]; in MINPACKsetr() 70 iwa[ir] = ipntr[ir]; in MINPACKsetr() 79 ir = indrow[jp]; in MINPACKsetr() 80 indcol[iwa[ir]] = jcol; in MINPACKsetr() 81 ++iwa[ir]; in MINPACKsetr()
|
| H A D | ido.c | 13 PetscInt jcol = 0, ncomp = 0, ic, ip, jp, ir, maxinc, numinc, numord, maxlst, numwgt, numlst; in MINPACKido() local 120 for (ir = 1; ir <= i__1; ++ir) { in MINPACKido() 122 i__2 = ipntr[ir + 1] - ipntr[ir]; in MINPACKido() 183 ir = indrow[jp]; in MINPACKido() 188 i__2 = ipntr[ir + 1] - 1; in MINPACKido() 189 for (ip = ipntr[ir]; ip <= i__2; ++ip) { in MINPACKido()
|
| H A D | degr.c | 11 PetscInt jcol, ic, ip, jp, ir; in MINPACKdegr() local 81 ir = indrow[jp]; in MINPACKdegr() 86 i__3 = ipntr[ir + 1] - 1; in MINPACKdegr() 87 for (ip = ipntr[ir]; ip <= i__3; ++ip) { in MINPACKdegr()
|
| H A D | seq.c | 11 PetscInt jcol, j, ic, ip, jp, ir; in MINPACKseq() local 94 ir = indrow[jp]; in MINPACKseq() 99 i__3 = ipntr[ir + 1] - 1; in MINPACKseq() 100 for (ip = ipntr[ir]; ip <= i__3; ++ip) { in MINPACKseq()
|
| H A D | slo.c | 11 PetscInt jcol, ic, ip, jp, ir, mindeg, numdeg, numord; in MINPACKslo() local 158 ir = indrow[jp]; in MINPACKslo() 163 i__2 = ipntr[ir + 1] - 1; in MINPACKslo() 164 for (ip = ipntr[ir]; ip <= i__2; ++ip) { in MINPACKslo()
|
| /petsc/src/mat/impls/baij/seq/ |
| H A D | baijsolvtran5.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_5_inplace() local 97 ir = 5 * r[i]; in MatSolveTranspose_SeqBAIJ_5_inplace() 98 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_5_inplace() 99 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_5_inplace() 100 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_5_inplace() 101 x[ir + 3] = t[ii + 3]; in MatSolveTranspose_SeqBAIJ_5_inplace() 102 x[ir + 4] = t[ii + 4]; in MatSolveTranspose_SeqBAIJ_5_inplace() 120 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_5() local 207 ir = bs * r[i]; in MatSolveTranspose_SeqBAIJ_5() 208 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_5() [all …]
|
| H A D | baijsolvtran7.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_7_inplace() local 111 ir = 7 * r[i]; in MatSolveTranspose_SeqBAIJ_7_inplace() 112 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_7_inplace() 113 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_7_inplace() 114 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_7_inplace() 115 x[ir + 3] = t[ii + 3]; in MatSolveTranspose_SeqBAIJ_7_inplace() 116 x[ir + 4] = t[ii + 4]; in MatSolveTranspose_SeqBAIJ_7_inplace() 117 x[ir + 5] = t[ii + 5]; in MatSolveTranspose_SeqBAIJ_7_inplace() 118 x[ir + 6] = t[ii + 6]; in MatSolveTranspose_SeqBAIJ_7_inplace() 135 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_7() local [all …]
|
| H A D | baijsolvtran4.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_4_inplace() local 90 ir = 4 * r[i]; in MatSolveTranspose_SeqBAIJ_4_inplace() 91 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_4_inplace() 92 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_4_inplace() 93 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_4_inplace() 94 x[ir + 3] = t[ii + 3]; in MatSolveTranspose_SeqBAIJ_4_inplace() 112 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_4() local 192 ir = bs * r[i]; in MatSolveTranspose_SeqBAIJ_4() 193 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_4() 194 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_4() [all …]
|
| H A D | baijsolvtran6.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_6_inplace() local 104 ir = 6 * r[i]; in MatSolveTranspose_SeqBAIJ_6_inplace() 105 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_6_inplace() 106 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_6_inplace() 107 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_6_inplace() 108 x[ir + 3] = t[ii + 3]; in MatSolveTranspose_SeqBAIJ_6_inplace() 109 x[ir + 4] = t[ii + 4]; in MatSolveTranspose_SeqBAIJ_6_inplace() 110 x[ir + 5] = t[ii + 5]; in MatSolveTranspose_SeqBAIJ_6_inplace() 128 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_6() local 222 ir = bs * r[i]; in MatSolveTranspose_SeqBAIJ_6() [all …]
|
| H A D | baijsolvtran3.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_3_inplace() local 83 ir = 3 * r[i]; in MatSolveTranspose_SeqBAIJ_3_inplace() 84 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_3_inplace() 85 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_3_inplace() 86 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_3_inplace() 104 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_3() local 177 ir = bs * r[i]; in MatSolveTranspose_SeqBAIJ_3() 178 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_3() 179 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_3() 180 x[ir + 2] = t[ii + 2]; in MatSolveTranspose_SeqBAIJ_3()
|
| H A D | baijsolvtran2.c | 10 PetscInt i, nz, idx, idt, ii, ic, ir, oidx; in MatSolveTranspose_SeqBAIJ_2_inplace() local 76 ir = 2 * r[i]; in MatSolveTranspose_SeqBAIJ_2_inplace() 77 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_2_inplace() 78 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_2_inplace() 96 PetscInt nz, idx, idt, j, i, oidx, ii, ic, ir; in MatSolveTranspose_SeqBAIJ_2() local 162 ir = bs * r[i]; in MatSolveTranspose_SeqBAIJ_2() 163 x[ir] = t[ii]; in MatSolveTranspose_SeqBAIJ_2() 164 x[ir + 1] = t[ii + 1]; in MatSolveTranspose_SeqBAIJ_2()
|
| /petsc/src/sys/objects/ |
| H A D | state.c | 108 PetscObjectState *ir = *composed_state; in PetscObjectComposedDataIncrease_() local 117 PetscCall(PetscArraycpy(new_ir, ir, n)); in PetscObjectComposedDataIncrease_() 118 PetscCall(PetscFree2(ar, ir)); in PetscObjectComposedDataIncrease_() 130 const PetscObjectState *ir = *composed_state; in PetscObjectComposedDataStarIncrease_() local 139 PetscCall(PetscArraycpy(new_ir, ir, n)); in PetscObjectComposedDataStarIncrease_() 140 PetscCall(PetscFree2(ar, ir)); in PetscObjectComposedDataStarIncrease_()
|
| H A D | aoptions.c | 329 PetscReal ir, *valr; in PetscOptionsGetFromTextInput() local 450 sscanf(str, "%e", &ir); in PetscOptionsGetFromTextInput() 454 ir = irtemp; in PetscOptionsGetFromTextInput() 456 sscanf(str, "%le", &ir); in PetscOptionsGetFromTextInput() 458 ir = strtoflt128(str, 0); in PetscOptionsGetFromTextInput() 463 *((PetscReal *)next->data) = ir; in PetscOptionsGetFromTextInput()
|
| /petsc/src/dm/impls/stag/ |
| H A D | stagmulti.c | 454 PetscInt ir, ic[2]; in DMStagPopulateInterpolation1d_Internal() local 485 PetscCall(DMStagStencilToIndexLocal(dmf, dim, 1, &rowf, &ir)); in DMStagPopulateInterpolation1d_Internal() 487 PetscCall(MatSetValuesLocal(A, 1, &ir, count, ic, weight, INSERT_VALUES)); in DMStagPopulateInterpolation1d_Internal() 500 PetscCall(DMStagStencilToIndexLocal(dmf, dim, 1, &rowf, &ir)); in DMStagPopulateInterpolation1d_Internal() 502 PetscCall(MatSetValuesLocal(A, 1, &ir, 1, ic, weight, INSERT_VALUES)); in DMStagPopulateInterpolation1d_Internal() 513 PetscInt ir, ic[4]; in DMStagPopulateInterpolation2d_Internal() local 551 PetscCall(DMStagStencilToIndexLocal(dmf, dim, 1, &rowf, &ir)); in DMStagPopulateInterpolation2d_Internal() 553 PetscCall(MatSetValuesLocal(A, 1, &ir, count, ic, weight, INSERT_VALUES)); in DMStagPopulateInterpolation2d_Internal() 585 PetscCall(DMStagStencilToIndexLocal(dmf, dim, 1, &rowf, &ir)); in DMStagPopulateInterpolation2d_Internal() 587 PetscCall(MatSetValuesLocal(A, 1, &ir, count, ic, weight, INSERT_VALUES)); in DMStagPopulateInterpolation2d_Internal() [all …]
|
| H A D | stagstencil.c | 308 PetscInt *ir, *ic; in DMStagMatGetValuesStencil() local 314 PetscCall(PetscMalloc2(nRow, &ir, nCol, &ic)); in DMStagMatGetValuesStencil() 315 PetscCall(DMStagStencilToIndexLocal(dm, dim, nRow, posRow, ir)); in DMStagMatGetValuesStencil() 317 PetscCall(MatGetValuesLocal(mat, nRow, ir, nCol, ic, val)); in DMStagMatGetValuesStencil() 318 PetscCall(PetscFree2(ir, ic)); in DMStagMatGetValuesStencil() 346 PetscInt *ir, *ic; in DMStagMatSetValuesStencil() local 351 PetscCall(PetscMalloc2(nRow, &ir, nCol, &ic)); in DMStagMatSetValuesStencil() 352 PetscCall(DMStagStencilToIndexLocal(dm, dm->dim, nRow, posRow, ir)); in DMStagMatSetValuesStencil() 354 PetscCall(MatSetValuesLocal(mat, nRow, ir, nCol, ic, val, insertMode)); in DMStagMatSetValuesStencil() 355 PetscCall(PetscFree2(ir, ic)); in DMStagMatSetValuesStencil()
|
| /petsc/share/petsc/datafiles/matrices/ |
| H A D | tiny_system_with_x0.mat | 3 …HEAPX �jcdatair8…
|
| H A D | tiny_system_with_x0_complex.mat | 3 …HEAPX �jcdatair8…
|
| /petsc/src/dm/impls/patch/ |
| H A D | patch.c | 123 PetscInt ir; in DMPatchZoom() local 127 PetscCall(PetscFindInt(indices[q], size + 1, ranges, &ir)); in DMPatchZoom() 128 PetscCall(PetscMPIIntCast(ir, &r)); in DMPatchZoom() 159 PetscInt ir; in DMPatchZoom() local 163 PetscCall(PetscFindInt(indices[q], size + 1, ranges, &ir)); in DMPatchZoom() 164 PetscCall(PetscMPIIntCast(ir, &r)); in DMPatchZoom()
|
| /petsc/src/vec/is/sf/utils/ |
| H A D | sfutils.c | 89 const PetscSFNode *ir; in PetscSFGetGraphLayout() local 98 PetscCall(PetscSFGetGraph(sf, &nr, &nl, ilocal, &ir)); in PetscSFGetGraphLayout() 107 for (i = 0; i < nl; i++) gr[i] = range[ir[i].rank] + ir[i].index; in PetscSFGetGraphLayout() 190 PetscInt offset = -(goff + 1) + d, ir; in PetscSFSetGraphSection() local 193 PetscCall(PetscFindInt(offset, size + 1, ranges, &ir)); in PetscSFSetGraphSection() 194 PetscCall(PetscMPIIntCast(ir, &r)); in PetscSFSetGraphSection()
|
| /petsc/src/mat/impls/nest/ |
| H A D | matnest.c | 1862 PetscInt ir; in MatConvert_Nest_SeqAIJ_fast() local 1864 for (ir = rst; ir < ncr + rst; ++ir) { in MatConvert_Nest_SeqAIJ_fast() 1865 ii[ir + 1] += nii[1] - nii[0]; in MatConvert_Nest_SeqAIJ_fast() 1885 PetscInt ir, cst; in MatConvert_Nest_SeqAIJ_fast() local 1892 for (ir = rst; ir < ncr + rst; ++ir) { in MatConvert_Nest_SeqAIJ_fast() 1893 PetscInt ij, rsize = nii[1] - nii[0], ist = ii[ir] + ci[ir]; in MatConvert_Nest_SeqAIJ_fast() 1898 if (PetscUnlikely(vshift != 0.0 && *njj == ir - rst)) vv[ist + ij] += vshift; in MatConvert_Nest_SeqAIJ_fast() 1902 ci[ir] += rsize; in MatConvert_Nest_SeqAIJ_fast()
|
| /petsc/src/ts/characteristic/interface/ |
| H A D | characteristic.c | 781 static PetscMPIInt DMDAGetNeighborRelative(DM da, PetscReal ir, PetscReal jr) in DMDAGetNeighborRelative() argument 792 if (ir >= is && ir <= ie) { /* center column */ in DMDAGetNeighborRelative() 796 } else if (ir < is) { /* left column */ in DMDAGetNeighborRelative()
|
| /petsc/src/mat/impls/scalapack/ |
| H A D | matscalapack.c | 1097 IS ir, ic; in MatConvert_Dense_ScaLAPACK() local 1135 PetscCall(MatGetOwnershipIS(A, &ir, &ic)); in MatConvert_Dense_ScaLAPACK() 1136 PetscCall(ISGetIndices(ir, &rows)); in MatConvert_Dense_ScaLAPACK() 1139 PetscCall(ISRestoreIndices(ir, &rows)); in MatConvert_Dense_ScaLAPACK() 1142 PetscCall(ISDestroy(&ir)); in MatConvert_Dense_ScaLAPACK()
|
| /petsc/src/dm/impls/plex/ |
| H A D | plexinterpolate.c | 881 PetscInt coneSize, c, ind0, o, ir; in DMPlexOrientInterface_Internal() local 902 PetscCall(PetscFindMPIInt(leavesRanks[p][c], nranks, ranks, &ir)); in DMPlexOrientInterface_Internal() 903 PetscCall(PetscMPIIntCast(ir, &r)); in DMPlexOrientInterface_Internal()
|
| /petsc/share/petsc/datafiles/meshes/ |
| H A D | testcase3D.cas | 9870 (ir-transmissivity (constant . 0.8) (profile "" "")) 9872 (ir-opq-absorbtivity (constant . 0.8) (profile "" "")) 9874 (ir-st-absorbtivity (constant . 0.1) (profile "" "")) 10186 (ir-transmissivity (constant . 0.8) (profile "" "")) 10188 (ir-opq-absorbtivity (constant . 0.8) (profile "" "")) 10190 (ir-st-absorbtivity (constant . 0.1) (profile "" "")) 10502 (ir-transmissivity (constant . 0.8) (profile "" "")) 10504 (ir-opq-absorbtivity (constant . 0.8) (profile "" "")) 10506 (ir-st-absorbtivity (constant . 0.1) (profile "" "")) 10818 (ir-transmissivity (constant . 0.8) (profile "" "")) [all …]
|