Lines Matching refs:is

5 PetscErrorCode TestRenumber(IS is, IS mult)
11   PetscCall(PetscPrintf(PetscObjectComm((PetscObject)is), "\n-----------------\n"));
12   PetscCall(PetscPrintf(PetscObjectComm((PetscObject)is), "\nInitial\n"));
13   PetscCall(ISView(is, NULL));
15     PetscCall(PetscPrintf(PetscObjectComm((PetscObject)is), "\nMult\n"));
18   PetscCall(ISRenumber(is, mult, &N, NULL));
19   PetscCall(PetscPrintf(PetscObjectComm((PetscObject)is), "\nRenumbered, unique entries %" PetscInt_FMT "\n", N));
20   PetscCall(ISRenumber(is, mult, NULL, &nis));
28   IS          is;
39     PetscCall(ISCreateStride(PETSC_COMM_WORLD, 0, 0, 0, &is));
42       PetscCall(ISGetLocalSize(is, &n));
45     PetscCall(TestRenumber(is, mult));
46     PetscCall(ISDestroy(&is));
49     PetscCall(ISCreateStride(PETSC_COMM_WORLD, 2, -rank - 1, -4, &is));
52       PetscCall(ISGetLocalSize(is, &n));
55     PetscCall(TestRenumber(is, mult));
56     PetscCall(ISDestroy(&is));
59     PetscCall(ISCreateStride(PETSC_COMM_WORLD, 10, 4 + rank, 2, &is));
62       PetscCall(ISGetLocalSize(is, &n));
65     PetscCall(TestRenumber(is, mult));
66     PetscCall(ISDestroy(&is));
69     PetscCall(ISCreateStride(PETSC_COMM_WORLD, 10, -rank - 1, 2, &is));
72       PetscCall(ISGetLocalSize(is, &n));
75     PetscCall(TestRenumber(is, mult));
76     PetscCall(ISDestroy(&is));