21         PetscInt  ldl = PETSC_DECIDE;  in TestVector()  local
26         if (l == 1) ldl = ml + 1;  in TestVector()
27         if (l == 2) ldl = ml + 5;  in TestVector()
29         PetscCall(PetscSFCreateStridedSF(sf, bs, ldr, ldl, &vsf));  in TestVector()
31         if (ldl == PETSC_DECIDE) ldl = ml + 1;  in TestVector()
33 … PetscCall(PetscCalloc4(bs * ldr, &rdata, bs * ldl, &ldata, bs * ldr, &rdatav, bs * ldl, &ldatav));  in TestVector()
37 …scSafePointerPlusOffset(rdata, i * ldr), PetscSafePointerPlusOffset(ldata, i * ldl), MPI_REPLACE));  in TestVector()
38 …scSafePointerPlusOffset(rdata, i * ldr), PetscSafePointerPlusOffset(ldata, i * ldl), MPI_REPLACE));  in TestVector()
42         PetscCall(PetscArraycmp(ldata, ldatav, bs * ldl, &flg));  in TestVector()
46 …ck size %" PetscInt_FMT ", ldr %" PetscInt_FMT ", ldl %" PetscInt_FMT "\n", sfname, bs, ldr, ldl));  in TestVector()
48           PetscCall(PetscIntView(bs * ldl, ldata, PETSC_VIEWER_STDOUT_(comm)));  in TestVector()
50           PetscCall(PetscIntView(bs * ldl, ldatav, PETSC_VIEWER_STDOUT_(comm)));  in TestVector()
56 …PetscCall(PetscSFReduceBegin(sf, MPIU_INT, PetscSafePointerPlusOffset(ldata, i * ldl), PetscSafePo…  in TestVector()
57 …PetscCall(PetscSFReduceEnd(sf, MPIU_INT, PetscSafePointerPlusOffset(ldata, i * ldl), PetscSafePoin…  in TestVector()
64 …ck size %" PetscInt_FMT ", ldr %" PetscInt_FMT ", ldl %" PetscInt_FMT "\n", sfname, bs, ldr, ldl));  in TestVector()