16   DM             celldm, swarm;  in pic_advect()  local
90   PetscCall(DMCreate(PETSC_COMM_WORLD, &swarm));  in pic_advect()
91   PetscCall(DMSetType(swarm, DMSWARM));  in pic_advect()
92   PetscCall(DMSetDimension(swarm, dim));  in pic_advect()
95   PetscCall(DMSwarmSetType(swarm, DMSWARM_PIC));  in pic_advect()
96   PetscCall(DMSwarmSetCellDM(swarm, celldm));  in pic_advect()
99   PetscCall(DMSwarmRegisterPetscDatatypeField(swarm, "phi", 1, PETSC_REAL));  in pic_advect()
100   PetscCall(DMSwarmRegisterPetscDatatypeField(swarm, "region", 1, PETSC_REAL));  in pic_advect()
101   PetscCall(DMSwarmFinalizeFieldRegister(swarm));  in pic_advect()
104   PetscCall(DMSwarmSetLocalSizes(swarm, 4, 0));  in pic_advect()
108   PetscCall(DMSwarmInsertPointsUsingCellDM(swarm, DMSWARMPIC_LAYOUT_SUBDIVISION, ppcell));  in pic_advect()
115     PetscCall(DMSwarmGetLocalSize(swarm, &npoints));  in pic_advect()
116     PetscCall(DMSwarmGetField(swarm, DMSwarmPICField_coor, NULL, NULL, (void **)&s_coor));  in pic_advect()
117     PetscCall(DMSwarmGetField(swarm, "phi", NULL, NULL, (void **)&s_phi));  in pic_advect()
118     PetscCall(DMSwarmGetField(swarm, "region", NULL, NULL, (void **)&s_region));  in pic_advect()
127     PetscCall(DMSwarmRestoreField(swarm, "region", NULL, NULL, (void **)&s_region));  in pic_advect()
128     PetscCall(DMSwarmRestoreField(swarm, "phi", NULL, NULL, (void **)&s_phi));  in pic_advect()
129     PetscCall(DMSwarmRestoreField(swarm, DMSwarmPICField_coor, NULL, NULL, (void **)&s_coor));  in pic_advect()
134   PetscCall(DMSwarmProjectFields(swarm, NULL, 1, fieldnames, pfields, SCATTER_FORWARD));  in pic_advect()
138     PetscCall(DMSwarmViewXDMF(swarm, "ic_dms.xmf"));  in pic_advect()
157   PetscCall(DMView(swarm, PETSC_VIEWER_STDOUT_WORLD));  in pic_advect()
166     PetscCall(DMSwarmGetLocalSize(swarm, &npoints));  in pic_advect()
167     PetscCall(DMSwarmGetField(swarm, DMSwarmPICField_coor, NULL, NULL, (void **)&s_coor));  in pic_advect()
172     PetscCall(DMSwarmRestoreField(swarm, DMSwarmPICField_coor, NULL, NULL, (void **)&s_coor));  in pic_advect()
174     PetscCall(DMSwarmMigrate(swarm, PETSC_TRUE));  in pic_advect()
190       PetscCall(DMSwarmSetPointsUniformCoordinates(swarm, min, max, npoints_dir_x, ADD_VALUES));  in pic_advect()
201       PetscCall(DMSwarmSetPointsUniformCoordinates(swarm, min, max, npoints_dir_y, ADD_VALUES));  in pic_advect()
205     PetscCall(DMSwarmProjectFields(swarm, NULL, 1, fieldnames, pfields, SCATTER_FORWARD));  in pic_advect()
213       PetscCall(DMSwarmViewXDMF(swarm, fname));  in pic_advect()
236   PetscCall(DMDestroy(&swarm));  in pic_advect()