38 …gistration_function[], const char name[], const size_t size, const PetscInt L, DMSwarmDataField *D…  in DMSwarmDataFieldCreate()  argument
47   df->L           = L;  in DMSwarmDataFieldCreate()
50   PetscCall(PetscMalloc(size * L, &df->data));  in DMSwarmDataFieldCreate()
51   PetscCall(PetscMemzero(df->data, size * L));  in DMSwarmDataFieldCreate()
79   db->L         = -1;  in DMSwarmDataBucketCreate()
196   *sum = df->L;  in DMSwarmDataFieldGetNumEntries()
211   if (new_L == df->L) PetscFunctionReturn(PETSC_SUCCESS);  in DMSwarmDataFieldSetSize()
212   if (new_L > df->L) {  in DMSwarmDataFieldSetSize()
215 …PetscCall(PetscMemzero(((char *)df->data) + df->L * df->atomic_size, (new_L - df->L) * df->atomic_…  in DMSwarmDataFieldSetSize()
220   df->L = new_L;  in DMSwarmDataFieldSetSize()
229 …<= df->L, PETSC_COMM_SELF, PETSC_ERR_USER, "Cannot zero a block of entries if end(%" PetscInt_FMT …  in DMSwarmDataFieldZeroBlock()
237 PetscErrorCode DMSwarmDataBucketSetSizes(DMSwarmDataBucket db, const PetscInt L, const PetscInt buf…  in DMSwarmDataBucketSetSizes()  argument
248   current_used      = PetscMax(db->L, 0);  in DMSwarmDataBucketSetSizes()
249   new_used          = L;  in DMSwarmDataBucketSetSizes()
263     db->L         = new_used;  in DMSwarmDataBucketSetSizes()
270       db->L         = new_used;  in DMSwarmDataBucketSetSizes()
274       db->L      = new_used;  in DMSwarmDataBucketSetSizes()
289 PetscErrorCode DMSwarmDataBucketSetInitialSizes(DMSwarmDataBucket db, const PetscInt L, const Petsc…  in DMSwarmDataBucketSetInitialSizes()  argument
294   PetscCall(DMSwarmDataBucketSetSizes(db, L, buffer));  in DMSwarmDataBucketSetInitialSizes()
302 PetscErrorCode DMSwarmDataBucketGetSizes(DMSwarmDataBucket db, PetscInt *L, PetscInt *buffer, Petsc…  in DMSwarmDataBucketGetSizes()  argument
305   if (L) *L = db->L;  in DMSwarmDataBucketGetSizes()
311 PetscErrorCode DMSwarmDataBucketGetGlobalSizes(MPI_Comm comm, DMSwarmDataBucket db, PetscInt *L, Pe…  in DMSwarmDataBucketGetGlobalSizes()  argument
314   if (L) PetscCallMPI(MPIU_Allreduce(&db->L, L, 1, MPIU_INT, MPI_SUM, comm));  in DMSwarmDataBucketGetGlobalSizes()
320 PetscErrorCode DMSwarmDataBucketGetDMSwarmDataFields(DMSwarmDataBucket db, PetscInt *L, DMSwarmData…  in DMSwarmDataBucketGetDMSwarmDataFields()  argument
323   if (L) *L = db->nfields;  in DMSwarmDataBucketGetDMSwarmDataFields()
344 …PetscCheck(pid < gfield->L, PETSC_COMM_SELF, PETSC_ERR_USER, "index must be < %" PetscInt_FMT, gfi…  in DMSwarmDataFieldAccessPoint()
362 …PetscCheck(pid < gfield->L, PETSC_COMM_SELF, PETSC_ERR_USER, "index must be < %" PetscInt_FMT, gfi…  in DMSwarmDataFieldAccessPointOffset()
432   PetscInt          f, L, buffer, allocated, p;  in DMSwarmDataBucketCreateFromSubset()  local
438   PetscCall(DMSwarmDataBucketGetSizes(DBIn, &L, &buffer, &allocated));  in DMSwarmDataBucketCreateFromSubset()
441   PetscCall(DMSwarmDataBucketSetSizes(*DB, L, buffer));  in DMSwarmDataBucketCreateFromSubset()
461 …PetscCheck(index < field->L, PETSC_COMM_SELF, PETSC_ERR_USER, "index must be < %" PetscInt_FMT, fi…  in DMSwarmDataFieldInsertPoint()
477 …>allocated, PETSC_COMM_SELF, PETSC_ERR_USER, "index must be < %" PetscInt_FMT, db->L + db->buffer);  in DMSwarmDataBucketRemovePointAtIndex()
481   if (index >= db->L) { /* this point is not in the list - no need to error, but I will anyway */  in DMSwarmDataBucketRemovePointAtIndex()
482 …ing to remove point at index=%" PetscInt_FMT " since it's < db->L = %" PetscInt_FMT, index, db->L);  in DMSwarmDataBucketRemovePointAtIndex()
484   if (index != db->L - 1) { /* not last point in list */  in DMSwarmDataBucketRemovePointAtIndex()
489       PetscCall(DMSwarmDataFieldCopyPoint(db->L - 1, field, index, field));  in DMSwarmDataBucketRemovePointAtIndex()
506 …PetscCheck(pid_x < field_x->L, PETSC_COMM_SELF, PETSC_ERR_USER, "(IN) index must be < %" PetscInt_…  in DMSwarmDataFieldCopyPoint()
508 …PetscCheck(pid_y < field_y->L, PETSC_COMM_SELF, PETSC_ERR_USER, "(OUT) index must be < %" PetscInt…  in DMSwarmDataFieldCopyPoint()
522 …PetscCheck(index < field->L, PETSC_COMM_SELF, PETSC_ERR_USER, "index must be < %" PetscInt_FMT, fi…  in DMSwarmDataFieldZeroPoint()
548 …PetscCall(DMSwarmDataBucketSetSizes(db, PetscMax(db->L, 0) + 1, DMSWARM_DATA_BUCKET_BUFFER_DEFAULT…  in DMSwarmDataBucketAddPoint()
556 …PetscCheck(db->L > 0, PetscObjectComm((PetscObject)db), PETSC_ERR_ARG_WRONG, "Swarm has no points …  in DMSwarmDataBucketRemovePoint()
557   PetscCall(DMSwarmDataBucketSetSizes(db, db->L - 1, DMSWARM_DATA_BUCKET_BUFFER_DEFAULT));  in DMSwarmDataBucketRemovePoint()
569   PetscCall(PetscPrintf(comm, "  L                  = %" PetscInt_FMT " \n", db->L));  in DMSwarmDataBucketView_stdout()